This answers everything! Thanks!
> This is just a sample. You should check for the existence of all of the
> folders before trying to use them and present dialogs to the user if they
> do
> not exist and/or cannot be created.
>
> HTH
>
>
> Dim f, textFile as FolderItem
> Dim t As TextInputStream
>
> // f = a folder named "Users" that is located in
> // the same location as the folder that the application is running in.
> f = GetFolderItem("Users")
>
> // If Users exists, proceed, if not, create the Users folder and Tornado
> folder.
> If not f.Exists then
> f.CreateAsFolder
> f = GetFolderItem("Users").Child("Tornado")
> f.CreateAsFolder
> Else
> f = GetFolderItem("Users").Child("Tornado")
> If not f.Exists then
> f.CreateAsFolder
> End If
> End If
>
> textFile = f.Child("Users List.ntuf")
>
> // If the text file exists, open it, read it, and place the contents
> into
> // an EditField.
> If textFile.Exists and textFile <> Nil then
> t = textFile.OpenAsTextFile
> EditField1.Text = t.ReadAll
> End if
>
>
> _______________________________________________
> Unsubscribe or switch delivery mode:
> <http://www.realsoftware.com/support/listmanager/>
>
> Search the archives of this list here:
> <http://support.realsoftware.com/listarchives/lists.html>
>
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
