Too Few Parameters Expected 1.

[pmeredith]

Too Few Parameters Expected 1.

Boy am I starting to hate seeing this message! What am I doing Wrong?

Private Sub Form_Activate()

dim sName as string
sName = "cmbType"

data3.DatabaseName = globalvarDB
Data3.RecordSource = "SELECT Codename FROM CodeMstr where NameofField = " & sName
Data3.Refresh
End Sub

I am using a data control with an Access database that has a table called CodeMstr and and one of the fields is called NameofField which contains records that include "cmbtype". The databasename is also specified from a globalvar. Help! Am I overlooking something stupid?

[jim]

try the following:


Data3.RecordSource = "SELECT Codename FROM CodeMstr where NameofField = '" & sName & "'"