当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp在线执行sql语句的函数

ASP
深入研究Application和Session对象(2)
深入研究Application和Session对象(3)
开始 .Net的旅程(一)
开始 .Net的旅程(二)
手把手教你使用VB来创建ASP组件(1)
手把手教你使用VB来创建ASP组件(2)
手把手教你使用VB来创建ASP组件(3)
手把手教你使用VB来创建ASP组件(4)
手把手教你使用VB来创建ASP组件(5)
手把手教你使用VB来创建ASP组件(6)
手把手教你使用VB来创建ASP组件(7)
手把手教你使用Java来编写ASP组件(1)
手把手教你使用Java来编写ASP组件(2)
手把手教你使用Java来编写ASP组件(3)
手把手教你使用Java来编写ASP组件(4)
手把手教你使用Java来编写ASP组件(5)
手把手教你使用Java来编写ASP组件(6)
ASP 3.0高级编程(二十四)
ASP 3.0高级编程(二十五)
ASP 3.0高级编程(二十六)

ASP 中的 asp在线执行sql语句的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 217 ::
收藏到网摘: n/a

好多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