想把IP地址和时间存入数据库，数据库名是hosts,字段名是ipaddress,shijian,运行后总显示一行有错
<% language =vbscript%>

<% dim ll
ll=Request.ServerVariables("REMOTE_ADDR")
%>
<%dim conn
dim db
dim connstr
set conn = server.createobject("adodb.connection")
'conn.open "hosts"
db="hosts.mdb"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
dim rs
set rs=server.createobject("adodb.recordset")
rs.open "hosts",conn,adOpenDynamic,adLockOptimistic '''''就是这一行

rs.addnew
rs("ipaddress")=ll
rs("shijian")=date()
rs.update
%>