复制代码 代码如下:
functiongfv(str)
gfv=request.form(str)
endfunction
subexecutesql
dimcontent:content=gfv("content")
onerrorresumenext
conn.begintrans
conn.execute(content)
iferr.number<>0then
err.clear
conn.rollback
conn.close:setconn=nothing
callalertbox("抱歉!sql语句输入错误!",2)
else
conn.committrans
conn.close:setconn=nothing
callalertbox("恭喜!sql语句执行完毕!",2)
endif
endsub
网站建设 IT知识 IT知识教程 asp在线执行sql语句的函数 
最新文章
热门文章
猜你喜欢
