Darren DICK
d.dick at uws.edu.au
Tue Feb 17 23:51:53 CST 2004
No Joy Bruce Thanks ----- Original Message ----- From: <bruce_bruen at mlc.com.au> To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com> Sent: Wednesday, February 18, 2004 4:27 PM Subject: Re: [AccessD] A2K: Can anyone tell me why this fails? > > > > > Off the top of my head.... > > > > If txtStudentIDSearch is a control name on the form, add .Value after it. > > > hth > Bruce > > > > "Darren DICK" > <d.dick at uws.edu.au> To: "AccessD List" <AccessD at databaseadvisors.com> > Sent by: cc: > accessd-bounces at databasea Subject: [AccessD] A2K: Can anyone tell me why this fails? > dvisors.com > > > 18/02/2004 15:54 > Please respond to Access > Developers discussion and > problem solving > > > > > > > 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]![txtStudentIDSearch]));" > > > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com