Please help
- From: je3283@xxxxxxxxxxx
- Date: 29 Sep 2006 12:28:28 -0700
Hello everyone. I have been working on a project using adodb and access
and cannot for the life of me figure out why i get an error that says "
No Value Given for one or more Parameters".
Here is the code I am having trouble with( the first four lines):
str = "SELECT ContactName, CustConnection FROM contacts WHERE
CustConnection= " & cboCustomer.Text
Set ContRecSet = New ADODB.Recordset
ContRecSet.Open str, conn, adOpenForwardOnly, adLockReadOnly,
adCmdText
'loop through records and populate in the combobox
With ContRecSet
If Not (.BOF And .EOF) Then
Do Until .EOF
cboContacts.AddItem .Fields("ContactName")
cboContacts.ItemData(cboContacts.NewIndex) =
..Fields.Count
.MoveNext
Loop
Else
MsgBox "No records found"
End If
End With
.
- Follow-Ups:
- Re: Please help
- From: MikeD
- Re: Please help
- Prev by Date: Re: VB6 application unable to install on windows 2003 server
- Next by Date: Re: Please help
- Previous by thread: VB6 application unable to install on windows 2003 server
- Next by thread: Re: Please help
- Index(es):
Relevant Pages
|