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

📄 save.asp

📁 网络书生留言本单用户 v1.0 正式版源码,大家下了就知道怎么用了!
💻 ASP
字号:
<!--#include file="Gbconn.asp" -->
<!--#include file="char.asp" -->
<%
dim g_name,g_email,g_page,g_oicq,g_address,g_face,g_content,g_se,g_ip
g_name = request.Form("g_name")
g_content = UBB(request.form("g_content"))
g_email=replace(request.Form("g_email")," ","")
g_page=replace(request.Form("g_page")," ","")
g_oicq=replace(request.Form("g_oicq")," ","")
g_address=request.Form("g_address")
g_face=request.Form("g_face")
g_se=request.Form("g_se")
g_ip= Request.ServerVariables("REMOTE_ADDR")

set rs=server.createobject("adodb.recordset")
rs.open "select * from gb",conn,3,3
rs.addnew
rs("g_name")=g_name
rs("g_email")=g_email
rs("g_page")=g_page
rs("g_oicq")=g_oicq
rs("g_address")=g_address
rs("g_face")=g_face
rs("g_content")=g_content
if g_se="yes" then
rs("g_se")=true
end if
rs("g_ip")=g_ip
if request.Cookies("qzenetgbuser")<>"" then
rs("g_isu")=true
end if
rs.update
rs.close
conn.close
response.Redirect("guestbook.asp")
%>

⌨️ 快捷键说明

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