Want to create a file in size KB

[shiv]

Greetings

Hi I want to create a file of size 485 KB.

How can i do that

 

Thanks

[michaelslamet]

Maybe this? By KaFu:

'?do=embed' frameborder='0' data-embedContent>>

#include <Constants.au3>

Local Const $sFile = "test.txt"
Local $hFile = FileOpen($sFile, 2)

; Check if file opened for writing OK
If $hFile = -1 Then
    MsgBox(0, "Error", "Unable to open file.")
    Exit
EndIf

FileSetPos($hFile, (1024*1024*100)-1, $FILE_BEGIN)
FileWrite($hFile, 0)

; Close the handle.
FileClose($hFile

[shiv]

michaelslamet

This will create file of 100 mb. but i want to create file of 485 kb

Thanks

[michaelslamet]

michaelslamet

This will create file of 100 mb. but i want to create file of 485 kb

Thanks

 

Why would that be a problem?

Just replace this:

FileSetPos($hFile, (1024*1024*100)-1, $FILE_BEGIN)

 

to this:

FileSetPos($hFile, (1024*485)-1, $FILE_BEGIN)

 

Untested

[shiv]

Thanks a lot michaelslamet