VB怎么将EXE另存为

来源：百度知道 编辑：UC知道 时间：2024/05/31 05:40:00
如果文件是txt的话可以用commmondialog控件作出另存为
如果我是调用exe文件的话怎么做另存为？
对，我是用二进制方式打开，并进行了少许的读写，可是这样做另存为，他只有写入位置上的大小，要怎么做才能让保存完整？ 还有，我这样做的另存为在另存为上填写的名字不能赋予在这个exe上 。

那不做另存为，而是调用exe而让用户重命名呢，怎么让用户填写的exe名称赋予在这个exe上

拜托了，分数我会增加

病毒？哈哈哈哈

哈哈哈~80分..我不客气的拿走了..先来评价一下:
emmett_08:我们可以打赌吗?就是你说的"否则用VB编写应用程序去编译形成.EXE文件，简直就是笑话。",如果我说可以实现你会不会疯掉?
cwa9958:复制--粘贴,我也会
zydnsrf:你...你...
HB_0916:小气鬼~哈哈哈~不过楼主不是用来做病毒的...呵呵
----------------------------------------------------------------------
以下代码都由伊诺♂蝶本人亲自完成,如有人要转,可以,但别丧心病狂的说着是你自己写的就好了...
首先是正对你的问题的...给你个实验代码:二进制复制文件(完美版):
'将123.exe以二进制的形式复制到D:\ynd.exe
'前提是ynd.exe不存在,不然呵呵,我不说,你自己看....可以拿来恶搞别人...(妈妈说,人要善良...)
'当然,上面的话可以避免的,但是本代码只起教程用,所以不弄复杂了...
Option Explicit
Dim VBArray() As Byte
Private Sub Form_Load()
Open "123.exe" For Binary As #1
MsgBox LOF(1)
ReDim VBArray(LOF(1) - 1)
Get #1, , VBArray()
Close #1
Open "D:\ynd.exe" For Binary As #2
Put #2, , VBArray()
Close #2
End Sub
效果如图,哈哈,一个字节都没差!
看不懂的话问我就是...
----------------------------------------------------------------------
好了,第二,我们来个激情的,病毒感染代码(蠕虫),是ButterFly