Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Shell.Explorer.2 Object Error
Message
From
29/01/2002 12:49:52
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Miscellaneous
Thread ID:
00612242
Message ID:
00612273
Views:
46
Not static but generally for me it's 2 secs. Depends on how large the files are. Actually I set it high but there it stands as a safebelt to recover from a do while loop.
Cetin
>What is your MAXWAIT set to?
>
>
>Eric
>
>
>>>>I have a Shell.Explorer.2 object on one of my forms. I use it to display some formatted data. Every time I run the form I get an error (OLE Error Code: 0xXXXXXXXX Unspecified Error). If I click 'Ignore' the form then works fine, even the shell.explorer object. I dont get the error if I run the form without the object, so Im pretty sure it is the shell.explorer object. Another wierd thing is that if I step through each line of code in the debugger, no errors are displayed and the control works fine. Even another wierd thing is that, I have this same object on another form, that is used in almost the exact same way, and that works error free.
>>>>
>>>>Anyone have any experiance with this type of error, or know how I can fix it? I tried a bunch of simple things, like re-adding the control to the form, and removing all .refresh methodes. I cant even figure out which line is causing the error.
>>>>
>>>>Any suggestions or help would be greatly appreciated.
>>>>
>>>>Thanks,
>>>>Eric Stephani
>>>
>>>
>>>
>>>
>>>I just found something even more confusing..
>>>
>>>Here is part of the code...
>>>
>>>  STRTOFILE(lcHTML, lcFile)
>>>  thisform.oleThreads.Navigate(lcFile)
>>>
>>>
>>>Now if I put a messagebox("test1") function before the thisform.oleThreads.Navigate(lcFile) line, I get the error. If I put a messagebox("test2") after the line, I get NO error and everything works fine.
>>>
>>>Also if I put a wait window after the line I get no error, but it I put a wait window nowait I get the error.
>>>
>>>Man this is really annoying me. Any ideas?
>>
>>Eric,
>>I put :
>>ltTime = datetime()
>>do while oWebBrowser.readyState#4 and datetime()-ltTime < MAXWAIT
>>enddo
>>
>>It helps me with this one.
>>Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Reply
Map
View

Click here to load this message in the networking platform