Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Pause code until operation is completed
Message
From
31/01/2002 07:59:17
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00613179
Message ID:
00613275
Views:
14
Nadya
The code stops the processing from proceeding but the web form that is created freezes. I also found another problem with the web form in that it will not let me download the file from the web form.

I had been using the following code which works fine, howeverI wanted to try the web form in the gallery section as it was mentioned in the FoxPro Advisor Tips section as a way to incorporate the web into your application.

O = createobject("shell.application")
O.open("http://quote.yahoo.com/")

Thanks for your input. It did get me thinking as to how I can stop the processing for another application I am working on.

Gaylen



>How about the following lines:
>
>lnStartTime=seconds()
>lnElapsedTime = seconds()- m.lnStartTime
>do while m.lnElapsedTime < MAX_WAITING_TIME and !m.llInterrupt
>   if adir(laFilesToDownload,m.lcFileName)>0 ;
>      and laFilesToDownload[1,2]=ActualFileSize
>      exit && We downloaded the file
>   endif
>   lnElapsedTime = seconds()- m.lnStartTime
>enddo
>
>This code is of the top of my head and not tested, but should give you the idea.
>
>>I use the following code to get data from the internet.
>>
>> x = NEWOBJECT("_webform", HOME()+"\gallery\_webview")
>> x.olewebbrowser.navigate2("http://quote.yahoo.com")
>> x.show()
>>
>> *** subsequent code follows which uses the data that is downloaded.
>>
>>The problem is that the subsequent code runs before I get the data downloaded.
>>
>>I can put the web access in one command button and the subsequent code under another command button and have it two step process. However, I would prefer to have the user click only one command button.
>>
>>Any thoughts would be appreciated
>>
>>Thanks
>>Gaylen Jungling
Previous
Reply
Map
View

Click here to load this message in the networking platform