首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

高手帮忙,如何使一个文件格式与一个程序关联起来

2012-01-29 
高手帮忙,怎么使一个文件格式与一个程序关联起来高手帮忙,怎么使一个文件格式与一个程序关联起来,当点击这

高手帮忙,怎么使一个文件格式与一个程序关联起来
高手帮忙,怎么使一个文件格式与一个程序关联起来,当点击这类文件时可以用程序打开,并且vb程序中怎么编写,才能读写这类文件

[解决办法]
先修改注册表,之后你的文件相当于程序的一个参数,此时在程序中调用此参数:vba.command即可,至于怎么打开文件并读取就不用说了吧。
给个简单的示例:

VB code
Option ExplicitPrivate Sub Command1_Click()Dim exepath, iconpathexepath = App.Path & "\" & App.EXEName & ".exe %1" '当前程序的路径iconpath = App.Path & "\" & App.EXEName & ".exe"Dim w As ObjectSet w = CreateObject("wscript.shell")w.regwrite "HKEY_CLASSES_ROOT\.eag\", "eagfile", "REG_SZ" '关联.eAg文件w.regwrite "HKEY_CLASSES_ROOT\eagfile\shell\open\command\", exepath, "REG_SZ"w.regwrite "HKEY_CLASSES_ROOT\eagfile\DefaultIcon\", iconpath, "REG_SZ" 'Set w = NothingEnd SubPrivate Sub Form_Load()    MsgBox VBA.CommandEnd Sub 

热点排行