syntax error in query expression in vb.net

[amitbadgi]

I am geting the following error while conv an asp to asp.net
Exception Details: System.Runtime. InteropServices .COMException: Syntax
error in query expression 'id =System.__ComOb ject'.

Source Error:

Line 196: for i = 0 to ubound(emaillis t)
Line 197: selectsqlstatem ent = "select * from tblusers where id =" &
emaillist(i)

Line 198: rs_email = conn.execute(se lectsqlstatemen t)
Line 199: tolist = tolist & rs_email("email ") & ";"
Line 200:
Source File: C:\Documents and Settings\amit\W ebSite1\email_f orm.aspx
Line: 198

Stack Trace:

[COMException (0x80040e14): Syntax error in query expression 'id
=System.__ComOb ject'.]
Microsoft.Visua lBasic.Compiler Services.LateBi nding.LateGet(O bject o,
Type objType, String name, Object[] args, String[] paramnames,
Boolean[] CopyBack) +965
Microsoft.Visua lBasic.Compiler Services.NewLat eBinding.LateGe t(Object
Instance, Type Type, String MemberName, Object[] Arguments, String[]
ArgumentNames, Type[] TypeArguments, Boolean[] CopyBack) +193727
ASP.email_form_ aspx.__Render__ control1(HtmlTe xtWriter __w, Control
parameterContai ner) in C:\Documents and
Settings\amit\W ebSite1\email_f orm.aspx:198
System.Web.UI.C ontrol.RenderCh ildrenInternal( HtmlTextWriter writer,
ICollection children) +98
System.Web.UI.C ontrol.RenderCh ildren(HtmlText Writer writer) +20
System.Web.UI.P age.Render(Html TextWriter writer) +27
System.Web.UI.C ontrol.RenderCo ntrolInternal(H tmlTextWriter writer,
ControlAdapter adapter) +53
System.Web.UI.C ontrol.RenderCo ntrol(HtmlTextW riter writer,
ControlAdapter adapter) +280
System.Web.UI.C ontrol.RenderCo ntrol(HtmlTextW riter writer) +24

The code for teh foll is,

<%
Dim counter,rs_emai l, tolist
Dim emaillist as string()
dim i as integer
emaillist = split(request.F orm("c"), ",")
counter = 1
dim selectSqlStatem ent as string
for i = 0 to ubound(emaillis t)
selectsqlstatem ent = "select * from tblusers where id =" &
emaillist(i)
rs_email = conn.execute(se lectsqlstatemen t)
tolist = tolist & rs_email("email ") & ";"

response.Write( rs_email("email ")&";")

if counter = 3 then
response.Write( "<br>")
counter = 1
end if

counter = counter + 1
next
%>

[Nick Malik [Microsoft]]

three syntax errors in a row... Impressive.
clearly, the value of the expression emaillist(i) isn't what you expect it
to be.

why not run through a debugger and see what the values are and compare them
to what you'd expect them to be?

--
--- Nick Malik [Microsoft]
MCSD, CFPS, Certified Scrummaster
http://blogs.msdn.com/nickmalik

Disclaimer: Opinions expressed in this forum are my own, and not
representative of my employer.
I do not answer questions on behalf of my employer. I'm just a
programmer helping programmers.
--
<am*******@gmai l.com> wrote in message
news:11******** **************@ g14g2000cwa.goo glegroups.com.. .

I am geting the following error while conv an asp to asp.net
Exception Details: System.Runtime. InteropServices .COMException: Syntax
error in query expression 'id =System.__ComOb ject'.

Source Error:

Line 196: for i = 0 to ubound(emaillis t)
Line 197: selectsqlstatem ent = "select * from tblusers where id =" &
emaillist(i)

Line 198: rs_email = conn.execute(se lectsqlstatemen t)
Line 199: tolist = tolist & rs_email("email ") & ";"
Line 200:
Source File: C:\Documents and Settings\amit\W ebSite1\email_f orm.aspx
Line: 198

Stack Trace:

[COMException (0x80040e14): Syntax error in query expression 'id
=System.__ComOb ject'.]
Microsoft.Visua lBasic.Compiler Services.LateBi nding.LateGet(O bject o,
Type objType, String name, Object[] args, String[] paramnames,
Boolean[] CopyBack) +965
Microsoft.Visua lBasic.Compiler Services.NewLat eBinding.LateGe t(Object
Instance, Type Type, String MemberName, Object[] Arguments, String[]
ArgumentNames, Type[] TypeArguments, Boolean[] CopyBack) +193727
ASP.email_form_ aspx.__Render__ control1(HtmlTe xtWriter __w, Control
parameterContai ner) in C:\Documents and
Settings\amit\W ebSite1\email_f orm.aspx:198
System.Web.UI.C ontrol.RenderCh ildrenInternal( HtmlTextWriter writer,
ICollection children) +98
System.Web.UI.C ontrol.RenderCh ildren(HtmlText Writer writer) +20
System.Web.UI.P age.Render(Html TextWriter writer) +27
System.Web.UI.C ontrol.RenderCo ntrolInternal(H tmlTextWriter writer,
ControlAdapter adapter) +53
System.Web.UI.C ontrol.RenderCo ntrol(HtmlTextW riter writer,
ControlAdapter adapter) +280
System.Web.UI.C ontrol.RenderCo ntrol(HtmlTextW riter writer) +24

The code for teh foll is,

<%
Dim counter,rs_emai l, tolist
Dim emaillist as string()
dim i as integer
emaillist = split(request.F orm("c"), ",")
counter = 1
dim selectSqlStatem ent as string
for i = 0 to ubound(emaillis t)
selectsqlstatem ent = "select * from tblusers where id =" &
emaillist(i)
rs_email = conn.execute(se lectsqlstatemen t)
tolist = tolist & rs_email("email ") & ";"

response.Write( rs_email("email ")&";")

if counter = 3 then
response.Write( "<br>")
counter = 1
end if

counter = counter + 1
next
%>