📄 kukoowritewish.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="inc/function.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>张贴爱墙字条 - 最好的免费爱墙|仿QQ爱墙程序|ASP爱墙程序下载</title>
<meta name="Author" content="酷酷网,KuKoo.Net" />
<meta name="Keywords" content="酷酷爱墙程序 ASP爱墙程序下载 仿QQ爱墙程序 免费爱墙 Lovewall 完美爱墙许愿树程序源码 爱墙程序下载 爱墙博客 爱情许愿树 许愿树源码" />
<meta name="Description" content="酷酷爱墙是互联网最好的免费爱墙网,所开发的ASP爱墙程序也是最安全零漏洞的完美爱墙程序,比什么QQ爱墙、天涯爱墙程序强得离谱^ǒ^" />
<style><!--@import url(inc/add.css);--></style>
<style><!--@import url(inc/layer.css);--></style>
<script type="text/javascript" src="inc/add.js"></script>
<script type="text/javascript" src="inc/common.js"></script>
</head>
<%
Select Case request("cmd")
Case "save"
Call SaveLove()
End Select
Sub SaveLove()
If request("KuKoo_Sender")="" Or request("KuKoo_WishContent")="" Or request("key")="" Then
response.write "<script type='text/javascript'>alert('含“*”项必填!');history.go(-1);</script>"
response.End
Else
Dim key,getcode
key = Int(request("key"))
getcode = Int(session("getcode"))
If key <> getcode Then
response.write "<script type='text/javascript'>alert('验证码错误!');history.go(-1);</script>"
response.End
End If
End If
Dim KuKoo_Sender,KuKoo_Picker,KuKoo_WishContent
KuKoo_Sender = Trim(request("KuKoo_Sender"))
KuKoo_Picker = Trim(request("KuKoo_Picker"))
KuKoo_WishContent = Trim(request("KuKoo_WishContent"))
If BadWord(KuKoo_Sender,Badwords) Or BadWord(KuKoo_Picker,Badwords) Or BadWord(KuKoo_WishContent,Badwords) Then
response.write "<script type='text/javascript'>alert('请删除禁用词!');history.go(-1);</script>"
response.End
End If
Dim KuKoo_Icon,KuKoo_Face,KuKoo_WishIP,KuKoo_WishDate
KuKoo_Icon=ReplaceBadChar(request("KuKoo_Icon"))
KuKoo_Face=ReplaceBadChar(request("KuKoo_Face"))
KuKoo_Sender=ReplaceBadChar(KuKoo_Sender)
KuKoo_SenderQQ=request("KuKoo_SenderQQ")
if KuKoo_SenderQQ = "" or KuKoo_SenderQQ="QQ号码" then KuKoo_SenderQQ=0
KuKoo_Picker=ReplaceBadChar(KuKoo_Picker)
If KuKoo_Icon="" Then KuKoo_Icon="0"
If KuKoo_Face="" Then KuKoo_Face="0"
If KuKoo_Sender="" Then KuKoo_Sender="匿名"
If KuKoo_Picker="" Then KuKoo_Picker=" "
KuKoo_WishContent=HTMLEncode(CutStr(KuKoo_WishContent,150))
KuKoo_WishIP=GetIP()
KuKoo_ComeFrom=getFrom(KuKoo_WishIP)
KuKoo_WishDate=Now()
Dim sql,rs,KuKoo_WishID
sql="Select * From [KuKoo_LoveWallPosts]"
Set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
rs.addnew
rs("KuKoo_WishContent")=KuKoo_WishContent
rs("KuKoo_Sender")=KuKoo_Sender
rs("KuKoo_Picker")=KuKoo_Picker
rs("KuKoo_SenderQQ")=KuKoo_SenderQQ
rs("KuKoo_WishIP")=KuKoo_WishIP
rs("KuKoo_WishDate")=KuKoo_WishDate
rs("KuKoo_Icon")=KuKoo_Icon
rs("KuKoo_Face")=KuKoo_Face
rs("KuKoo_ComeFrom")=KuKoo_ComeFrom
rs.update
KuKoo_WishID=rs("KuKoo_WishID")
rs.close
Set rs = Nothing
conn.close
Set Conn = Nothing
response.write "<script type='text/javascript'>alert('发表字条成功!\n你的爱墙号是:"&KuKoo_WishID&" ');location.href='default.asp';</script>"
End Sub
%>
<body>
<div id="header">
<img src="images/LoveLogo.jpg" style=" width:180px; height:82px; border:none;" />
</div>
<div id="menu">
<a href="default.asp"><img src="images/btn_index.gif" alt="爱墙首页" /></a>
<a href="KuKoowriteWish.asp"><img src="images/btn_add.gif" alt="发表字条" /></a>
<a href="KuKoowishList.asp"><img src="images/btn_list.gif" alt="字条列表" /></a>
<a href="KuKoowishList.asp?flag=rank"><img src="images/rank.gif" alt="帖排行" /></a>
<a href="about.htm"><img src="images/btn_code.gif" alt="爱墙程序" /></a>
<input name="sKey" id="sKey" class="input" type="text" value="爱墙号" size="7" onclick="this.value = '';" />
<input type="image" src="images/btn_search.gif" onclick="FindLove()" alt="搜索" />
</div>
<div id="mainList">
<table width="750" border="0" cellspacing="1" cellpadding="0" class="StepTable">
<form method="post" action="" name="frmAdd">
<input type="hidden" name="KuKoo_Face" value="0" />
<input type="hidden" name="KuKoo_Icon" value="0" />
<input type="hidden" name="cmd" value="save" />
<tr>
<td colspan="2" class="Step">↓↓↓请把本站告诉你QQ上的5位好友</td>
</tr>
<tr>
<th>祝福对象:</th>
<td><input name="KuKoo_Picker" type="text" size="15" maxlength="10" value="" onkeyup="javascript:InputName(this,'Head');" /></td>
</tr>
<tr>
<th>您的姓名:</th>
<td><input name="KuKoo_Sender" type="text" size="15" maxlength="10" onkeyup="javascript:InputName(this,'Sign');" value="匿名" onclick="if(this.value =='匿名') this.value=''; "/> <span class="red">*</span></td>
</tr>
<tr>
<th>您的QQ号码:</th>
<td><input name="KuKoo_SenderQQ" type="text" size="15" maxlength="10" value="QQ号码" onclick="if(this.value =='QQ号码') this.value=''; " onpaste="var s=clipboardData.getData('text'); if(!/\D/.test(s))value=s.replace(/^0*/,''); return false;" onKeyUp="if(/(^0+)/.test(value))value=value.replace(/^0*/, '')" onKeyPress="return event.keyCode>=48 && event.keyCode<=57;"/> </td>
</tr>
<tr>
<th>字条内容:</th>
<td><textarea name="KuKoo_WishContent" cols="60" rows="4" onkeyup="javascript:strCounter(this);" onchange="javascript:strCounter(this);"></textarea> <span class="red">*</span><br />还可以输入<span class="Char" id="Char"> 70 </span>个字,不支持html语法。</td>
</tr>
<tr>
<th>选择字条颜色:</th>
<td>
<span class="colorBlock0" onclick="FaceChoose('0')"></span>
<span class="colorBlock1" onclick="FaceChoose('1')"></span>
<span class="colorBlock2" onclick="FaceChoose('2')"></span>
<span class="colorBlock3" onclick="FaceChoose('3')"></span>
<span class="colorBlock4" onclick="FaceChoose('4')"></span>
<span class="colorBlock5" onclick="FaceChoose('5')"></span>
</td>
</tr>
<tr>
<th>选择心情图案:</th>
<td>
<img class="iconBox" src="images/icon_0.gif" onclick="javascript:IconChange('0');" />
<img class="iconBox" src="images/icon_1.gif" onclick="javascript:IconChange('1');" />
<img class="iconBox" src="images/icon_2.gif" onclick="javascript:IconChange('2');" />
<img class="iconBox" src="images/icon_3.gif" onclick="javascript:IconChange('3');" />
<img class="iconBox" src="images/icon_4.gif" onclick="javascript:IconChange('4');" />
<img class="iconBox" src="images/icon_5.gif" onclick="javascript:IconChange('5');" />
<img class="iconBox" src="images/icon_6.gif" onclick="javascript:IconChange('6');" />
<img class="iconBox" src="images/icon_7.gif" onclick="javascript:IconChange('7');" />
<img class="iconBox" src="images/icon_8.gif" onclick="javascript:IconChange('8');" />
<img class="iconBox" src="images/icon_9.gif" onclick="javascript:IconChange('9');" />
<img class="iconBox" src="images/icon_10.gif" onclick="javascript:IconChange('10');" />
<img class="iconBox" src="images/icon_11.gif" onclick="javascript:IconChange('11');" />
<img class="iconBox" src="images/icon_12.gif" onclick="javascript:IconChange('12');" />
<img class="iconBox" src="images/icon_13.gif" onclick="javascript:IconChange('13');" />
<img class="iconBox" src="images/icon_14.gif" onclick="javascript:IconChange('14');" />
<img class="iconBox" src="images/icon_15.gif" onclick="javascript:IconChange('15');" />
</td>
</tr>
<tr>
<th>验证码:</th>
<td><input name="key" type="text" value="" size="6" maxlength="4" onfocus="this.value='';" onpaste="var s=clipboardData.getData('text'); if(!/\D/.test(s))value=s.replace(/^0*/,''); return false;" onKeyUp="if(/(^0+)/.test(value))value=value.replace(/^0*/, '')" onKeyPress="return event.keyCode>=48 && event.keyCode<=57;" /> <span class="red">*</span> 请输入右边数字:<img src="inc/getcode.asp" /></td>
</tr>
<tr>
<th>操作:</th>
<td><input name="image" type="image" src="images/btn_next.gif" /></td>
</tr>
</form>
</table>
<div id="Peview">
<div id="infoAD">
<p><strong>酷酷爱墙声明:</strong><br />您发布字条即表示同意遵守以下条款:<br />一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;<br />二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;<br />三、本站对您所发布内容拥有处置权。</p>
</div>
<div id="Message" class="Style0">
<p class="Num">字条预览:<img src="images/close.gif" alt="关闭" /></p>
<p class="Detail"><img src="images/icon_0.gif" width="50" height="50" id="IconImg" /><span class="Head" id="Head"></span><br /><span id="AreaText"></span></p>
<p class="Sign" id="Sign">匿名</p>
<p class="Date"><script type="text/javascript">getTime()</script></p>
</div>
</div>
<div style="clear:both;"></div>
</div>
<div id="footer">
<!--#include file="foot.asp" -->
<%=Kukoo_Reserve%>
</div>
<%=Bottom%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -