当前位置:主页 > 查看内容

asp在线执行sql语句的函数

发布时间:2021-07-07 00:00| 位朋友查看

简介:复制代码 代码如下: functiongfv(str) gfv=request.form(str) endfunction subexecutesql dimcontent:content=gfv("content") onerrorresumenext conn.begintrans conn.execute(content) iferr.number0then err.clear conn.rollback conn.close:setconn=noth……

复制代码 代码如下:

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


原文链接:https://m.jb51.net/article/13677.htm
本站部分内容转载于网络,版权归原作者所有,转载之目的在于传播更多优秀技术内容,如有侵权请联系QQ/微信:153890879删除,谢谢!

推荐图文


随机推荐