
OA.XANDER.COM.CN
Xander-OAThen sql="select * from userinfo where user name=" and sqlstr(username) and " and forbid='Y'" Set objRecordset = GetDBConnection().Execute(sql) if not objRecordset.eof then '如果有此用户就进入系统 if objRecordset.Fields("passward")= password then Session("user id")=objRecordset.Fields("user id") Session("grade")=objRecordset.Fields("grade") Session("name")=objRecordset.Fields("name") Session("dept")=objRecordset.Fields("dept") Session("posi")=objRecordset.Fields("posi") Session("part...
http://oa.xander.com.cn/