E
eric
I get a too few parameters error trying to create a
recordset. The code below is in a different .mdb file
Dim str As String, db As Database, rst As Recordset
Set db = OpenDatabase("c:\testdata.mdb")
str = "SELECT [PO Parts].[PO#], [PO Parts].Description,
[PO Parts].Qty, " & _
"[PO Parts].QtyRecd2, [PO Parts].TotQtyRecd2, [PO
Parts].OrgOrdQty " & _
"FROM [PO Parts] ORDER BY [PO Parts].[Description] &
CStr([PO Parts].[PO#]);"
Set rst = db.OpenRecordset(str, dbOpenDynaset)
recordset. The code below is in a different .mdb file
Dim str As String, db As Database, rst As Recordset
Set db = OpenDatabase("c:\testdata.mdb")
str = "SELECT [PO Parts].[PO#], [PO Parts].Description,
[PO Parts].Qty, " & _
"[PO Parts].QtyRecd2, [PO Parts].TotQtyRecd2, [PO
Parts].OrgOrdQty " & _
"FROM [PO Parts] ORDER BY [PO Parts].[Description] &
CStr([PO Parts].[PO#]);"
Set rst = db.OpenRecordset(str, dbOpenDynaset)