⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 save.asp

📁 功能强大的一个b/s工作站
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="set.asp"-->
<!--#include file="const.asp"-->
<%  ipcheck()
'****************************************************************
on error resume next
if DateDiff("s",Session("kenanbookpost"),now())<kenanbooktime then
  Response.Redirect("error.asp?err=102")
end if
'****************************************************************
	user   =Request.Form("name") 
	sex    =Request.Form("sex")
	email  =Trim(Request.Form("email"))
	url    =Trim(Request.Form("homepage"))
	adress =Request.Form("from")
	title  =Request.Form("title")
    content=request.Form("guestcontent")
	faceimg=request.Form("face")
	IP     =Request.servervariables("REMOTE_ADDR")
	qq     =Trim(Request.Form("oicq"))
	hide   =Request.Form("hide")
	em     =Request.Form("em")
	if user="" then Response.Redirect"error.asp?err=101"
	'content=ubbcode(content)
	bad=split(badstr,"|")
	for i=0 to UBound(bad)
		content=Replace(content,bad(i),"**")
	next
	title=server.htmlencode(title)
		bad=split(badstr,"|")
	for i=0 to UBound(bad)
		title=Replace(title,bad(i),"**")
	next
	sql = "insert into content (user,sex,adress,face,QQ,mail,url,title,content,IP,hide,em,time1) values ("
	sql = sql & "'"&user&"','"&sex&"','"&adress&"','"&faceimg&"','"&QQ&"','"&email&"','"&url&"',"
	sql = sql & "'"&title&"','"&content&"','"&IP&"','"&hide&"','"&em&"',now())"
	conn.execute(sql)
	Session("kenanbookpost")=now()
	connclose()
	
%>
<html>
<head><title>留言发表成功!</title>
<meta http-equiv="refresh" content="4;URL=index.asp">
</head>
<body>
<br><br><br>
<p>&nbsp;</p>
<table width="345" height="154" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="263" height="21" background="images/iebg.gif"><IMG 
      src="images/ie.gif" width="17" height="16"><a href="index.asp"><font color="#FFFFFF">签写留言成功。正在返回... 
      ...</font></a></td>
    <td width="82" height="21" align="right" valign="middle" background="images/iebg.gif"><IMG src="images/bbs_off.gif" width="21" height="21" border=0 align=absMiddle><IMG src="images/bbs_mid.gif" name=mid width="21" height="21" border=0 align=absMiddle><IMG src="images/bbs_close.gif" width="21" height="21" border=0 align=absMiddle> 
    </td>
  </tr>
  <tr> 
    <td colspan="2" align="center" background="images/xp_mid.jpg"> 
      <table width="85%" height="92" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="37%" height="50" align="center"><img src="images/mouse.gif" width="32" height="32"></td>
          <td width="63%"><img src="images/loading.gif" width="94" height="27"></td>
        </tr>
        <tr> 
          <td colspan="2" align="center"><a href="index.asp">签写留言成功。正在返回...</a></td>
            
        </tr>
      </table>
    </td>
  </tr>
  <tr> 
    <td height="9" colspan="2"><img src="images/xp_bot.jpg" width="345" height="9"></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -