Template:FileIO: Difference between revisions
Jump to navigation
Jump to search
(Created page with "==== VectorScript ==== <code lang="pas"> PROCEDURE Example; VAR fileName :STRING; major, minor, maintenance, platform :INTEGER; BEGIN GetVersion(major, minor, maintenance, pl...") |
(No difference)
|
Revision as of 20:15, 10 July 2014
VectorScript
PROCEDURE Example; VAR fileName :STRING; major, minor, maintenance, platform :INTEGER; BEGIN GetVersion(major, minor, maintenance, platform); IF platform = 1 THEN BEGIN fileName := 'Macintosh HD:Example.txt'; END ELSE BEGIN fileName := 'C:\Example.txt'; END; Append(fileName); WriteLn('example text'); Close(fileName); END; RUN(Example);
Python
def Example(): major, minor, maintenance, platform = vs.GetVersion() if platform == 1: fileName = 'Macintosh HD:Example.txt' else: fileName := 'D:\\Example.txt' vs.Append(fileName) vs.WriteLn('example text') vs.Close(fileName) Example()