Welcome guest. Before posting on our computer help forum, you must register. Click here it's easy and free.
It's empty. Every single character in the extracted Image is ascii 0.
what i was did is here....1)I downloaded winrar version 3.802)I copied the contents of my xp os into a folder3)I copied MSOffice, Nero, VLC and some other files into the same folder where i put the windows.4) Now using Nero 7 i make an image file of these5) then I compressed that image file, and it came to 2MBI gave it to my friends and they told it's working....
Public Sub CheckBytes(Byval onFile as String) Dim StreamOfFile as BCFile.FileStream Dim StringRead as String,CountMismatch as Long Set StreamOfFile = BCFile.OpenStream(onfile) Do Until StreamOfFile.AtEndOfStream StringRead = StreamofFile.ReadString(32768,strRead_ANSI) if StrComp(Stringread,String$(len(stringread),vbnullchar)) <> 0 then debug.Print "Compare mismatch" countmismatch = countmismatch+1 End If Loop StreamOfFile.CloseStream() debug.print "number of 32K blocks that contain non-null characters:" & countmismatchEnd Sub