Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Trouble with browser object
Message
De
01/12/2008 09:17:12
 
 
À
01/12/2008 09:10:07
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01364734
Message ID:
01364822
Vues:
19
>I'll give it a try.
>This form drives me crazy though.
>I replaced the misbehaving browser control with a grid. Now the grid misbehaves. I have done this a thousand times and never had this problem:
>2 of the colums are bound to memo fields. No problem, I said and deleted the textbox and added a editbox. set the controlsource...
>And it says memo where the memfiled content should be!!!!!
>
>
>what did I do wrong now???

Change column.sparse

>Time to retire!
>
>Peter
>
>
>
>>how about:
>>
>>THISFORM.owb.navigate2("file://"+lcTemp)
>>
>>or
>>
>>THISFORM.owb.navigate2("http://"+lcTemp)
>>
>>
>>
>>>the fullpath function in the first line does axactly that. it includes the fullpath :-)
>>>
>>>>I had something like this happen to me and I solved it by including the complete path including the drive letter.
>>>>Hope it helps
>>>>>>I have a form with a treeview and abrowser object
>>>>>>
>>>>>>I create the the html programmatically and save yi to file and navigete to it
>>>>>>I get an error message with a tilte of Visial foxpro, no error message text and an OK button
>>>>>>If I press the ok button it goes on but the html does not display. the browser control is empty
>>>>>>
>>>>>>I do the same kind of stuff in other places without this problem
>>>>>>
>>>>>>
>>>>>>the html shows fine in expression web and IE
>>>>>>
>>>>>>I tried all sorts of things but am stuck
>>>>>>
>>>>>>Any ideas anybody
>>>>>>
>>>>>>here is the code:
>>>>>>
>>>>>>	lcTemp = FULLPATH([temp\])+[Mydiary]+ALLTRIM(oUser.username)+[.html]
>>>>>>	IF FILE(lcTemp)
>>>>>>		ERASE (lcTemp)
>>>>>>	ENDIF
>>>>>>	STRTOFILE(lcHTML,lcTemp) 
>>>>>>	THISFORM.owb.navigate2(lcTemp)  && <-----   error happens here 
>>>>>>		lnStartSeconds = SECONDS()
>>>>>>		DO WHILE .ReadyState <> 4 ;
>>>>>>				AND (SECONDS()-lnStartSeconds <= 1 )
>>>>>>			DOEVENTS
>>>>>>		ENDDO
>>>>>>
>>>>>>
>>>>>>Thanks
>>>>>>
>>>>>>Peter
>>>>>
>>>>>UPDATE:
>>>>>Sorry, stupid suggestion.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform