Testcode:
Code: Select all
#count = 10
For i = 1 To #count
If OpenFile(0, "File_" + i + ".pb", #PB_File_Append)
WriteStringN(0, "; Hello ")
CloseFile(0)
EndIf
Next i
Code: Select all
#count = 10
For i = 1 To #count
If OpenFile(0, "File_" + i + ".pb", #PB_File_Append)
WriteStringN(0, "; Hello ")
CloseFile(0)
EndIf
Next i