[增加右击新建vbs文件] - vbs吧

level 7

eagle846 楼主

dim a,b set a=CreateObject("WScript.Shell") a.RegWrite"HKEY_CLASSES_ROOT\.vbs\ShellNew\ItemName","@%SystemRoot%\\system32\\notepad.exe,-470","REG_SZ" wscript.sleep 1000 set b=CreateObject("WScript.Shell") b.RegWrite"HKEY_CLASSES_ROOT\.vbs\ShellNew\NullFile",".bat","REG_SZ" a.SendKeys"{F5}+{F10}e" WScript.Quit

2008年12月05日 15点12分 1

level 7

eagle846 楼主

好久没来了无聊　发个玩玩

2008年12月05日 15点12分 2

level 5

网络e蜜蜂

set a=CreateObject("WScript.Shell") a.RegWrite"HKEY_CLASSES_ROOT\.vbs\ShellNew\NullFile","","REG_SZ" '然后刷新桌面生效，多刷几次，会比较乖！！！'桌面右键->新建->VBScript Script File

2008年12月06日 16点12分 3