<% act=request.querystring("act") select case act case "chk" call chk() case else call show() end select sub chk() musername=Replace(request.Form("musername"),"'","") mpassword=Trim(Replace(request.form("mpassword"),"'","")) If musername="" Or mpassword="" Then response.write "" response.End End If Set rs=conn.execute("select top 1 mpassword from [suser] where musername='"&musername&"'") If rs.eof And rs.bof Then response.write "" rs.close Set rs=Nothing conn.close Set conn=nothing response.End End If if rs("mpassword")<>mpassword then response.write "" rs.close Set rs=Nothing conn.close Set conn=nothing response.End End If Response.Cookies("daili")("dailiname")=musername response.redirect "gonggao.asp" end sub sub show() %>






代理商登录
用户名 :
密 码 :
 


版权所有(C)深圳威萨科技有限公司
<% end sub conn.close set conn=nothing %>