subbtndel_onclickmsg="确定要删除所有带有标记的问题吗?"ifmsgbox(msg,1,"友情提示!")=1then''msgbox的值1为确定,2为取消form1.action="problemdelete.asp"form1.submitendifendsub

删除时提示是否删除

系统 1803 0
< input type = " button "  value = " 删除 "  id = " btndel "  name = " btndel " >


< script language = " vbscript " >

sub btndel_onclick
    msg
= " 确定要删除所有带有标记的问题吗? "
    
if  msgbox(msg, 1 , " 友情提示! " ) = 1  then      '' msgbox的值1为确定,2为取消
        form1.action 
= " problemdelete.asp "
        form1.submit
    end 
if
end sub
</ script >
 

删除时提示是否删除


更多文章、技术交流、商务合作、联系博主

微信扫码或搜索:z360901061

微信扫一扫加我为好友

QQ号联系: 360901061

您的支持是博主写作最大的动力,如果您喜欢我的文章,感觉我的文章对您有帮助,请用微信扫描下面二维码支持博主2元、5元、10元、20元等您想捐的金额吧,狠狠点击下面给点支持吧,站长非常感激您!手机微信长按不能支付解决办法:请将微信支付二维码保存到相册,切换到微信,然后点击微信右上角扫一扫功能,选择支付二维码完成支付。

【本文对您有帮助就好】

您的支持是博主写作最大的动力,如果您喜欢我的文章,感觉我的文章对您有帮助,请用微信扫描上面二维码支持博主2元、5元、10元、自定义金额等您想捐的金额吧,站长会非常 感谢您的哦!!!

发表我的评论
最新评论 总共0条评论