Question

VBS中如何实现按下F键后自动运行同文件夹内的一个BAT脚本？

Answer 1

经常见到同学电脑中这种病毒，也有同学拿电脑来让我看下，开始开始以为是注册表中毒，进注册表找到“1245***.vbs explore"这个选项，把前面的”1245***.vbs"删除了，但重新打开我的电脑又弹出“1245**.vbs"导致我的电脑无法打开，只能用资源管理打开我的电脑，再看其它盘里出现了很多快捷方式的文件夹，没办法，重装下系统，在xp环境下刚刚开始还能用，打开我的电脑不会弹出提示框，但一旦打开其它盘符的快捷方式文件夹，又出现刚刚那种情况。没办法，网上找了下，有些说进注册表删除那个文件，但根本没用，装了个卡巴用没杀不掉，没办法进pe系统手工删除快捷方式文件夹又太麻烦（快捷方式的文件夹太多）
所以只要下个专杀工具就可以了，杀下，很简单就搞定了
在清除完数据流病毒后记得要恢复文件属性，要不然很多东西被隐藏了，即使你在工具-文件夹-查看-查看所有文件也不能看到你以前的文件夹，但这些文件有还在，所以再下个软件恢复下文件属性，以前的所有文件夹都可以看到了，一切搞定！！

Answer 2

Dim
WshShell
Set
WshShell=WScript.CreateObject("WScript.Shell")
WshShell.SendKeys
"f"
WshShell.Run
"XXX.bat" 第三句是按F键，最后一句是打开程序，把 XXX.bat
改成你要的就行了。不过没打开程序之前，你先按F是怎么个意思来著？