begin process at 2010 02 09 18:33:18
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

API-OLE

 > ::: AUTOMATION INTERNET EXPLORER AVEC VFP ::: ANNUAIRE INVERSE À PARTIR DE VOTRE APPLICATION VFP ::::

::: AUTOMATION INTERNET EXPLORER AVEC VFP ::: ANNUAIRE INVERSE À PARTIR DE VOTRE APPLICATION VFP ::::


 Information sur la source

Note :
Aucune note
Catégorie :API-OLE Classé sous :annuaire, piloter, ie, internet, explorer Niveau :Débutant Date de création :10/10/2004 Date de mise à jour :10/10/2004 12:09:00 Vu :4 992

Auteur : olivierhamou

Ecrire un message privé
Site perso
Commentaire sur cette source (0)
Ajouter un commentaire et/ou une note

 Description

*==========================================
* Annuaire Inverse à partir de votre application VFP
*==========================================

N ous avions besoin de simplifier certaines taches au sein de notre application vfp
pour les secrétaires.
Il fallait piloter IE à travers notre appli vfp pour afficher des données à l'utilisateur.

Cet exemple vous permet de piloter IE afin de saisir des formulaires IE en vfp.
(Nous vous proposons une recherche inverse sur l'annuaire téléphonique français.)

Olivier ,

Source

  • * ===============================================
  • * Source Unviversalthread.com
  • * Ce programme permet de faire un recherche inverse
  • * sur l'annuaire téléphonique à partir de votre application vfp
  • * ===============================================
  • oIE = CREATEOBJECT("InternetExplorer.Application")
  • oIE.Navigate("http://www.infobel.com/france/wp/revsearch/default.asp")
  • INKEY(1)
  • nStartSeconds = SECONDS()
  • DO WHILE oIE.Document.ReadyState <> "complete" AND (SECONDS()-nStartSeconds < 30)
  • ENDDO
  • IF oIE.Document.ReadyState <> "complete"
  • MESSAGEBOX("Votre site est Inaccessible")
  • oie.Visible = .T.
  • RETURN .F.
  • ENDIF
  • && attention dans cette exemple j'ai mis form(2) mais tout depend
  • && du nombre de form que vous disposez dans l'objet Document.
  • && l'indice commence à zero
  • oIE.Document.Forms(2).qphone.Value = "0164460660"
  • oIE.Document.Forms(2).Submit()
  • oIE.Visible = .T.
* ===============================================
* Source Unviversalthread.com
* Ce programme permet de faire un recherche inverse
* sur l'annuaire téléphonique à partir de votre application vfp
* ===============================================

oIE = CREATEOBJECT("InternetExplorer.Application")
oIE.Navigate("http://www.infobel.com/france/wp/revsearch/default.asp")

INKEY(1)
nStartSeconds = SECONDS()
DO WHILE oIE.Document.ReadyState <> "complete" AND (SECONDS()-nStartSeconds < 30)
ENDDO

IF oIE.Document.ReadyState <> "complete"
	MESSAGEBOX("Votre site est Inaccessible")
	oie.Visible = .T.  
	RETURN .F.
ENDIF

&& attention dans cette exemple j'ai mis form(2) mais tout depend
&& du nombre de form que vous disposez dans l'objet Document.
&& l'indice commence à zero

oIE.Document.Forms(2).qphone.Value = "0164460660"
oIE.Document.Forms(2).Submit()
oIE.Visible = .T.



 Historique

10 octobre 2004 12:09:01 :
.

 Sources du même auteur

::: OBTENIR LE NUMERO DE SERIE DU DISQUE DUR D'UN PC EN VFP ...
Source avec Zip UNE CLASSE CALENDRIER EN FOXPRO (À PARTIR DE VFP6 ET +)

 Sources de la même categorie

AUTOMATION DE WORD AVEC VFP par AbaqueInside
LISTER LES ADRESSES IP DE LA MACHINE par FrancisFaure
OUVRIR UN DOCUMENT WORD PAR AUTOMATION ET FAIRE UNE FUSION A... par leissler
[VFP]CLASSE SYSTEMTIME par FredArmoni
Source avec Zip SPLASHSCREEN TYPE ALERTE D'OUTLOOK2003 par FredArmoni

 Sources en rapport avec celle ci

CRÉER UN INSTANCE DE INTERNET EXPLORER par Mike Gagnon

Commentaires et avis

Aucun commentaire pour le moment.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Internet Explorer 7 [ par PatriceJ ] Bonjour à tous, Depuis que j'ai installé Internet Explorer 7 quand je lance un programme développé avec Foxpro Windows me demande confirmer le lanceme mon application en site d'internet [ par info_maroc ] Bonjour,j'ai développé une application sous vfp9 qui gere les fichiers des clients et je veux que cette application soit accessible de n'importe quel Acquisition de données sur internet en arrière plan... [ par vincent3004 ] Bonjour, Je cherche à réaliser un programme qui fasse périodiquement l'acquisition d'une donnée par internet qui évolue dans le temps en moyenne tous connecter sur un database par internet [ par MVTNV ] Bonjour,Je suis en train de faire un programme qui a besoin de beaucoup de databases.Normallement quand j'ai besoin d'un database je fais "use \\nom d


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,920 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales