hyzx_edit_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"))
wherefrom=trim(request("wherefrom"))
texts=trim(request("texts"))
texts=replace(texts,vbcrlf,"<br>")
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("update hyzx set title='"&title&"',fl='"&fl&"',wherefrom='"&wherefrom&"',texts='"&texts&"', addtime='"&addtime&"' where id="&request("id"))
conn.close
response.Redirect("hyzxdel.asp")
response.End
%>