[AccessD] A2K: Can anyone tell me why this fails?

You hve to build the string like this:

selSQL = "SELECT tblStudents.StudentID, tblStudents.FormattedStudentID
FROM tblStudents WHERE (((tblStudents.FormattedStudentID)=" &
[Forms]![frmStudentSearch]![txtStudentIDSearch] & "));"

--Steve


-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK
Sent: Tuesday, February 17, 2004 11:54 PM
To: AccessD List
Subject: [AccessD] A2K: Can anyone tell me why this fails?


Hello all
I get a very long runtime error number along with the text... No value
given for one or more required parameters

The sql string works well as a query
'###########################################
Dim selSQL As String
Dim rs As Object
Dim con As Object

selSQL = "SELECT tblStudents.StudentID, tblStudents.FormattedStudentID
FROM tblStudents WHERE
(((tblStudents.FormattedStudentID)=[Forms]![frmStudentSearch]![txtStuden
tIDSearch]));"

Set rs = CreateObject("ADODB.Recordset")
Set con = Application.CurrentProject.Connection

rs.Open selSQL, con, 1, 3 '<=====DEBUG YELLOWS OUT THIS LINE

    With rs
        .MoveFirst
        .MoveLast
        .MoveFirst
        MsgBox .RecordCount
    End With
'###########################################

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com