邮箱登录代码--ASP编程[转]

cpubbs · 发表于 2005-7-4 07:16:34

把这部分放在：<head>与</head>之间

<

><SCRIPT language=jscript>
//By DimASP
function check(obj){
var url=""
var lname=obj.LoginName.value
var lpass=obj.passwd.value
var lindex=obj.domain.selectedIndex
if(lname==""){alert("请输入帐号！");return false}
else if(lpass==""){alert("请输入密码！");return false}
else if(lindex==0){alert("请选择邮箱！");return false}
else if(lindex<16){
if(lindex==1) url="http://bjweb.mail.tom.com/cgi/login2?user="+lname+"&pass="+lpass
if(lindex==2) url="http://entry.126.com/cgi/
login?user="+lname+"&pass="+lpass
if(lindex==3) url="http://reg.163.com/in.jsp?url=http://mscan2.163.com/
Unicom.jsp?&username="+lname+"&password="+lpass
if(lindex==4) url="http://login.mail.sohu.com/chkpwd.php?UserName=
"+lname+"&amp

assword="+lpass+"&domain=sohu.com"
if(lindex==5) url="http://mail.sina.com.cn/cgi-bin/login.cgi?u="+lname+"&psw="+lpass
if(lindex==6) url="http://freemail.cnool.net/cgi-win/
login.cgi?username="+lname+"&password="+lpass
if(lindex==7) url="http://mail.2911.net/cgi-bin/mail/main.pl?LOGIN=Log+In&USERNAME="+lname+"&amp

ASSWORD="+lpass
if(lindex==8) url="_billing.jsp?username="+lname+"&password=
"+lpass'>http://mail.citiz.net/
default/login_billing.jsp?username="+lname+"&password="+lpass
if(lindex==9) url="http://mail.diyserver.net/
login.php?login=1&username="+lname+"&password="+lpass
if(lindex==10) url="http://edit.bjs.yahoo.com/config/
login?login="+lname+"&passwd="+lpass+"&.src=ym"
if(lindex==11) url="http://mailgate.hongen.com.cn/
mail/login?user="+lname+"&passwd="+lpass
if(lindex==12) url="_login.jsp?userid="+lname+"&passwd="+lpass+"&ac=mail'>
http://vip.avl.com.cn/mail/gznet_login.jsp?userid=
"+lname+"&passwd="+lpass+"&ac=mail"
if(lindex==13) url="http://wm2.fescomail.net/cgi-bin/
webmail?username="+lname+"&password="+lpass
if(lindex==14) url="http://mail.jzteyao.com.cn/cgi-bin/mail/main.pl?USERNAME="+lname+"&PASSWORD="+lpass+"&LOGIN=Log+In"
if(lindex==15) url="http://freemail.soim.com/cgi-win/
login.cgi?username="+lname+"&password="+lpass
open(url)
}
else{
if(lindex==16){
obj.action="http://61.136.62.69/cgi-bin/login"
obj.Password.value=lpass
}
if(lindex==17){
obj.action="http://mail.ywzc.net/default.asp"
obj.username.value=lname
obj.Password.value=lpass
}
if(lindex==18) obj.action="http://webmail.21cn.com/NULL/NULL/
NULL/NULL/NULL/SignIn.gen"
if(lindex==19) obj.action="http://freemail.china.com/extend/
gb/NULL/NULL/NULL/SignIn.gen"
obj.submit()
}
obj.passwd.value=""
return false
}
</SCRIPT></P>
<P>把这部分放在：<body>与</body>之间</P>
<P><FORM onsubmit="return check(this)" method=post target=_blank>
<CENTER>&nbsp;&nbsp;<SELECT style="WIDTH: 128px; HEIGHT: 22px" name=domain>
<OPTION selected>选择邮箱<OPTION>tom.com<OPTION>126.com<OPTION>163.com<OPTION>sohu.com
<OPTION>sina.com<OPTION>cnnb.net<OPTION>2911.net<OPTION>citiz.net<OPTION>
diyserver.net<OPTION>yahoo.com.cn<OPTION>hongen.com.cn<OPTION>
avl.com.cn<OPTION>fescomail.net<OPTION>jzteyao.com.cn<OPTION>
freemail.soim.com<OPTION>eyou.com<OPTION>ywzc.net<OPTION>21cn.com
<OPTION>mail.china.com</OPTION></SELECT><BR>&nbsp;
帐号：<INPUT size=9 name=LoginName><BR>&nbsp;密码：<INPUT
type=password size=9 name=passwd><BR><INPUT type=submit value=提交>
<INPUT type=reset value=清除> </CENTER></FORM></P>
<P>大家一起努力，争取更大的进步!!!!!!</P>

账号		自动登录	找回密码
密码			注册

LabVIEW+单片机学习套件全套教程资料下载[免费]	LabVIEW论坛精华列表贴	USB0816数据采集卡	《LabVIEW宝典》
LabWindows/CVI论坛精华贴	NET0816以太网数据采集卡	RC0210远程设备授权系统关闭关停	锁定打开设备户外分布式数据采集
NET1624低速高精度以太网数据采集卡	WIFI0824SD无线WIFI网络数据采集卡	脱机运行 SD存储小尺寸微型串口采集	远程采集安卓手持移动采集纪录仪