高手请进，小弟有个在资源文件中引用可执行文件的问题

Question

我在资源文件中加载了一个notpad.exe(记事本)，在vb程序中怎么调用这个可执行文件(notpad.ext)？

Answer 1

你为什么要在资源文件中调用呢，用shell外部程序不行吗？

Answer 2

to programfish 
用shell,等你移动工程到别的机器上的时候,你不还得移动notpad.exe文件吗,而且这个文件的路径的路径还的重新建立(再这里notpad.exe只是一个例子)

Answer 3

Private Sub Form_Load()
Dim MYPATH As String
MYPATH = App.Path & "\NOTEPAD.EXE"
Dim temp() As Byte
temp = LoadResData(101, "custom")
Open MYPATH For Binary As #1
Put #1, , temp
Close #1
Erase temp
Shell MYPATH, vbNormalFocus
End Sub

Answer 4

提问的人好像说的是让程序运行之前只有一个文件,然后从资源文件中解压出来运行,这好像是病毒或木马的工作机制哈,如果你做正规程序,你可以做一个安装程序呀,在调用自己的软件时可以用shell app.path+"\notepad.exe"来执行,不过你要判断你的程序是不是在根目录下,如果在根目录下就用shell app.path+"notepad.exe"就OK了,也可以用api中的shellexecute函数来运行所有的文件,包括注册与未注册的文件种类,shell只能调用可执行文件.exe;.com;.bat,VB程序除非用别的如delphi或VC做一个外壳来包装你的程序,否则是不能在没安装过VB运行库的电脑上运行只有一个主文件的程序的,因为VB程序在运行时都要msvbvm60.dll文件的支持(VB6),所以~~~~~~~~~~~~