selecting using adodc record source

[daz321]

I have a form that displays a letter history, basically the contents of a table, i would like to be able to search on various criteria, i am using the below code to search on letter_type but get a "No value given for one or more required parameters" error message.


Private Sub cmdLetterType_Click()
Dim LetterType As String

LetterType = InputBox("Enter the Letter Type:", vbOKCancel)

Adodc1.RecordSource = ("SELECT * FROM letter_history WHERE letter_type = " & LetterType)
Adodc1.Refresh

End Sub

 

[sunaj]

"No value given for one or more required parameters"
Usually means that you have misspelled some of your table/column names - check the spelling.

Sunaj
'The gap between theory and practice is not as wide in theory as it is in practice'

 

[jantie78]

Hi,

If letter_type is a text-field (non-numeric), you should add some quotes like this :

Adodc1.RecordSource = ("SELECT * FROM letter_history WHERE letter_type = '" & LetterType & "'&quot

Greetz,
Jan If this response was usefull to you, please mark it with a Star!

 

[CajunCenturion]

You might to try enclosing the LetterType in single quotes.

Adodc1.RecordSource = ("SELECT * FROM letter_history WHERE letter_type = '" & LetterType & "'&quot Good Luck
--------------
As a circle of light increases so does the circumference of darkness around it. - Albert Einstein

 

[daz321]

I thought i had tried the single quote thing before but obviously not as it works now, thanks everyone.