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

📄 sqstarmod1.asp

📁 社区天地图文系统(核心:尘缘雅境图文系统) 版本: 1.0 本系统是ASP+ACCESS环境下开发成功
💻 ASP
字号:
<!--#include file=conn.asp--><!--#include file="chkuser.asp" -->
<!--#include file=../include/config.asp-->
<!--#include file="char.inc"--><%
IF request.cookies("KEY")=""  THEN
response.redirect "index_face.asp"
response.end
END IF
dim id
dim lou
dim fullname
dim email
dim sex
dim birthyear,birthmonth,birthday
dim content
dim tel
dim photo
id=trim(request("id"))
fullname=htmlencode(request.form("fullname"))
lou=htmlencode(request.form("lou"))
sex=htmlencode(request.form("sex"))
birthyear=request.form("birthyear")
birthmonth=request.form("birthmonth")
birthday=request.form("birthday")
email=htmlencode(request.form("email"))
content=htmlencode(request.form("content"))
tel=htmlencode(request.form("tel"))
photo=request.form("photo")


set rs=server.createobject("adodb.recordset")
sql="select * from sqstar where id="& id
rs.open sql,conn,3,3
rs("content")=content
rs("fullname")=fullname
rs("lou")=lou
rs("email")=email
rs("sex")=sex
rs("birthyear")=birthyear
rs("birthmonth")=birthmonth
rs("birthday")=birthday
rs("tel")=tel
rs("photo")=photo
rs("logins")=rs("logins")+1
rs.update
  response.write "<script language='javascript'>window.confirm('信息发布成功')</script>"
rs.close
set rs=nothing

conn.close
set conn=nothing
%><body onload=javascript:window.close()></body> 

⌨️ 快捷键说明

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