I'm stuck!

budman · October 30th, 2003, 09:58 PM

Ok, so I keep getting this error message:

Code:

Microsoft VBScript runtime error '800a01a8'

Object required: 'True'

/pandadot/esubmit.asp, line 8

Can someone tell me what I am doing wrong?

Code:

<html>
<title>Thanks for joining our mailing list!</title>
<head>
</head>
<%
        Dim objConn
        set objConn = DSN=DSN_pandadot
        Dim rsusers
         Set rsusers = Server.CreateObject("ADODB.Recordset")        rsusers.Open "pandainfo", objConn
                rsusers("Email") = Request.Form("emailfield")rsusers.Update
Response.write("Your e-mail address has been added to our mailing list.")
%>
<center>
<body>
</body>
</center>
</html>

Sorry about the formatting of the code, but you get the idea.

surendran · October 31st, 2003, 12:19 AM

try this code
<%
str="dsn=DSN_pandadot;uid="";pwd="";"
dim con,rsusers
set con=server.CreateObject("adodb.connection")
set rsusers=server.CreateObject("adodb.recordset")
con.open str
sql="select * from pandainfo"
rsusers.open sql,con,1,3

rsusers.addnew
r(0).value=Request.Form("emailfield")
rsusers.update
Response.write("Your e-mail address has been added to our mailing list.")
rsusers.close
%>

surendran

budman · November 3rd, 2003, 12:52 AM

That worked really well. Thanks!!