主题:如何建立文件关联(关于电学工具箱)
jiajun
[专家分:0] 发布于 2008-02-11 00:03:00
如何建立文件关联(关于电学工具箱)
我想在文件安装时自动将*.elmaker与 [文件安装地址]\elmaker.exe 建立文件关联
该修改哪些注册表值?
回复列表 (共2个回复)
沙发
一江秋水 [专家分:9680] 发布于 2008-02-13 09:00:00
Dim ws, ZT As String, Lpath As String
ZT = "elmaker文件"
Set ws = CreateObject("wscript.shell")
ws.regwrite "HKCR\.elmaker\", ZT
ZT = "HKCR\" & ZT & "\": Lpath = App.Path & "\elmaker.exe"
ws.regwrite ZT & "DefaultIcon\", Lpath & ",0"
ws.regwrite ZT & "shell\open\command\", Lpath & " " & Chr(34) & "%1" & Chr(34)
Set ws = Nothing
板凳
jiajun [专家分:0] 发布于 2008-02-13 17:29:00
详细点
看不懂
我来回复