vbs可以通过SeleniumBasic调用浏览器webdriver，操作chrome、edge、firefox等主流浏览器，解决windows没有ie对象时的问题。

被锁机代码vbs.锁住了怎么办求求大神帮忙

有时，在百度贴吧发帖或在知道回答别人问题时，经常会贴一些代码。但是由于这两个地方不支持制表符(TAB发送)，当我们发送带有制表符的代码时会被自动替换为一个空格，所以我们发的代码会因为没有层次而显得很乱。就算代码写的再好看上去也像一堆垃圾，像这样： main() { long int i; int bonus1,bonus2,bonus4,bonus6,bonus10,bonus; scanf("%ld",&i); bonus1=100000*0.1;bonus2=bonus1+100000*0.75; bonus4=bonus2+200000*0.5; bonus6=bonus4+200000*0.3; bonus10=bonus6+400000*0.15; if(i<

=======================================源码======================================= Dim Program1 'qq运行程序地址 Program1= "C:\Program Files (x86)\Tencent\QQ\Bin\QQScLauncher.exe" Set WshShell=createobject("wscript.shell") Set oExec=WshShell.Exec(Program1) WScript.Sleep 1000 '这个聚焦窗口可加可不加 WshShell.AppActivate "QQ" WshShell.SendKeys "+{TAB}" WshShell.SendKeys "qq号码" WScript.Sleep 200 WshShell.SendKeys "{TAB}" WshShell.SendKeys "qq密码" WScript.Sleep 200 WshShell.SendKeys "{ENTER}

现在我也会vbs进度条了

是这样的 sub sub_(f) f=6 end sub function function_(f) f=6 end function dim m,n m=7 n=7 msgbox "第一次"&cstr(m)&"/"&cstr(n) sub_(m) call function_(n) msgbox "第二次"&cstr(m)&"/"&cstr(n) 运行结果： 第一次7/7 第二次7/6 这里sub仍然是默认按值，但是function却是默认按引用的，不管是call还是返回给别人还是去括号都是这样，只有显式byval才能按值。 到网上搜或者问ai都是给出sub和function默认都是按值的结果，我也不知道这个情况是什么时候出现

快捷键 win+PrScrn 怎样用ahk代码执行 谢谢各位帮忙

一样也可能是我家vbs比较特殊，或者放弃更新之后vbs的暗改（应该吧），关于类型转化 "xxx"&6&"xxx"，在这里期望的结果是6被转化为"6"写进字符串，但是实际情况是报“语句未结束”错误。 这并不是因为隐式转化类型在字符串拼接里失效，因为如果这个6变成带有8或9的数字就能成功转化，同时诸如 "加一个空格"& 6 "打个括号"&(6) 同样也能成功转化，综合看来，可能是因为在识别"xxx"&6&"xxx&

冰雹数跌落到1进行的步骤，及其中的峰值。其他都没问题，就是这个峰值老是出问题，一直显示的初始值。

无法启动vbs文件，显示这个问题怎么办

今天才刷到，去年5月份的微软就已经通知了

就和python一样，到时一键安装就可以继续使用vbs来编写脚本，已经在做了。不过介于现在24h2这么高的配置要求，相信windows新版的系统不会那么容易普及，我都还在死守win7

网上搜的一些都不好用，其它按键都好用。就小键盘的数字键模拟不了，求大佬回复下。 我就想用VBS控制鼠标。

小弟下的单机游戏，之前一直玩的好好的，就昨天退出去吃了个饭，回来再打开，就跳出这个 \windows-x86_64\say. vbs”失败(文件名、目录名或卷标语法不正确。)。 把游戏删了，重新下载后，依旧跳出这个，求各位大神帮下小弟

　　　　--本回复最终解释权归属丶韩菱纱_所有~~~~！！！

电脑被VBs代码锁机了，咋办

求一个vbsedit中文破解版乳胶漆，网站下的都用不了啊，哪个大佬帮帮忙急急急急

作为一个什么都不懂的小白，想问一下最基础的msgbox("A") msgbox("B") msgbox("C") 按照常理，通过点击分别会弹出弹窗A，弹窗B和弹窗C，随后关闭，但是如果我在弹出弹窗A或者B的时候不想要让他继续进行下去了，有什么办法可以迅速终止这个弹窗吗，像是在弹出弹窗a的时候，我点击右上角的x就可以立即终止这个弹窗，不会继续进行下去之类的。

不注意按到alt加空格，然后就出现了下标越界的报错，实在是不知道怎么解决了

本人是小白，对这个不是很了解，麻烦帮我看一下这是哪里出了问题。我只是想用一下高级筛选功能。这个是在wps里面的。

再次发布我的作品！！ 这次是雨云病毒专杀，一个专门用于清除雨云病毒的专杀软件。 根据雨云病毒源代码对应写成，总共制作用时（哎呀**失败，我也忘了时间了，总之时间很长我很辛苦就是了，哈哈）

一直想学会vbs调用win32API（主要是想搞坏事XD），但以前自己怎么学也学不明白，现在对照着微软的api文档和dwx的文档终于搞明白了

如题，例如： 对象Obj有 A1,A2,A3 这种规律属性名的属性，比如现在简单做个循环，分别获取 A1,A2,A3，但是Obj.A&1这种语法是错误的，我刚接触VBS，请问使用什么语法或者方法能够根据字符串名称来调用 Obj的 A1~3 属性呢？

为什么我写的无限按“1”的vbs脚本在qq输入能工作而在造梦西游3里又无反应呢，字母可以。 set ws=createobject("wscript.shell") do ws.sendkeys "{L}" wscript.sleep 20 ws.sendkeys "{1}" wscript.sleep 200 loop

#$language = "VBScript" #$interface = "1.0" crt.Screen.Synchronous = TRUE dim str,result,Currentdate,CurrentTime,i,timestr str=" test result: " result="OK!" i=999999 j=0 Set ws = CreateObject("WScript.Shell") Sub Main do until i=0 crt.Screen.Send "admin" crt.Screen.Send chr(13) crt.Sleep 2000 crt.Screen.Send "ssdx123" crt.Screen.Send chr(13) crt.Sleep 2000 j = j + 1 crt.Screen.Send j crt.Sleep 1000 crt.Screen.Send chr(13) crt.Sleep 2000 crt.Screen.Send "ping 1.0.1.28" crt.Screen.Send chr(13) crt.Sleep 5000 ws.SendK

我想写一个切换窗口程序的脚本 但是现在只能两个窗口切换 我想三个窗口切换怎么办 怎么才能实现多按一次tab

我用西门子的wincc连接，用的是vbs，sql版本是2019，到conn.open就不执行了，也就是链接不上

我用ai写了个vbs程序，默认打开方式程序是windows based script host，双击是没问题的，能正常运行。但是用win10的计划程序自动运行这个软件的时候，一直会弹出“如何打开这个文件”，这个该怎么弄呢

vbs只能恶搞？只有msgbox？ 看看vbs吧到底走了多少老人 又有多少人死潜了 不是vbs功能不强大 是你只会msgbox！！！

电脑把文本后戳改为vbs，没有反应，怎么解决，是缺少那个文件

resizeWorkingPane这个方法是如何使用的呀？在网上没有找到(=ﾟДﾟ=)

我在客户机上做了一个VBS脚本，读取计算机名称。 strComputerName = CreateObject("WScript.Network").ComputerName WScript.Echo strComputerName WScript.Quit 执行正常。 通过一个BAT文件启动，也正常。 我在主机上使用PSexec工具远程启动BAT文件，显示执行完成，但是客户机上没有反应。 请大神帮忙看看哪里有问题！

一楼防吞

我想把D盘的文件夹搬运到C盘的文件夹里，第一张图片文件夹名stuff的成功了，而第二张图片里名为题库的文件夹就一直没有成功，请问是中文在这里是需要用什么特殊符号吗#vbs##编程##U盘复制#？

在线等

在找自动生成文件夹的批命令时遇到的，不会用，麻烦帮忙看看，VBS版一键保存代码为批处理工具 VBS版一键保存代码为批处理工具

各位大佬，这是哪的错误求解

各位老哥好，今天找通义千问写的代码遇到了如图所示上的报错。 代码全文如下： ' 获取脚本当前所在目录的绝对路径 Dim wshShell Set wshShell = CreateObject("WScript.Shell") strCurDir = wshShell.CurrentDirectory Set objExcel = CreateObject("Excel.Application") objExcel.Visible = False ' 打开输入文件 Const INPUT_FILE_PATH = "1.csv" Set objWorkbookInput = objExcel.Workbooks.Open(strCurDir & "\" & INPUT_FILE_PATH) Set objWorksheetInput = objWorkbookInput.Worksheets(1) ' 创建新的Excel

如题。 咱是门外汉，27号去玩魔兽世界 有时候需要出门 所以需要一个能自动原地跳的vbs防止掉线

截图代码已经写好了，但是不知道怎么把剪贴板中的图片变成文件并加密成RAR。 data = "4D5A90000300000004000000FFFF0000B800000000000000400000000000000000000000000000000000000000000000000000000000000000000000C00000000E1FBA0E00B409CD21B8014CCD21546869732070726F6772616D2063616E6E6F742062652072756E20696E20444F53206D6F64652E0D0D0A2400000000000000450E6EDA016F0089016F0089016F0089016F0189006F008963701389026F0089E9700B89006F008952696368016F008900000000000000000000000000000000504500004C01010017E773460000000000000000E0000F010B0106000000000000040000000000008011000000100000001000

计算个1000000以内素数个数就要很久。

请问怎么恢复正常？

只能一项一项地重复写出来吗？

读取的数据有中文 微信收到的只有前面数字 编码问题？