AI可以自由发挥的途径个人认为不算少，它的自定动作（Custom Actions）可以调用exe/js/vbs等东东，但js和vbs我没什么底子，有点畏难情绪，想用自己熟悉的方式来解决问题，就是用c#写个...所有思来想去，还是决定搞一搞vbs。 只是他娘的，用惯优雅的C#，感觉其它语言就像屎一样，更别说像vbs这种脚本还没什么像样的ISE，总之很佩服主要coding在这些语言上的码农们，完全是受虐。...whatever~一开始本来想找找vbs调用win32 API的方法，如果可以的话，那调一调WritePrivateProfileString就完事了，可找来找去，发现似乎vbs不能直接调API（没找到官方说法...的出处还颇为神秘，搜不到，文件信息和内容也没看出什么端倪，人作者这才是真雷锋啊。...anyway，上述方法对于我做安装包来说，万万不能考虑，所以，还是老实研究地道vbs法，小有成果，分享如下： '函数：设置ini值（ini路径，目标节点，目标键，目标值） '注：若ini文件不存在则创建
Dim fs ,f Const Normal =0,ReadOnly=1,Hidden=2,System=4,Volume=8,Directory=16,Ali...
可能有人不了解，代码在制作的使用，是需要跟vbs搭配，最后成为一个可以运行的代码。那么这个vbs是什么？...image.png 一、vbs是什么 简单来说就是一种脚本语言，是在vb的基础上，建立形成的，更加地简单易上手，可以制作一个小小的代码。...二、vbs简单制作教程 首先第一步是打开一个文本编辑器，随便打开一个文档；第二步就是对文档进行编辑，要记得输入代码，在代码后面加上自己想要说的话，注意要使用英文的标点符号。...最后改为vb后电脑会弹出一个弹窗，提示是否确认要更改文件名，会导致文件不能用，点击确认。这样就做好了想要的vbs代码，点开就可以查看。...全文详细介绍了关于vbs的相关信息，虽然不是一门人人都需要会的技术。但是多学一门知识，并不会有不好的影响，既可以增加自己的学识，也可以增加乐趣，如果有兴趣的话可以学习。
VBS也挺强大的呢，这篇给大家演示的是获取当前时刻，并根据不同的时间段来问好！ 注：编辑器不支持vbs编程，单引号后是注释哦！
pan.baidu.com/s/1GlsJfJPdLuJe3Dbqf0EvpQ 提取码: 7bdb 特点： Blowfish 加密算法，不容易被第三方工具破解； 可以转换javascript和VBScript，转换后的文件不需要...“cscript.exe”和“wscript.exe”的支持就可以运行； 步骤一：点击文件打开要转化的vbs文档。...步骤二：嵌入文件处可以选择转化之后程序的图标，然后点击那个编译图标就可以了。转化后的程序还在原文件夹里。 ? 资源包里还附带了帮助文档，想要了解更多可以看看。 ?...vbs to exe 获取地址：https://pan.baidu.com/s/1a12RR5X_9MOUqjGs6YLwQQ 提取码: 59ck 特点： 选项很多，方便用户使用！
echo 使用方法:本文件执行完毕后, echo 在终端界面按Shift 5次即可登陆系统! ...telnet_tmp.vbs echo WScript.Sleep 300 >>telnet_tmp.vbs echo sh.SendKeys “open 192.168.1.200” >>telnet_tmp.vbs...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...Linux平台 保证你的系统上存在expect这个可执行程序，保存以下代码到文件autoTelnet，并给与执行权限。详细操作察看命令expect #!
vbs整人代码大全，包括强制自动关机、打开无数计算器、无限循环等vbs整人代码，感兴趣的朋友参考下。
ScriptCryptor 小蓝枣的资源仓库，提取码: 7bdb 特点： ① Blowfish 加密算法，不容易被第三方工具破解； ② 可以转换 javascript 和 VBScript，转换后的文件不需要...cscript.exe 和 wscript.exe 的支持就可以运行； 步骤一：点击文件打开要转化的 vbs 文档。...步骤二：嵌入文件处可以选择转化之后程序的图标，然后点击那个编译图标就可以了，转化后的程序还在原文件夹里。 资源包里还附带了帮助文档，想要了解更多可以看看。...vbs to exe 获取地址：小蓝枣的资源仓库，提取码: 59ck 特点： ① 选项很多，方便用户使用！ ② 貌似功能更多一些！
我那安装包在安装期间有这个动作： - 让用户填写一些信息，待安装完成后把这些信息写入软件安装目录中的指定ini、xml文件中 上文说的是如何用vbs写ini，ini搞完了，这下搞xml。...本来借助xml完善的DOM实现，包括vbs在内的大多数语言操作xml都很容易，调用Microsoft.XMLDOM对象即可，比如： Dim doc Set doc = CreateObject("Microsoft.XMLDOM...我那xml是要以utf-8编码的，doc.save得到的却是ANSI编码的文件~让人不省心啊不省心，尼玛给save方法加个编码参数会死啊~好吧，文明发博。...，还可以写到流对象 stream.SaveToFile "c:\a.xml", 2 '用流对象来存文件 stream.Close '关闭流 简单说就是用DOMDocument对象来操作xml，用Stream...对象来保存文件，而流是可以指定编码的，所以问题搞掂。
# 1.txt,1.py 1.mp3 1.avi # 允许用户输入任何一个文件 -- 备份 # 打开源文件， 打开备份文件 -- 源文件执行读取，备份文件执行写入 -- 关闭两个文件 import os...# 得到这个路径下的所有文件 file_list = os.listdir('./') print(file_list) file_name = input('请输入要备份的文件名:') if file_name...src_f = open(file_name, 'rb') # 音频文件，所以要二进制模式打开 new_f = open(new_name, 'ab') # 源文件读取数据，...新的文件写入数据 # src_f.read() -- read是一次性读取所有，如果文件太大，会出问题，循环读取循环写入 # 当没有数据了就不再循环执行读写 -- 数据长度为0 len...-- 先关闭备份出来的 再关闭源文件 new_f.close() src_f.close() else: print('文件不存在')
我不要整人什么的，我要的是类似翻译的，还有句型 哈哈，LS的比较搞笑 先说VBS： 我是学VB的，据说VB和VBS差不了多少，只是VBS没有主界面而已， VB对网络的支持堪称完美，所以不少的盗号程序都选择用...CSS布局HTML小编今天和大家分享大量VBS整人代码. ,,要好玩一点的.好的话加分.. 大量的楼上已经说了。这个是本人原创，亲测有用。...毒性嘛，就是会烧CPU，然后在这个vbs旁边创建一大堆垃圾文件(请准备好30G空间)【具体在代码中】 仅供恶搞娱乐和研究，没有攻击任何人，组织的意图。...文件 如：我爱你.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 “由于您在说废话，但是您一定不想浪费时间说废话
文件1： ftp -n -s:"upload.txt" call upload_bankup_rename.bat 文件2：upload.txt Open 192.168.1.1 User username...Cd /as3t/exp_imp/C162/scrap Bin Prompt mput E:escraptesttransfer.csv mput E:escraptestadjust.csv bye 文件...0,4%%date:~5,2%%date:~8,2% set bak_time=%time:~0,8% set bak_time=%bak_time::=% cd E:escraptest rem 重命名备份至另外的文件夹
' 将 c 文件夹 复制到B目录下的某日期的文件夹下 如 b\2016-7-25\c FolderLoopCopy "C:\Users\caoya\Desktop\test1","C:\Users\caoya...Set oFolder = oFso.GetFolder(srcF) countSize = oFolder.size+1 nowSize = 1 '生成日期文件夹...fStack = new MyStack fStack.push srcFolder '准备遍历堆栈 Do While fStack.Count > 0 '获取栈顶文件夹...set tempF = fStack.Pop 'WScript.Echo tempF.Path '获取栈顶文件夹路径对象 set oFolder..." + tempFolderPath n = n + 1 Call MyCreateFolder(oFso,tempFolderPath) '获取子文件和子文件夹
Vbs 禁用启用网卡 在实际工作中，经常碰到需要通过脚本启用禁用网卡的情况，在网上找了一个脚本，实际是通过模拟键盘操作来启用禁用，但对于多种系统和比较复杂的情况操作性不好。...于是产生了一个思路，利用vbs得到网卡名字，然后调用netsh命令启用禁用网卡。
,其中f可任意，包含缩略名 f.WriteLine(“VBS”) ‘写文件内容,该命令功能太简单,目前看来只能用于TXT文件 f.Close set c=fso.getfile(“%path...%”) ’拷贝某文件 c.copy(“%PATH2%”) ‘拷贝文件到指定地点 fso.deletefile(“%PATH%”) ‘删除文件 Wscript.quit eg....Wscript.CreateObject(“Scripting.FileSystemObject”) Set f=fso.CreateTextFile(“C:/Sample.txt”) WriteLine(“VBS...，因此VBS文件具有很多命令的统一性) 将某一指定文件夹的所有只读文件转为可读文件 Const ReadOnly = 1 ‘设只读属性对应值为1 Set FSO = CreateObject(...‘文件夹所有文件 For Each objFile in colFiles ’下列语句应用于文件夹所有文件 If File.Attributes AND ReadOnly Then ‘这是关键之处
使用方法：新建一个txt文档，将上面的代码复制到txt，然后将文档的后缀名改成vbs。鼠标双击即可执行。
刷屏代码 出于无聊，跟朋友聊天突然聊到刷爆别人的屏幕，在网上搜索了一下，看到一个VBS脚本的东西，记录一下 VBSScript 使用方法： 复制需要转发的内容，点击QQ或者微信窗口，，再双击VBS脚本即可自动运行...新建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好友 他不懂的话 如果不输我是猪...vbs整人代码 2010-02-07 22:04 代码如下： Private Sub Form_Load() Me.Hide End Sub Private Sub Timer1_Timer()...As Long ‘定义要把生成的文件存放在那个目录文件下 c = “C:\Program Files” ‘生成文件的内容 nr = “哈哈，被黑的感觉的不错吧” files = FreeFile...‘如果a等于a那么就执行 If a = a Then ‘count不断的加1，以便产生不同的文件名 count = count + 1 ‘产生文件名及文件句柄，并用count作为产生不同的文件名
一个简单的备份脚本。 #!.../usr/bin/env python3 #-*- coding:utf-8 -*- #for backup import os import time #需要备份的目录 source = ['/var.../log/history/','/var/log/httpd/'] #保存备份的目录 target_dir = '/tmp/' today_dir = target_dir + time.strftime...command命令行，再调用os.system()函数运行command命令，如果成功，返回0，否则返回错误号 os.path.exits()：exits()函数的功能就是检查该系统中，是否存在指定路径的文件或文件夹存
领取专属 10元无门槛券
手把手带您无忧上云
云服务器
即时通信 IM
ICP备案
对象存储
实时音视频
