% if request("login") <> "" then username=request("username") password=request("password") sql = "Select * From info Where 用户名='"&Username&"' And 密码='"&Password&"'" set rs=conn.execute (sql) If rs.EOF Then response.write "" response.end Else session("pass")="passed" session("username")=username response.redirect"test.htm" End If Conn.Close Set Conn=Nothing else %>
|
|
北京新网无限 Copyright© 2002 All Rights Reserved 京ICP备07015440号 公司地址:北京顺义区文化创意产业中心4楼 电话:业务部(010)81493568 推广售后服务(010)81493568-801(802) 域名空间售后服务技术支持24小时电话:新网4007005766 万网4006008500 北京网站建设 业务渠道 技术咨询 |