Query DB by ID

Imar · October 19th, 2003, 03:43 AM

What about the code around this statement? Maybe the error occurs on another line:

Do While Not oRSmt.EOF
Response.Write(oRSmt("FirstName") & " ")
oRSmt.MoveNext()
Loop

should just work, but maybe you added something that you didn't show here.

Imar

---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.

CW · October 19th, 2003, 07:43 AM

This is the complete code of detail.asp

<html>
<head>
<title>detail</title>
</head>
<body>
 
<%
UserID = Request.QueryString("ID")
dim oRSmt
set oRSmt=server.createobject("ADODB.recordset")
sqlText="Select * FROM Student"
sqlText=sqlText & "WHERE ID="& UserID & ""
oRSmt.Open sqlText, "DSN=Arday"

Do While Not oRSmt.EOF
Response.Write(oRSmt("FirstName") & " ")
oRSmt.MoveNext()
Loop

oRSmt.Close
Set oRSmt = Nothing
%>
</body>
</html>

this is the same error.

Error Type:
Microsoft VBScript compilation (0x800A0408)
Invalid character
/Thesis/test3.asp, line 16
Response.Write(oRSmt("FirstName")&" ")

thanks again
what you think.

Imar · October 19th, 2003, 08:48 AM

Not sure whether this is a copy / paste error, but take a look at this:

sqlText="Select * FROM Student"
sqlText=sqlText & "WHERE ID="& UserID & ""

The SQL statement will end up like this:

Select * FROM StudentWHERE ID=12

There should be a space between the Student and WHERE clause.

Also, when you are querying for just one record (I assume the UserID is unique), there is no need for a loop:

If Not oRSmt.EOF Then
Response.Write(oRSmt("FirstName") & " ")
End If

This will write out just one record, because your WHERE clause will just return one record.

Cheers,

Imar

---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.

CW · October 21st, 2003, 03:58 AM

Thanks a lot. It is working.

Thanks