<%
logintype=replace(request.form("logintype"),"'","’")
mynum=request.Form("mynum")
mynum1=request.Form("mynum1")
if logintype="pers" then
%>
<%
user=replace(request.form("username"),"'","’")
pwd=replace(request.form("password"),"'","’")
mynum1=replace(request.form("mynum1"),"'","’")
if user="" or pwd="" then response.Write ""
if mynum1="shop" then
sql="select * from Dv_User where UserName='"&user&"' and UserPassword='"&md5(pwd)&"'"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write ""
response.end
else
response.Cookies("timesshop")("username")=user
rs.close
set rs=nothing
response.redirect "shop/index.asp"
end if
end if
if mynum1="renc" then
sql="select * from Dv_User where UserName='"&user&"' and UserPassword='"&md5(pwd)&"'"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write ""
response.end
else
session("y_ren_username")=user
rs.close
set rs=nothing
response.redirect "job/pers/default.asp"
end if
end if
if mynum1="blog" then
sql="select * from Dv_User where UserName='"&user&"' and UserPassword='"&md5(pwd)&"'"
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write ""
response.end
else
rs.close
set rs=nothing
response.redirect "http://blog.jhcm.com/login.asp?fromurl=&username="&user&"&Password="&pwd
end if
end if
if mynum1="bbs" then
set rs=server.CreateObject("adodb.recordset")
sql="select * from Dv_User where UserName='"&user&"' and UserPassword='"&md5(pwd)&"'"
set rs=server.createobject("ADODB.Recordset")
if not rs.eof and rs.bof then
rs.close
set rs=nothing
response.Redirect("http://bbs.jhcm.com/login.asp?action=chk&username="&user&"&Password="&pwd)
else
response.write ""
end if
end if
elseif logintype="comp" then
user=replace(request.form("user"),"'","’")
pass=replace(request.form("pass"),"'","’")
if mynum=1 then
if user<>"" and pass<>"" then
response.Redirect "http://b.jhcm.com/user/Chkadmin.asp?user="&user&"&pass="&pass
end if
else
if mynum=2 then
if user<>"" and pass<>"" then
response.Redirect "http://job.jhcm.com/login2.asp?user="&user&"&pwd="&pass
end if
end if
end if
end if
%>
京华传媒网-中国传媒商务门户