hyzxadd_ok.asp

中国库存信息网 完整版 [已通过安全检测]Symantec AntiVirus 企业版 10.0.0.0.359 ║ ║ [病毒定义文件版本] 2006-5-5 rev.24 ║ ║ [已通

<!--#include file="dbconn.asp"-->
<%
title=trim(request("title"))
fl=trim(request("fl"))
texts=trim(request("texts"))
texts=replace(texts,vbcrlf,"<br>")
wherefrom=trim(request("wherefrom"))
addtime=FormatDateTime((now()), 2)
if title="" 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
if wherefrom="" then
response.write "<script language=JavaScript>" & "alert('请重新输入信息来源！');" & "history.back()" & "</script>"
response.end
end if

conn.execute("insert into hyzx (title,fl,texts,wherefrom,addtime) values('"&title&"','"&fl&"','"&texts&"','"&wherefrom&"','"&addtime&"')")
response.Redirect("hyzxdel.asp")
response.End

%>