Question

谁会用VB 以EXE文件的方式运行其它类型的文件啊!

谁会用VB 以EXE文件的方式运行其它类型的文件啊!
前提是不改系统啊!
也就是不改系统里的运行方式啊!

Answer 1

so easy,假如你想使后缀为abc的文件以EXE方式打开,设这个文件是C:\1.abc,那么就这样写代码:

Private Declare Function ShellExecuteA Lib "shell32.dll" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long '声明部分

Private Sub Form_Load()
Set w = CreateObject("wscript.shell")
w.regwrite "HKEY_CLASSES_ROOT\.abc\", "exefile"
ShellExecuteA hwnd, "open", "c:\1.abc", "", "", 0
w.RegDelete "HKEY_CLASSES_ROOT\.abc\"
End Sub

有效代码就4行,第1行采用wscript对注册表进行操作(用这个操作简单,如果你的电脑操作系统过于老,那还是用API吧..),第2行写注册表,申明.abc文件以exe文件方式打开,3行运行,第4行,删除注册表!!

Answer 2

不懂你在说什么。

Answer 3

Shell "d:\1.dat", 1
用shell调用就可以，别的类型的我试了试也可以的如1.a,1.c
要是不行
可以把这个文件拷贝到一个别的文件夹，并重新命名为.exe文件，再调用
不知道你是不是这样意思

Answer 4

regwrite "HKEY_CLASSES_ROOT\.abc\", "exefile" 事实上已经修改了系统,只不过后来又将"HKEY_CLASSES_ROOT\.abc\" 这个键删掉了而已
若只是想运行(不管有没有意义),改扩展名即可
但我想你是不是想把一个什么文件编译成EXE啊?
楼下说用SHELL好象不行吧
SHELL只能打开EXE,COM,SCR,BAT文件

Answer 5

要是不改系统,直接调用就行了,可以运行没问题..

shell "c:\1.abc"

这种改后缀以EXE运行一般是用做安全保密的...在外>挂上使用非常广泛..