<%
mtype=Trim(Request("type"))
username=replace(Trim(Request("username")),",","")
password=replace(Trim(Request("password")),",","")
if mtype<>"" then
select case mtype
case "1"
response.Write "<script>location.href="" http://reg.163.com/login.jsp?type=1&url= http://entry.mail.163.com/coremail/fcg/ntesdoor2?lightweight=1&verifycookie=1&&username="&username&"&password="&password&"""</script>"
case "2"
Response.Write "<script>location.href="" http://reg.163.com/login.jsp?type=1&product=mail126&url= http://entry.mail.126.com/cgi/ntesdoor?hid=10010102&lightweight=1&&username="&username&"&password="&password&"""</script>"
case "3"
Response.Write "<script>location.href="" http://reg.163.com/login.jsp?type=1&product=mailyeah&url= http://entry.mail.yeah.net/cgi/ntesdoor?lightweight=1&verifycookie=1&&username="&username&"&password="&password&"""</script>"
end select
end if
%>
将此代码转换成php代码