发新话题
打印

在VB中如何实现自我复制呢?

在VB中如何实现自我复制呢?

偶做的一个小逗人的程序。。想让对方暂时无法删除。。就是想自我复制一个放在另一个目录。。。
。。。原来看别人的源码实现起来很麻烦。。

TOP

使用API CopyFile可以复制正在运行的文件
无法删除很简单,只要程序不能退出就行了。
在退出的地方加上如下代码
Private Sub Form_Unload(Cancel As Integer)
    Shell App.Path & "\" & App.EXEName & ".exe"
End Sub
编译成EXE文件试试就知道了。

TOP

这个我明白。。就是在Unload事件中加个进程也可以实现吧。。
不过。。你的方法在进程中依然可以杀掉!!
我是想隐蔽点!

TOP

在2000以上,想不被进程杀掉,几乎不可能的,除非为做了系统服务,不过用kill命令也能杀掉。

TOP

也是啊。。哈哈。。我再想想别的办法了。。

TOP

是呀,关键是kill命令连R0级的程序都可以杀掉,非常强。
不过还有一个办法,使用sys文件,做为系统的一个驱动,这个很难杀掉,不过VB实现不了。

TOP

发新话题