Reply to thread

Message: <blockquote data-quote="||~DxxCxxxx~||" data-source="post: 3454044" data-attributes="member: 137393">Fake Virus<img src="http://pigboom.com/wp-content/uploads/2008/05/computer-virus-480.jpg" alt="" class="fr-fic fr-dii fr-draggable " style="" />Ok in this tutorial i'll show you how to creat a .bat file to save in the directory of where the program is to make it look like it just infected u with a virus but all it is is some text. All you need in your window is one command button called Enter.So go ahead and create that.Now for the code...[code]Private Sub Command1_Click()        WriteAFile "virus.bat", "@echo off" & vbCrLf & _            "echo. Deleting All Information..." & vbCrLf & _            "echo. Cleaning up C:\ Drive..." & vbCrLf & _            "echo. Virus Complete" & vbCrLf & _            "Pause" ' Writes the Fake text    Shell "virus.bat", vbNormalNoFocus 'Executes the Fake VirusEnd Sub[/code] [code]Private Function WriteAFile(Filename1 As String, WhatToWrite As String) ' The function, do not modify it....    On Error GoTo ErrorControl    Dim FileType As Integer    FileType = FreeFile    Open Filename1 For Output As #FileType        Print #FileType, WhatToWrite    Close #FileTypeErrorControl:    If Err <> 0 Then        MsgBox "Wrong File Name or File Path!", vbCritical, "Error"    End IfEnd Function[/code]</blockquote>

Top Bottom