NGWS SDK Documentation  

This is preliminary documentation and subject to change.
To comment on this topic, please send us email at ngwssdk@microsoft.com. Thanks!

Reset Statement Example

This example uses the Reset statement to close all open files and write the contents of all file buffers to disk. Note the use of the Variant variable FileNumber as both a string and a number.

Dim FileNumber
For FileNumber = 1 To 5   ' Loop 5 times.
   ' Open file for output. FileNumber is concatenated into the string 
   ' TEST for the file name, but is a number following a #.
   Open "TEST" & FileNumber For Output As #FileNumber
   Write #FileNumber, "Hello World"   ' Write data to file.
Next FileNumber
Reset   ' Close files and write contents 
      ' to disk.