zhxxadd_ok.asp

来自「中国库存信息网 完整版 [已通过安全检测]Symantec AntiVirus」· ASP 代码 · 共 30 行

<!--#include file="dbconn.asp"-->
<%
zname=trim(request("zname"))
zdate=trim(request("zdate"))
whereadd=trim(request("whereadd"))
texts=trim(request("texts"))
texts=replace(texts,vbcrlf,"<br>")
addtime=FormatDateTime((now()), 2)
if zname="" then
response.write "<script language=JavaScript>" & "alert('请重新输入展会名称！');" & "history.back()" & "</script>"
response.end
end if
if zdate="" then
response.write "<script language=JavaScript>" & "alert('请重新输入展会时间！');" & "history.back()" & "</script>"
response.end
end if
if whereadd="" then
response.write "<script language=JavaScript>" & "alert('请重新输入信息来源！');" & "history.back()" & "</script>"
response.end
end if
if texts="" then
response.write "<script language=JavaScript>" & "alert('请重新输入展会内容！');" & "history.back()" & "</script>"
response.end
end if
conn.execute("insert into zhxx (zname,zdate,whereadd,addtime,texts) values('"&zname&"','"&zdate&"','"&whereadd&"','"&addtime&"','"&texts&"')")
response.Redirect("zhxxdel.asp")
response.End

%>