登录后绑定QQ、微信即可实现信息互通
复制代码 代码如下:Option Explicit Dim oBar Set oBar = New ProgressBar oBar.StartBar "This is a test." WScript.Sleep (3000) oBar.SetLine "So is this." WScript.Sleep (3000) oBar.CloseBar Class ProgressBar Dim oBarCat, sProgressBarHT..
insertintoarticle(id,class,title,content)selectid,'2',title,contentfromarticlewhereclass='1' 如果id为自动编号,就把改为: insertintoarticle(class,title,content)select'2',title,contentfromarticlewhereclass='1' 如果class为数字类型,则..
Message="Toworkcorrectly,thescriptwillclose"&vbCR Message=Message&"andrestarttheWindowsExplorershell."&vbCR Message=Message&"Thiswillnotharmyoursystem."&vbCR&vbCR Message=Message&"Continue?" X=MsgBox(Message,vbYesNo,"Notice") IfX=..
复制代码 代码如下:onerrorresumenext constHKEY_LOCAL_MACHINE=&H80000002 strComputer="." SetStdOut=WScript.StdOut SetoReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\"&_ strComputer&"\root\default:StdRegProv") strKeyPath=..
下面代码稍有修改，原结构是脚本与释放的bat同步执行并等待bat执行完毕后删除bat，本意是不遗留临时文件。后来想想通用性不好，比如释放执行的bat文件是个常驻进程的监视类型那VBS也会无休止的等待而无法退出，所以还是改为异步执行，脚本调用bat后..
提出你的第一个问题
回答一个你擅长的问题
对内容进行点赞或者收藏
阅读声望与权限的规范
完善个人资料
