The code below is an extract from a application I am trying to write.
[code]Dim MyConn As ADODB.Connection
Dim MyRecSet As ADODB.Recordset
Set MyConn = New ADODB.Connection
MyConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =
D:\Data\Orion-Testing\TestServer\Inventory.mdb"
MyConn.Open
Set MyRecSet = MyConn.Execute("Select * from GenericToAlt where dbAltPN = '"
& cboAltPart.Text & "'")
If MyRecSet.RecordCount = 0 Then
Stop
End If[/code]
I am getting the error: [B]"No value given for one or more required
parameters."[/B]. It is happening on the "Set MyRecSet ..." statement.
As I step through the code, cboAltPart.Text does contain the correct value.
Here is the layout of the Table:
TableName: GenericToAlt
dbAtlPN text 30
dbAltPO text 10
There are NO primary or secondary indexes.
I don't see the problem, Can You help?
--
Thank You,
Sam
Archived from group: microsoft>public>vb>directx