📄 toadm.asp
字号:
<!-- #include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>投稿成功！</title>
</head>
<body background="images/bj.gif">
<%
name=request("name")
address=request("address")
email=request("email")
title=request("title")
comment=request.form("comment")
comment=replace(comment,"<","<")
name=replace(name,"<","<")
address=replace(address,"<","<")
email=replace(email,"<","<")
title=replace(title,"<","<")
'if len(comment)>250 then comment=left(comment,250)
if name<>"" and comment<>"" then
if left(address,7)="http://" then address=mid(address,8)
if left(email,7)="e-mail:" or left(email,7)="mailto:" then email=mid(email,8)
fortime=formatdatetime(time,4)
datenow=year(now())&"-"&month(now())&"-"&day(now())&" "&fortime
ip=request.ServerVariables("REMOTE_ADDR")
sql="insert into mail (datenow,name,address,email,title,comment,ip) values('" & datenow & "','" & name & "','" & address & "','" & email & "','" & title & "','" & comment &"','"&ip& "')"
conn.execute(sql)
response.write "<font size=+2 color=red><br><br><center><b>投稿成功！</b></font><br><br><a href=JavaScript:history.back();>请返回</a></center>"
conn.close
else
response.write "<font size=+2 color=red><br><br><br><center>项目填写不完整!<a href=JavaScript:history.back();>请返回</a></center></font>"
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -