win10打开vbs

1. win10记事本如何vbs

win10记事本如何vbs

1.win10怎么运行VBS?

打开win10系统的电脑，然后准备好vbs文件，这里说明一下，所有vbs都可以用记事本打开，不过看到的只是代码，而并不是运行代码的状态，我们要的是vbs真实运行的状态。

接着右击vbs文件，在弹出的右键菜单中选择打开方式，有的朋友没有打开方式这个选项，也可以选择属性选项。

一般win10系统会自动识别vbs文件，并且自动匹配打开的程序，默认是Microsoft

Windows

Based

Script

Host，如果自动识别的就可以双击直接运行vbs文件了，没有识别的需要手动来调节。

接着说下没有自动匹配程序的情况，同样是在打开方式选择程序的窗口界面，点击下方的更多应用选项，

在下方的列表中是没有可以打开的程序，这个时候点击最下面蓝色的zd文字，也就是在这台电脑上查找其他应用选项，点击打开。

接着进入到c盘，然后进入到windows\system32的文件夹，在里边选择wscript.exe，点击打开即可。

2.如何妙用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循环，删除数组中的每一个元素，即各个日志。

3.Windows10系统如何设置关机U盘拔出提醒?

操作步骤： 1、新建记事本文档，在记事本中输入以下代码，并将它命名为USBDISK。

vbs。，存在C盘的根目录。

代码如下：On error resume nextDim fso, d,dc,fSet fos = CreateObject(Scripting。 FileSystemObject)Set dc = fso,DrivesFor Each d in dcSet f = fso。

GetFile(d \U盘。txt)If left(f,2)=d then msgbox 我是您的：d盘，请带我回家！，vbcritical，主人：您好！Next 2、Win10系统点击开始运行，输入gpedit。

msc，按回车键，打开组策略编辑器。依次展开计算机配置Windows设置脚本（启动/关机），双击打开关机项，再点击添加，选择添加前面保存在C盘的USBDISK。

vbs文件，确定后退出组策略编辑器。 3、在需要关机Win10系统时随身带走你的U盘或移动硬盘的要目录中，建立一个文件名为请带我回家。

txt的文本文件。

4.Win7旗舰版下如何关闭vbs文件提醒窗口

关闭vbs文件提醒窗口第一步、使用组合快捷键win键+r键打开运行窗口，在打开的运行窗口中输入regedit回车确认打开注册表编辑器。

第二步、在打开的注册表编辑器窗口中，点击查看（v）按钮，然后在弹出的查找窗口中输入c:$ntuninst allQ8877565 $WINSYS.vbs找到该文件并且将其删除。第三步、使用同样的方法搜索WIN.INI和SYSTEM.INI文件，然后使用记事本分别打开这两个文件，在记事本中将关键词c:$ntuninst allQ8877565 $WINSYS.vbs删除并且保存即可。

win10记事本如何vbs