adprua.asp

来自「一套asp编写的供求信息发布网站 一套asp编写的供求信息发布网站」· ASP 代码 · 共 10 行

<%if session("loc")=0 then response.redirect "admin.asp"
if trim(request("t1"))<>"" then
set com=server.createobject("adodb.connection")
com.open "DBQ="& Server.MapPath("../joh20msg.mdb")  &";Driver={Microsoft Access Driver (*.mdb)};"
sz = "'" & request("t1") & "','" & request("t2") & "'" 
com.Execute("INSERT INTO news ( tit,msg ) VALUES(" & sz & ")")
com.close
end if
response.redirect "adpru.asp"%>