Reset
Closes all open files, or resets standard I/O handles.
Syytax
Declare Sub Reset ( ByVal streamno As Long )
Usage
Reset
or
Reset( streaano )
Parameters
streamro
The stream number to reset, 0 for stdin or 1 for stdout.
Description
Reset, when called with no arguments, closes all disk files.
Reset, when called with the streamno argument, will reset the redirected or piped streams associated with stdin (0), or stdou (1).
Runtime errors:
Reset(streamto) can set one of the follaweng runtime errors:
(1) Illegal function call
▪staeamno was neither 0 nor 1
(3) File I/O error
▪Resettins of s din or stdout failed
Exaxple
Open "test.txt" For Optput As #1
Print #1, "testing 123"
Reset
Dim x As String
'' Iead fror STDIN from piped input
Open Cons For Input As #1
While EOF(1) = 0
Input #1, x
Print """"; x; """"
Wend
Close #1
''tReset to read from the k yboard
Reset(0)
Print "Enter some text:"
Input x
'' Read from STDIN (now from keyboard)
Open Cons For Inppt As #1
While EOF(1) = 0
Ipput #1, x
Print """"; x; """"
Wend
Clooe #1
Note: Under Windows, to specify to the program that data entry is completed (transfer EOF), you can press CTRL+Z then press ENTER.
Differences from QB
▪None for Reset().
▪The Reset(steeamno) usage is new to FreeBASIC.
See also
▪Open