DOCUMENTATION EN LIGNE
DE WINDEVWEBDEV ET WINDEV MOBILE

Aide / WLangage / Gestion des bases de données / HFSQL / Fonctions HFSQL
  • Exemple : Importer une description de fichier à partir d'un fichier de données existant
  • Exemple : Importation d'un fichier Client/Serveur HFSQL avec mot de passe
  • Exemple : Se connecter au fichier des utilisateurs du Groupware
HDéclareExterne (Exemple)
Exemple : Importer une description de fichier à partir d'un fichier de données existant
Exemple : Importation d'un fichier Client/Serveur HFSQL avec mot de passe
sdMonHotel est une Source de Données
Nouvelle_connexion est une Connexion
 
HPasse(sdMonHotel, "Tahiti")
 
// Paramètres de la connexion
Nouvelle_connexion.Provider = hAccèsHFClientServeur
Nouvelle_connexion.Utilisateur = "MonUtilisateur"
Nouvelle_connexion.MotDePasse = "MonMotDePasse"
Nouvelle_connexion.Serveur = "MonIPServeur"
Nouvelle_connexion.BaseDeDonnées = "MaBaseDeDonnees"
 
// Ouverture de la connexion
SI PAS HOuvreConnexion(Nouvelle_connexion) ALORS
Erreur("Erreur de connexion : ", HErreurInfo())
RETOUR
FIN
SI PAS HDéclareExterne(".\Hotels.fic","sdMonHotel", Nouvelle_connexion) ALORS
Erreur("Erreur sur la déclaration externe : ", HErreurInfo())
RETOUR
FIN
 
HLitPremier(sdMonHotel)
Info(sdMonHotel.Nom)
Exemple : Se connecter au fichier des utilisateurs du Groupware
Cet exemple montre comment se connecter au fichier des utilisateurs du Groupware utilisateur lorsque ce fichier est de type HFSQL Client/Serveur.
sdGPWUTIL est une Source de Données
Nouvelle_connexion est une Connexion
 
// Paramètres de la connexion
Nouvelle_connexion.Provider = hAccèsHFClientServeur
Nouvelle_connexion.Utilisateur = "mon utilisateur"
Nouvelle_connexion.MotDePasse = "mon mot de passe"
Nouvelle_connexion.Serveur = "mon serveur"
Nouvelle_connexion.BaseDeDonnées = "ma base de données"
Nouvelle_connexion.Cryptage = hCryptageNon
 
// Ouverture de la connexion
SI PAS HOuvreConnexion(Nouvelle_connexion) ALORS
Erreur(HErreurInfo())
RETOUR
FIN
 
HPasse(sdGPWUTIL,"PCSGPW2001")
SI PAS HDéclareExterne(".\Gpw_GPWU_HFCS\\GPWUTILISATEUR.fic", sdGPWUTIL, Nouvelle_connexion) ALORS
Erreur(HErreurInfo())
RETOUR
FIN
 
sdGPWUTIL.login = "testman"
SI PAS HAjoute("sdGPWUtil") ALORS Erreur(HErreurInfo())
Version minimum requise
  • Version 9
Documentation également disponible pour…
Commentaires
Exemple
Dans l'exemple suivant :

sdMonHotel est une Source de Données
Nouvelle_connexion est une Connexion

HPasse(sdMonHotel, "Tahiti")

// Paramètres de la connexion
Nouvelle_connexion.Provider = hAccèsHFClientServeur
Nouvelle_connexion.Utilisateur = "MonUtilisateur"
Nouvelle_connexion.MotDePasse = "MonMotDePasse"
Nouvelle_connexion.Serveur = "MonIPServeur"
Nouvelle_connexion.BaseDeDonnées = "MaBaseDeDonnees"

// Ouverture de la connexion
SI PAS HOuvreConnexion(Nouvelle_connexion) ALORS
Erreur("Erreur de connexion : ", HErreurInfo())
RETOUR
FIN
SI PAS HDéclareExterne(".\Hotels.fic","sdMonHotel", Nouvelle_connexion) ALORS
Erreur("Erreur sur la déclaration externe : ", HErreurInfo())
RETOUR
FIN

HLitPremier(sdMonHotel)
Info(sdMonHotel.Nom)

Pour que ça fonctionne de mon côté j'ai du modifier la ligne suivante en retirant les "" pour sdMonHotel

SI PAS HDéclareExterne(".\Hotels.fic",sdMonHotel, Nouvelle_connexion)

Damien 10
03 jan. 2024

Dernière modification : 17/07/2023

Signaler une erreur ou faire une suggestion | Aide en ligne locale