📄 addlinks2.asp
字号:
<html>
<head>
<!--#include file="inc.asp" -->
<!--#include file="md5.asp" -->
<title>加入友情链接</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-color: #FFFFFF;
}
.textbox {
font-size: 9pt;
color: #006600;
width: 98%;
height: 210px;
line-height: 18pt;
border: 1pt solid #009900;
clear: none;
float: none;
}
td {
font-size: 9pt;
color: #003300;
}
.inttext {
font-size: 9pt;
color: #006600;
border: 1px solid #006600;
}
-->
</style></head>
<script>
ww=window.screen.width/2-200;
hh=window.screen.height/2-144;
function fff(){
window.moveTo(ww,hh);
window.focus();
}
fff();
</script>
<body>
<%
dim action
action=request("action")
select case action
case "go2"
call go2
case "go3"
call go3
case else
call go1
end select
sub go1
mfkiqpl.openmdb
set rs=conn.execute("select id,n6 from setos where id=1")
%>
<table width="400" height="280" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="37"><img src="images/mfk11.gif" width="400" height="37"></td>
</tr>
<tr>
<td height="218" align="center"><textarea name="textarea" rows="14" class="textbox" readonly><%=rs("n6")%></textarea></td>
</tr>
<tr>
<td height="33" align="center" background="images/mfk22.gif"><a href="?action=go2"><img src="images/mfk33.gif" width="97" height="26" border="0"></a></td>
</tr>
</table>
<%
mfkiqpl.closers(rs)
mfkiqpl.closeconn
end sub
sub go2
%>
<table width="400" height="280" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="37"><img src="images/mfk11-1.gif" width="400" height="37"></td>
</tr>
<tr>
<script>
function check(){
if(form1.textfield1.value=="" || form1.textfield2.value=="" || form1.textfield4.value=="" || form1.textfield5.value=="" || form1.textfield6.value=="" || form1.textfield7.value==""){
alert("请检查您的输入！");
return false;
}
if(form1.textfield3.value==""){
if(confirm('您此次操作没有上传您网站的LOGO？\r\r本次链接将以文字的形式显示！\r\r你确定要这样做吗？'))
form1.submit();
else
return false;
}
form1.submit();
}
</script>
<td height="210"><table width="398" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#009900">
<form action="?action=go3" method="post" name="form1">
<tr>
<td width="89" height="30" align="center" bgcolor="#C7FFC4">网站名称</td>
<td width="306" bgcolor="#FFFFFF">
<input name="textfield1" type="text" class="inttext" id="textfield1" size="20"></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#C7FFC4">网站地址</td>
<td bgcolor="#FFFFFF">
<input name="textfield2" type="text" class="inttext" value="http://" size="30"></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#C7FFC4">网站图标</td>
<td bgcolor="#FFFFFF"><iframe frameborder=0 height="25" marginheight=0 marginwidth=0 scrolling=no width=300 src="upload.asp"></iframe></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#C7FFC4">网站简介</td>
<td bgcolor="#FFFFFF">
<input name="textfield4" type="text" class="inttext" size="40"></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#C7FFC4">你的用户</td>
<td bgcolor="#FFFFFF">
<input name="textfield5" type="text" class="inttext" size="15"></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#C7FFC4">你的密码</td>
<td bgcolor="#FFFFFF">
<input name="textfield6" type="password" class="inttext" size="15"></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#C7FFC4">你的邮件</td>
<td bgcolor="#FFFFFF">
<input name="textfield7" type="text" class="inttext" value="@" size="30">
<input name="textfield3" type="hidden" class="inttext"></td>
</tr>
</form>
</table></td>
</tr>
<tr>
<td height="33" align="center" background="images/mfk22.gif"><img src="images/mfk33.gif" width="97" height="26" onClick="check();" style="cursor:hand; "></td>
</tr>
</table>
<%
end sub
sub go3
mfkiqpl.openmdb
dim webname,weburl,webbio,weblogo,webmasterid,webmasterpsd,webmasteremail
webname=mfkiqpl.checkstr(mfkiqpl.getstr("textfield1"))
weburl=mfkiqpl.checkstr(mfkiqpl.getstr("textfield2"))
weblogo=mfkiqpl.checkstr(mfkiqpl.getstr("textfield3"))
webbio=mfkiqpl.checkstr(mfkiqpl.getstr("textfield4"))
webmasterid=mfkiqpl.checkstr(mfkiqpl.getstr("textfield5"))
webmasterpsd=md5(mfkiqpl.checkstr(mfkiqpl.getstr("textfield6")))
webmasteremail=mfkiqpl.checkstr(mfkiqpl.getstr("textfield7"))
sql="insert into links (webname,weburl,weblogo,webbio,webmasterid,webmasterpsd,webmasteremail)"&_
"values('"&webname&"','"&weburl&"','"&weblogo&"','"&webbio&"','"&webmasterid&"','"&webmasterpsd&"','"&webmasteremail&"')"
conn.execute(sql)
set rs=conn.execute("select id,n3 from setos where id=1")
%>
<table width="400" height="280" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="37"><img src="images/mfk44.gif" width="400" height="37"></td>
</tr>
<tr>
<td height="218" align="center">
感谢您的加入！<br><br>重要提示：
<%
if rs("n3") then
response.write("当前设置为<font color=red>需要验证</font>才显示贵站的链接！<br><br>请等待！我们会在最短的时间内让你本次提交的信息通过验证！<br><br>还请近快在贵站做好本站的链接，这是通过验证的凭证！")
else
response.write("当前设置为<font color=red>不需要验证</font>！<br><br>请去查看你的链接情况！<br><br>还请近快在贵站做好本站的链接！")
end if
%>
</td>
</tr>
<tr>
<td height="33" align="center" background="images/mfk22.gif"><a href="javascript:alert('没有下一步了！加入链接部分做完！');window.close();"><img src="images/mfk33.gif" width="97" height="26" border="0"></a></td>
</tr>
</table>
<%
mfkiqpl.closers(rs)
mfkiqpl.closeconn
end sub
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -