would you like to download a 580MB dummy file? they are up somewhere...

[Jerboy]

was: How do I make a placebo file size of CD
Image and can be compressed to small size(1M or so) for easy storage and easily inflated as necessary?


Turns out to be pretty well



heh anyone downloaded 580MB iso image containing rain dripping sound from any type of file share yet? except it doesn't compress too well

 

[BigToque]

<< don't ask... >>



Dude, wtf are you doing?

 

[The Dancing Peacock]

what in christ are you talking about?

You want an empty CD image that will compress to nothing??


I'm gonna ask.

WTF do you want that for? Burn an empty CD if you want to burn nothing.

 

[gopunk]

i'm going to guess it has something to do with copy protection

 

[Ameesh]

write a program to write chars to a file each char is a byte. if you make it all the same char it will compress like no ones business

 

[Jerboy]

<< write a program to write chars to a file each char is a byte. if you make it all the same char it will compress like no ones business >>




So far I made a 250MB file, compressed down to 250KB.. hehehehehe =)

 

[tommigsr]

umm...what?

 

[Jerboy]

Placebo files are good for entertaining agressive downloaders on file sharing who will repeatedly attempts to download files from your computer after you tell him "NO" no and disconnects him.

 

[Jerboy]

<< Placebo files are good for entertaining agressive downloaders on file sharing who will repeatedly attempts to download files from your computer after you tell him "NO" no and disconnects him. >>





three people downloaded my 430MB placebo file so far LOL!!!

I bet they're gonna be real happy to see millions of lines of zeroes

 

[Rallispec]

<<

<< Placebo files are good for entertaining agressive downloaders on file sharing who will repeatedly attempts to download files from your computer after you tell him "NO" no and disconnects him. >>





three people downloaded my 430MB placebo file so far LOL!!!

I bet they're gonna be real happy to see millions of lines of zeroes >>




hahahaha harsh

 

[Hammer]

that's evil

 

[tweakmm]

<< that's evil >>


very

 

[gopunk]

bwhaha

 

[Viper GTS]

Jerboy, as much as I've given you crap I have to admit this is bloody hilarious.



Viper GTS

 

[Beau]

Here is a script that I use to make dummy files. Copy and paste this into a text file called test.vbs. Double click it to run it. Once you run it, change the filename to something like Office2k.iso :



Dim objFSO, objTextFile, intHowBig
intHowBig = CInt(InputBox("How large of a file do you want to make (in MB)?"))
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile(".\dummyfile.txt")
For i = 0 to ((1024 * intHowBig) * 1024)
objTextFile.Write("0")
Next
Set objTextFile = Nothing
Set objFSO = Nothing
MsgBox("Done.")

 

[dakata24]

hammer09 hit it on the nail... that is indeed evil.

what did they think they were downloading, if you dont mind me asking?

 

[TheVrolok]

snicker... I love it

 

[SLEEPER5555]

so can you tell us what this file that they are downloading is called or what they think it is heehee!

 

[Zenmervolt]

Hey, cool. A new use for my 800 meg file that's compressed to 800K. Generally I just send it to anyone who spams me. Anti-virus tries to scan it, but before it can do that it has to unzip the file into memory... Slows the machine to a crawl. And if the spam is particularly annoying, I break out the 4 GB file (compressed is under 4 megs).

ZV

 

[SLEEPER5555]

Zenmervolt - mind if i spam you? :0

 

[Viper GTS]

<< Here is a script that I use to make dummy files. Copy and paste this into a text file called test.vbs. Double click it to run it. Once you run it, change the filename to something like Office2k.iso :



Dim objFSO, objTextFile, intHowBig
intHowBig = CInt(InputBox("How large of a file do you want to make (in MB)?"))
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile(".\dummyfile.txt")
For i = 0 to ((1024 * intHowBig) * 1024)
     objTextFile.Write("0")
Next
Set objTextFile = Nothing
Set objFSO = Nothing
MsgBox("Done.") >>



That works nicely, but damn is it slow!

Viper GTS

 

[Beau]

<< That works nicely, but damn is it slow! Viper GTS >>

True, True.... The down fall of windows scripting and loops I guess you could speed it up by making it write 1k at a time.

 

[Viper GTS]

<<

<< That works nicely, but damn is it slow! Viper GTS >>

True, True.... The down fall of windows scripting and loops I guess you could speed it up by making it write 1k at a time. >>



Yes, you can. I modified it to this:

Dim objFSO, objTextFile, intHowBig
intHowBig = CInt(InputBox("How large of a file do you want to make (in MB)?"))
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile(".\dummyfile.txt")
For i = 0 to ((1024 * intHowBig) * 128)
objTextFile.Write("01010101")
Next
Set objTextFile = Nothing
Set objFSO = Nothing
MsgBox("Done.")

It ran MUCH faster that way, & you could easily make it run even faster.

Viper GTS

 

[Ameesh]

and people say windows scripting host is useless.

 

[SLEEPER5555]

ok so what do we need to change to make this faster?