windows之家1.如何建立.vbs文件?
法拉利BEYOND回答，：
方法一：你可用VB软件生成。
方法二：你可以用记事本编辑，然后保存为***.vbs就行了（推荐，这个简单方便，便于修改）
我发一段代码给你玩一下，你放在记事本。然后保存为**.vbs
--------------------------------------分界线-------------------------------------------
on error resume next
Set objShell = CreateObject("Wscript.Shell")
dim a
do while(a <>； "我喜欢你")
a = inputbox （"说我喜欢你，就不关机，快点，说 ""我喜欢你"" "，"快点讲"，"你敢不讲？"，8000,7000）
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"
msgbox chr(13) + chr(13) + chr(13) + "下次老实一点就没事了！"
msgbox chr(13) + chr(13) + chr(13) + "法拉利BEYOND改写，感谢使用！接下来让你去看看我的空间"
objShell.run "iexplore.exe
------------------------------------------分界线-------------------------------------------
2.在windows系统如何编写一个VBS脚本?在windows系统
Dim wsh'声明变量 set wsh=createobject("wscript.shell")'创建对象 wsh.regwrite"HKCU\software\microsoft\windows\currentversion\run\? vbs",WScript.ScriptFullName,"REG_SZ"'获得自身路径并加入开机自启动 wsh.run "mspaint.exe"'运行绘图程序 '在我的电脑windonws7上测试成功 如果觉的我答案有用，请点赞。
3.如何妙用VBS脚本保护Windows系统安全性呢?
一、给注册表编辑器解锁 用记事本编辑如下内容： DIM WSH SET WSH=WSCRIPT。
CreateObject("WSCRIPT。SHELL") '击活WScript。
Shell对象 WSH。POPUP（"解锁注册表编辑器！"） '显示弹出信息“解锁注册表编辑器！” 1。
WSH。Regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\ DisableRegistryTools",0,"REG_DWORD" '给注册表编辑器解锁 WSH。
POPUP（"注册表解锁成功！"） '显示弹出信息“注册表解锁成功！” 保存为以。vbs为扩展名的文件，使用时双击即可。
二、关闭Win NT/2000的默认共享 用记事本编辑如下内容： Dim WSHShell'定义变量 set WSHShell=CreateObject("WScript。 shell") '创建一个能与操作系统沟通的对象WSHShell Dim fso,dc Set fso=CreateObject("Scripting。
FileSystemObject")'创建文件系统对象 set dc=fso。Drives '获取所有驱动器盘符 For Each d in dc Dim str WSHShell。
run("net share"&d。driveletter &"$ /delete")'关闭所有驱动器的隐藏共享 next WSHShell。
run("net share admin$ /delete") WSHShell。run("net share ipc$ /delete")'关闭admin$和ipc$管道共享 现在来测试一下，先打开cmd。
exe，输入net share命令就可以看到自己机子上的共享。双击执行stopshare。
vbs后，会看见窗口一闪而过。然后再在cmd里输入net share命令，这时候没有发现共享列表了 1。
New Roman"> 三、显示本机IP地址 有许多时候，我们需要知道本机的IP地址，使用各种软件虽然可以办到，但用VBS脚本也非常的方便。 用记事本编辑如下内容： 1。
Dim WS 2。 Set WS=CreateObject("MSWinsock。
Winsock") 3。 IPAddress=WS。
LocalIP 4。 MsgBox "Local IP=" & IPAddress 将上面的内容保存为ShowIP。
vbs，双击执行即可得到本机IP地址。 四、利用脚本编程删除日志 入侵系统成功后黑客做的第一件事便是清除日志，如果以图形界面远程控制对方机器或是从终端登陆进入，删除日志不是一件困难的事，由于日志虽然也是作为一种服务运行，但不同于 stop eventlog是不能停止的，所以有人认为在命令行下删除日志是很困难的，实际上不是这样，比方说利用脚本编程中的VMI就可以删除日志，而且非常的简单方便。
源代码如下： 1。 strComputer= "。
" 2。 Set objWMIService = GetObject("winmgmts:" _ 3。
& "{impersonationLevel=impersonate,(Backup)}!\\" & _ 4。 strComputer & "\root\cimv2") 5。
dim mylogs (3) 6。 mylogs (1)="application" 7。
mylogs (2)="system" 8。 mylogs (3)="security" 9。
for Each logs in mylogs 10。 Set colLogFiles=objWMIService。
ExecQuery _ 11。 ("Select * from Win32_NTEventLogFile where LogFileName='"&logs&"'") 12。
For Each objLogfile in colLogFiles 13。 objLogFile。
ClearEventLog() 14。 Next 15。
next 将上面的代码保存为cleanevent。vbs文件即可。
在上面的代码中，首先获得object对象，然后利用其clearEventLog（) 方法删除日志。 建立一个数组，application,security,system，如果还有其他日志也可以加入数组。
然后用一个for循环，删除数组中的每一个元素，即各个日志。
4.Win10系统VBScript脚本可以预防病毒吗?
通过检查Windows10平台可以避免恶意代码和空白字符，这是反恶意软件扫描接口（AMSI）中的弱点，它使软件开发人员能够使用商业安全解决方案来扫描文件。
微软已经专门创建了AMSI来审查使用PowerShell,Ruby或VBScript编写的脚本，这些脚本由于能够避免基于常见病毒数据库的检测而变得流行。然而，安全研究人员Satoshi Tanda发现，如果脚本具有零字符，则AMSI文件会缩短。
换句话说，只有一部分空白空间被扫描。忽略其余部分，尽管它可能包含不公平的命令。
对于防病毒也有警告Tanda认为，为AMSI发布补丁就足够了。然而，与此同时，它指的是防病毒公司检查他们的产品是否正确处理零字符，以及错误是否也直接出现在他们的扫描内核上而不使用AMSI。
该漏洞似乎只涉及PowerShell命令。当使用Windows Script Host时，它没有显示出来。
5.怎么使用windows7用VBS在D：下创建文本文件,内容如下： 爱问知
123456dim fso,wsset fso = createobject("scripting.filesystemobject").opentextfile("a.txt",2)set ws = createobject("wscript.shell")fso.write "时间仍带我们匆匆前行，走过一段又一段的落寞，像是沙漠里摇曳的枯树，注定了那样的孤独，我只想请时间可不可以放慢脚步，可以让我走出那片困扰自己的迷途，可是，我没有想过要忘记……"ws.run "C:Windowssystem32cmd.exe /c move a.txt D:",0wscript.quit事先要准备好一个名叫a.txt的空文本文件，跟这个vbs放在一起，点了vbs之后a.txt就被转移到了D盘。
6.韩博士Win10企业版怎么激活
激活方法：
右击桌面的左下角的“Windows”图标，从其右键菜单中选择“命令提示符（管理员）”项，以便打开 MSDOS界面。
待打开MSDOS界面后，依次输入以下命令：
slmgr.vbs /upk
由于Win10正式版允许在命令提示符界面使用“Ctrl+V”进行粘贴操作，因此我们可以复制以上命令，然后在MSDOW窗口中按“Ctrl+V”或“右击”以粘贴此命令，按回车进行确定。
此时弹出窗口显未“已成功卸载了产品密钥”。
接着输入以下命令：
弹出窗口提示：“成功的安装了产品密钥”。
继续输入以下命令：
slmgr /skms zh.us.to
弹出窗口提示：“密钥管理服务计算机名成功的设置为zh.us.to”。
转载请注明出处windows之家 » win10怎么创建vbs文件