Hello, <%= session("member_name") %> [ Sing out ], Now you can see only members can see products!
<%if request("zid")<>"" then %>%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% webid = "member" webtitle = "Member Center" user = session("session-users") umame = session("member_name") %> <% if request("as")="out" then session("session-users") = "" session("member_name") = "" end if title="Member login" myuser = trim(request.Form("v_user")) mypwd = trim(request.Form("v_pass")) uname = request("u") 'getcode=request.Form("getcode") if myuser <> "" and mypwd <> "" then sqluser = "select * from cuser where c_user='"&myuser&"'" set rsuser = conn.execute ( sqluser ) if rsuser.bof and rsuser.eof then response.Write("") else if rsuser("c_user") = myuser then if rsuser("c_pass") <> mypwd then response.write("") else if rsuser("c_sheng") <> true then response.write("") else session("session-users") = rsuser("c_user") session("login-admin") = true session("member_name")=rsuser("c_name") end if end if end if end if rsuser.close set rsuser = nothing end if %>
Hello, <%= session("member_name") %> [ Sing out ], Now you can see only members can see products!
<%if request("zid")<>"" then %>