mofei_save.asp

来自「功能说明： 1.支持UBB 2.支持版主回复. 3.支持留言删除. 4.」· ASP 代码 · 共 54 行

<%@ language="VBScript"%>
<!--#include file="conn.asp"-->
<!--#include file="mofei_ubb.asp"-->
<%
use1=request.form("use001")
email1=request.form("email001")
qq1=request.form("qq001")
home1=request.form("home001")
where1=request.form("where001")
face1=request.form("face001")
title1=request.form("title001")

mofei1=request.form("mofei001")
mofei1=htmlencode2(mofei1)
mofei1=UBBDecode(mofei1)

ip1=Request.servervariables("REMOTE_ADDR")

if use1="" or email1="" or title1="" or mofei1="" then
%>
<!--#include file="mofei_head.asp"-->
<p></p>
<p></p>
<p></p>
<table border="0" cellpadding="0" cellspacing="0" width="600" align="center" bgcolor="#FFFFFF">
    <tr>
      <td height="25" background="mofeiimg/login_bg.gif">
        <p align="center"><b><font size="3" color="#FFFF00">: : 将乐留言本 
        : : 发现错误</font></b></td>
    </tr>
    <tr>
      <td height="30">
   请<a href="javascript:history.go(-1)">后退</a>填写完整资料!              
       </td>      
    </tr>      
    <tr>      
      <td height="30" bgcolor="#F9F9F9">      
    <img border="0" src="mofeiimg/login_stop.gif"><font  color="#FF0000">您的用户名,邮件,标题,内容可能为空!</font> 
      </td>      
    </tr>      
    <tr>      
      <td height="30">     
          
      </td>      
    </tr>           
  </table>
<!--#include file="mofei_foot.asp"-->
<%else
set sql=conn.execute("Insert Into mofeibook(use_,email_,qq_,home_,where_,face_,title_,mofei_,ip_,time_) Values ('"&use1&"','"&email1&"','"&qq1&"','"&home1&"','"&where1&"','"&face1&"','"&title1&"','"&mofei1&"','"&ip1&"','"&now()&"')")
set sql=nothing
response.redirect("default.asp")
end if
%>