主题:  大家帮忙看看这段带码!!!

tearman

职务:普通成员
等级:1
金币:0.0
发贴:47
#12004/8/23 11:36:30
各位高手帮我看看这段带码中有错的吗?为什么username userpwd总是进不去数据库???
<%
username = request("username")
userpwd = request("userpwd")
set conn=Server.CreateObject("ADODB.Connection")
conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("chat\chat.mdb")
set rs=Server.CreateObject("ADODB.Recordset")
rs.open "select * from chat where 1=0",con,3,3
rs.addnew
rs.("username")=request("username")
rs.("userpwd")=request("userpwd")
rs.update
if not(rs.bof and rs.eof) then
application("VisitorNum") = application("VisitorNum") + 1
application("VisitorName") = application("VisitorName") & " " & username
Response.Write ("userlogin=success")
Else
Response.Write ("userlogin=unsuccess")
end if
rs.close
conn.close
%>

这是错误提示

Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp,行242

Microsoft VBScript 编译器错误 错误 '800a03f2'

缺少标识符

/login.asp,行7

rs.("username")= username
---^