作业帮 > 综合 > 作业

谁来解说下 open.vbs

来源：学生作业帮 编辑：搜狗做题网作业帮 分类：综合作业 时间：2024/06/17 07:49:09
谁来解说下 open.vbs
Set WshShell = WScript.CreateObject("WScript.Shell")
p1 = "HKEY_CLASSES_ROOT\Directory\shell\"
p2 = "none"
WshShell.RegWrite p1,p2
p1 = "HKEY_CLASSES_ROOT\Drive\shell\"
WshShell.RegWrite p1,p2
X = WshShell.Run("REGSVR32 /I /S SHELL32.DLL",4,True)
Set WshShell = Nothing
MyBox = MsgBox("Folders will now Open when double clicked",4096,"Finished!")
有什么用的?
谁来解说下 open.vbs
p1 = "HKEY_CLASSES_ROOT\Directory\shell\"
p2 = "none"
WshShell.RegWrite p1,p2
p1 = "HKEY_CLASSES_ROOT\Drive\shell\"
WshShell.RegWrite p1,p2
以上 是写注册表,添加信息p1,p2
X = WshShell.Run("REGSVR32 /I /S SHELL32.DLL",4,True)
是运行REGSVR32 /I /S SHELL32.DLL,注册一个dll文件
MyBox = MsgBox("Folders will now Open when double clicked",4096,"Finished!")
弹出一个信息框
作用应该是注册一个SHELL32.DLL的库文件,用它来改变文件夹的颜色和风格
谁来给我解说一下这图..光合作用 VLOOKUP函数如何使用?谁可以帮我解说下. 谁能就~否定之否定规律~举一生动例子来解说下 最好用本子来解说 open down 翻译下 梦见蛇在床下.谁帮我解说下呢? 地心说是唯物主义观点还是唯心主义观点呀 用马克思的思想来解说一下下吧 谁能解说下红塔山的历史及意义,为什么建造它?红塔山一共有几层?谁能解说下详细的内容,.. 谁来翻译一下"open nuts with my beak"? vbs sub句式详解 谁来详细的给我解说一下这几个词的详细含义? 英语中no use后接动名词还是动词原型,谁能帮忙解说下,