Having trouble with an ASP error!?

[slonik]

Date: 02/26/2004 01:00PM PST

Here is the code.

'------------------------------------------------'
'- Gets Managers details such as name & email -'
'------------------------------------------------'
Sub GetManagerDetails(id)
Dim strSQL, rs
strSQL = "SELECT tblUsers.Name, tblUsers.LastName,
tblUsers.EmailWork "&
"FROM tblUsers "& _
"WHERE (((tblUsers.ID)="& id &"));"

' I placed response.write(strsql) here and that showed me that the
strSQL was in fact ok.

Set rs = conn.Execute(strSQL) '--> this is LINE 202

If not rs.bof and not rs.eof Then
strManagerName = rs("Name") & " " & rs("LastName")
strManagerEmail = rs("EmailWork")
End If
rs.Close
Set rs = Nothing
End Sub

[Ray at]

Asked and answered in another group. Please do not multipost.
http://www.aspfaq.com/5003

Ray at home

"slonik" <ze****@aol.com> wrote in message
news:Tn**********************@news.easynews.com...

Date: 02/26/2004 01:00PM PST

Here is the code.

'------------------------------------------------'
'- Gets Managers details such as name & email -'
'------------------------------------------------'
Sub GetManagerDetails(id)
Dim strSQL, rs
strSQL = "SELECT tblUsers.Name, tblUsers.LastName,
tblUsers.EmailWork "&
"FROM tblUsers "& _
"WHERE (((tblUsers.ID)="& id &"));"

' I placed response.write(strsql) here and that showed me that the
strSQL was in fact ok.

Set rs = conn.Execute(strSQL) '--> this is LINE 202

If not rs.bof and not rs.eof Then
strManagerName = rs("Name") & " " & rs("LastName")
strManagerEmail = rs("EmailWork")
End If
rs.Close
Set rs = Nothing
End Sub
.
Dim strManagerName, strManagerEmail
Dim k, intManagerID
For k = 0 to intManagersIDs
intManagerID = Request.Form("ID"& k)
Call GetManagerDetails(intManagerID)
Next

Problem is: even when I do response.write(strSQL) and can see that the intManagerID variable has a numeric value, once I execute the SQL string it looks like the variable becomes empty. There is a valid connection to the
database that's being used before and after this statement. If I force the
value to be 171 by hardcoding it, it works too.
Error:

Microsoft JET Database Engine error '80040e14'

Extra ) in query expression '(((tblUsers.ID)=))'.

/trellistech/test/admin/re_email_mgrs.asp, line 202

thanks for you times