In the app I want to store data in a file (on my XOJO-Cloud server). If the file doesn’t exist the app should create the file, otherwise append to it.
The relevant code is:
Dim f as folderitem = SpecialFolder.Documents.Child("intuition_data.txt")
if f<>Nil and f.exists then
fileStream = TextoutputStream.append(f)
end if
Below is the runtime error message. The code above is in the run page.open event. So basically I get this right after launching.
I see an exclamation mark in the first line right in front of Append. Maybe an indication of what went wrong.
The app can continue and works fine!!!
Thanks for any help,
Dick
Message:
Stack:
TextOutputStream.!Append%o%o
RunPage.RunPage.Event_Open%%o<RunPage.RunPage>
WebView.Event_Open%%o
WebControl.Event_Open%%o
WebObject._ExecuteEvent%b%osA1v
WebControl._ExecuteEvent%b%osA1v
WebControl.!_ExecuteEvent%b%ssA1v
WebControl.!_ExecuteEvent%b%ss
RunPage.RunPage.Constructor%%o<RunPage.RunPage>
Session.Session.RunPage%o<RunPage.RunPage>%o<Session.Session>
App.DefaultPage%o%o
WebSession._ExecuteEvent%%osA1v&b
WebSession._HandleEvent%%oso<_HTTPServer.HTTPRequestContext>
WebSession._HandleRequest%i4%oso<_HTTPServer.HTTPRequestContext>
WebApplication._HandleHTTPRequest%%oo<_HTTPServer.HTTPRequestContext>
_CGIGateway.GatewayRequestThread.Event_Run%%o<_CGIGateway.GatewayRequestThread>