%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% userjm=request.form("input1") passjm=request.form("input2") if userjm="" and passjm="" then %>
<% else set rsjmuser=server.CreateObject("adodb.recordset") rsjmuser.open "select * from [User] where UserName='"&userjm&"'",conn,1,1 if rsjmuser("PassWord")=passjm then session("UserName")=rs("username") session("level")=rs("VIPUser") response.write("") else response.write("") end if end if %>