IIS，Windows XP:
一，如何简单的设置必须登陆才能进入浏览其它的页面，防止直接在地址栏里输入？
二，下列代码的错误在哪里(修改数据表中的数据.现成的代码搬过来，只是修改了相应的数据库地址，表的字段)
非常感谢。

<%
dim IID
IID=request("id")
text=Request("text")
textid=Request("textid")
selsex=request("selsex")
old=Request("old")
year1=Request("selyear")
month1=Request("selmonth")
day1=Request("selday")
birthday=year1&"/"&month1&"/"&day1
xl=Request("xl")
tel=Request("tel")
idcard=request("idcard")
home=request("home")
if text="" or textid="" or old="" or tel="" or idcard="" or home="" then
response.write("不能有空格!")
response.end
end if
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("kly1.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
SQLcmd="UpDate xx Set 姓名='"&text&"',编号='"&textid&"',"
sqlcmd=sqlcmd & "年龄='"&old&"',学历='"&xl&"',性别='"&selsex&"',"
sqlcmd=sqlcmd & "时间='"&birthday&"',身份证='"&idcard&"',"
sqlcmd=sqlcmd & "住址='"&home&"',电话="&tel&" Where id='"&IID&"'"
rs.Open sql,conn,1,1 '提示这行出错。
response.write ""
set rs=nothing
%>

麻烦帮我再改改，谢谢。
Set newconn=Server.CreateObject("ADODB.Connection")
DBPath=Server.MapPath("Member.mdb")
newconn.Open"driver={Microsoft Access Driver (*.mdb)};DBQ=" & DBPath
SQLcmd="UpDate Member Set pass='"&pass&"',pass1='"&pass1&"',name='"&name&"',EMail='"&mail&"',sex='"&sex&"',birthday='"&birthday&"',state='"&state&"',tel="&tel&" Where ID='"&ID&"'"
newconn.Execute SQLcmd
%>