Secure temporary file: Difference between revisions

=={{header|M2000 Interpreter}}==

<lang M2000 Interpreter>

Module Checkit {

\\ we get a tempname$ choosed from Windows

a$=tempname$

Try ok {

\\ we can use wide to export in utf-16le

\\ without wide we export as Ansi (set Local to desired language)

Rem Locale 1033 ' when no use of wide

Open a$ for wide output exclusive as #f

wait 10

\\ Notepad can't open, because we open it for exclusive use

Win "Notepad", a$

Print #f, "something"

Print "Press a key";Key$

Close #f

}

If error or not ok then Print Error$

Win "Notepad", a$

}

Checkit

</lang>