Stuart McLachlan
stuart at lexacorp.com.pg
Thu Feb 19 21:19:46 CST 2004
This time, I'd guess that StudentID in NOT a text field, so you don't want the two single quotes at all. You seem to be missing the first field name in the select statement You are missing a closing double quote after & "FROM tblStudents (note you also need a space after the tblStudents and before the double quote) So try: selSQL = "SELECT tblStudents, tblStudents.StudentID " _ & "FROM tblStudents " _ & "WHERE (((tblStudents.StudentID)=" _ & [Forms]![frmStudents]![txtStudentID] & "));" On 20 Feb 2004 at 13:30, Darren DICK wrote: > Hi Guys > This is basically the same question I asked the other day that Stuart and some others answered > This is basically the same code (that works elsewhere by the way) copied and pasted but with a slightly > different SQL. > I have tried to follow (as closely as possible) the syntax that Stuart recommended with the single > quotes and stuff, but I just cant get it right > > I am continually getting either "Data Type Mismatch in expression" or, depending on what I do or do not type > "No Value give for one or more parameters" AAAAARRRRGGGHHHHH!!!!! > > '+++++++++++++++++++++++++++++++++++++++++++++++++++++++ > Dim selSQL As String > Dim rs As Object > Dim con As Object > > Set rs = CreateObject("ADODB.Recordset") > Set con = Application.CurrentProject.Connection > > selSQL = "SELECT tblStudents, tblStudents.StudentID " _ > & "FROM tblStudents & "WHERE (((tblStudents.StudentID)='" & [Forms]![frmStudents]![txtStudentID] & "'));" > > rs.Open selSQL, con, 1 ', 3 '<====================Debug fails here > > With rs > MsgBox .RecordCount > x = .RecordCount > End With > '++++++++++++++++++++++++++++++++++++++++++++++++++++++ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support.