Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Programmatically keep a session from idling
Message
From
23/01/2008 16:19:01
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01284395
Message ID:
01284729
Views:
18
>>Well, that's still not traffic being initiated by the client. Can you try pushing a file from the client to the server, or reading one from the server back to the client? (i.e. via a process running on the client)
>>
>>Failing that, maybe there is some way you could pass messages to the TS client process causing it to nudge the mouse back and forth 1 pixel?
>>
>>You'd think this would be a common problem, but Googling on "keepalive" brings up how to time sessions out, which is the opposite of what you want.
>
>we have also tried the followings with no luck:
>
>
>*!*	STRTOFILE('Josh', 'C:\Temp.txt')
>*!*	x=CreateObject("word.application")
>*!*	x.Documents.Open('c:\Temp.txt')
>*!*	x.Documents.Save()
>*!*	x.Quit
>
>*!*	thisform.MouseDown()
>*!*	Keyboard('A')
>*!*	DECLARE integer SetCursorPos in WIN32API integer, integer
>*!*	=SetCursorPos(600,400)
>*!*	CLEAR DLLS	
>
>lcTsPath = '\\tsclient\C\temp\Temp.txt'
>IF FILE(lcTsPath)
>	DELETE FILE &lcTsPath
>ENDIF
>STRTOFILE('TS idle test.', lcTsPath)
>ACTIVATE SCREEN _screen
>?FILETOSTR(lcTsPath)
>
Again, I think you have to make the distinction about where this code is running. Is the above code actually running in a VFP app in the TS session, or is it in a process running simultaneously with the TS client on the client computer? I'm beginning to think you probably have to cause the TS client on the client computer to initiate traffic back to the TS session.
Regards. Al

"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov

Neither a despot, nor a doormat, be

Every app wants to be a database app when it grows up
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform