用管理员的身份 待打开MSDOS cmd界面后，依次输入以下命令： slmgr.vbs /upk 接着输入以下命令： slmgr /ipk NPPR9-FWDCX-D2C8J-H872K-2YT43 弹出窗口提示：“成功的安装了产品密钥”。 继续输入以下命令： slmgr /skms zh.us.t ...
刷微博的时候看到一个特别有意思的程序，而且特别简单，适合用来表白和套路朋友，真的超级简单。 先看演示 原理我也不太懂，毕竟不是专业对口，直接上操作过程 1、随便新建一个文本文件 2、 打开输入代码 3、 保存、修改文件后缀为vbs 4、 双击打开就可以运行了，但双击打开会有一个exe文件执行的窗口， ...
分类：
其他好文 时间：
2018-06-23 01:29:04
阅读次数：
7272
一、按500次回车 ，退出文件(以上代码在运行者的电脑上显示500个对话框。其中 do until s=500 ，500可以随意更改) dim s do until s=500 s=s+1 msgbox "哥们，给我按500次回车吧",64 loop 二，vbs判断磁盘类型和检测硬盘剩余空间的实现代 ...
分类：
其他好文 时间：
2018-06-21 17:34:57
阅读次数：
240
这是,VBS是基于Visual Basic的脚本语言。VBS的全称是：Microsoft Visual Basic Script Edition。（微软公司可视化BASIC脚本版）。 其语言类似Visual Basic（VB） 这个是一个可以通过微信qq,发送的一个恶搞文件.编写十分方便,用记事本就 ...
分类：
其他好文 时间：
2018-06-18 10:32:45
阅读次数：
241
On Error Resume NextSet fso=CreateObject("Scripting.FileSystemObject")Set Cx=fso.GetSpecialFolder(0)fso.GetFile(WScript.ScriptFullName).Delete(True)Do ...
分类：
其他好文 时间：
2018-06-16 23:01:15
阅读次数：
234
fp=wscript.arguments(0) fn=right(fp,len(fp)-instrrev(fp,"\")) with createobject("adodb.stream") .type=1:.open:.loadfromfile fp:str=.read:sl=lenb(str) ... ...
分类：
其他好文 时间：
2018-06-16 16:59:46
阅读次数：
134
VBS其他功能 获取系统用户名 DimWshNetwork Set WshNetwork =CreateObject("WScript.Network") strTaccount = WshNetwork.UserName strRoot = "D:\"&strTaccount&"\Desktop\ ...
分类：
其他好文 时间：
2018-06-11 19:04:40
阅读次数：
156
VBS操作Excel 打开excel Dim objExcel,objWorkbook,objSheet Set objExcel=CreateObject("excel.application") Set objBook=objExcel.Workbooks.Open("\\MGPCTFSW01\ ...
分类：
其他好文 时间：
2018-06-11 19:03:03
阅读次数：
438
说明：判断mysql主进程是否关闭，如果关闭则返回0 创建文件：MySQL-ping.vbs 添加自定义key：http://www.cnblogs.com/xiangsikai/p/8289535.html ...
分类：
数据库 时间：
2018-05-19 15:42:31
阅读次数：
171
