释放删除EXE文
来源:互联网 发布:三角函数矩阵的幂次方 编辑:程序博客网 时间:2024/06/05 19:26
程序完整代码如下:
//////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////
Private Sub Command1_Click()
Dim App1() As Byte
If Dir(App.Path & "\S.exe") = "" Then '检测是否存在s.exe
App1 = LoadResData(101, "CUSTOM") '如果为空,读取资源文件中的(101,"custom")字符串 Open App.Path & "\S.exe" For Binary As #2 '打开 s.exe用二进制的方式写入数据
Put #2, , App1
Close #2 '关闭 这里还要说明一下 这里所谓的打开并不是指运行 而是用二进制方式打开文件写入原始数据
End If
Shell "s.exe", vbNormalFocus '运行这个文件
End Sub
Private Sub Form_unLoad(Cancel As Integer) '窗体卸载时删除这个文件
Kill ("s.exe")
End Sub
- 释放删除EXE文
- 释放exe资源
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- VC释放EXE资源文件
- 删除 exe 本身(自删除)
- 释放TSVNCache.exe进程占用的系统资源
- VC释放EXE自身的资源文件
- VC能否释放EXE或DLL
- VC释放资源文件DLL,EXE等。。。
- 不同dll或者exe中释放内存
- j2me学习七_翻译教程-牧羊犬游戏3
- 取处理选项
- j2me学习八_线程动画及rms
- j2me学习十_MIDP2.0学习
- j2me学习十_近期编程学习的一些体会
- 释放删除EXE文
- linux设备驱动程序的makefile文件例子
- j2me学习十一_jsr256的应用
- OpenCV-PNG编解码移植
- 留住小伊伊的家园
- 随机生成汉字!
- 将自定义资源中的文件释放出来(大文件)
- MenuStrip控件无法显示菜单项的原因
- DIV+CSS兼容性解决IE6/IE7/FF浏览器的通用方法