Seriously, this is a 100% legit post.

Joel said:

Yeah I hate things like that, I picked up a damn virus that was purely made to piss people off.

It jumped to desktop, Control A'd and Entered.

Click to expand...

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim RandomNumber As New Random
        Dim i As Integer = 0
        For i = 0 To 100
            Dim writer As New System.IO.StreamWriter("C:\users\nicholas\desktop\" + RandomNumber.Next(0, 1000000).ToString + ".COM")
            writer.WriteLine("X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*")
            writer.Close()
        Next
    End Sub
End Class

Iron Man said:

LOL hahaha i lolled irl Ac, if you wouldnt of even tried it wouldnt of happend

Click to expand...

Automatic Coding said:

Joel said:

Yeah I hate things like that, I picked up a damn virus that was purely made to piss people off.

It jumped to desktop, Control A'd and Entered.

Click to expand...

Oh, no, it wasn't a virus. It was just something I coded. It was meant to only drop 100 files on my desktop, but for some reason it dropped 3,000...

Code:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim RandomNumber As New Random
        Dim i As Integer = 0
        For i = 0 To 100
            Dim writer As New System.IO.StreamWriter("C:\users\nicholas\desktop\" + RandomNumber.Next(0, 1000000).ToString + ".COM")
            writer.WriteLine("X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*")
            writer.Close()
        Next
    End Sub
End Class

Click to expand...

Joel said:

Automatic Coding said:

Joel said:

Yeah I hate things like that, I picked up a damn virus that was purely made to piss people off.

It jumped to desktop, Control A'd and Entered.

Click to expand...

Oh, no, it wasn't a virus. It was just something I coded. It was meant to only drop 100 files on my desktop, but for some reason it dropped 3,000...

Code:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim RandomNumber As New Random
        Dim i As Integer = 0
        For i = 0 To 100
            Dim writer As New System.IO.StreamWriter("C:\users\nicholas\desktop\" + RandomNumber.Next(0, 1000000).ToString + ".COM")
            writer.WriteLine("X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*")
            writer.Close()
        Next
    End Sub
End Class

Click to expand...

Wtf, how did that end up doing 3,000 instead of 100? Unless there's a loop of 30 somewhere somehow then I have no idea.

Click to expand...

Joel said:

Lol damn macros.
Maybe you should change it so you have to hold it for a second instead of click?

Click to expand...

Joel said:

If your macro is simple to set up then it might be worth it just to toggle it off and on temporarily.
I believe this isn't the first time your macro has gotten on your nerves.

Click to expand...