|
好多asp后台都提供了一个可以在线执行sql语句的功能，今天看到了，用到了事务管理，就是出错了就回滚的操作，不错，建议大家看看，以后能用的到
复制代码 代码如下:
function gfv(str)
gfv = request.form(str)
end function
sub executesql
dim content:content = gfv("content")
on error resume next
conn.begintrans
conn.execute(content)
if err.number <> 0 then
err.clear
conn.rollback
conn.close:set conn = nothing
call alertbox("抱歉!sql语句输入错误!",2)
else
conn.committrans
conn.close:set conn = nothing
call alertbox("恭喜!sql语句执行完毕!",2)
end if
end sub
| 
发表于 2008-3-5 14:31:03
