DOCUMENTATION EN LIGNE
DE WINDEVWEBDEV ET WINDEV MOBILE

Aide / WLangage / Gestion des bases de données / HFSQL / Fonctions HFSQL
  • Exemple 1 : Description d'une connexion sur SQL Server via Accès Natif
  • Exemple 2 : Description d'une connexion sur SQL Server par OLE DB
  • Exemple 3 : Description d'une connexion sur SQL Server par OLE DB
  • Exemple 4 : Description d'une connexion Access
HOuvreConnexion (Exemple)
Exemple 1 : Description d'une connexion sur SQL Server via Accès Natif
WINDEVCode Utilisateur (MCU)HFSQL ClassicHFSQL Client/ServeurOLE DBConnecteurs Natifs (Accès Natifs)
// Ouverture d'une connexion SQL Server
HOuvreConnexion("MaConnexion", "User", "Password", ...
"Serveur_SQLServer", "dbo", hAccèsNatifSQLServer, hOLectureEcriture)
 
// Ouverture d'une connexion SQL Server avec authentification Windows
HOuvreConnexion("MaConnexion", Null, Null, "Serveur_SQLServer", "dbo", ...
hAccèsNatifSQLServer, hOLectureEcriture, "Trusted_Connection=YES")
Exemple 2 : Description d'une connexion sur SQL Server par OLE DB
WINDEVCode Utilisateur (MCU)OLE DB
Dans cet exemple, la base de données de l'entreprise est sur Oracle. Le programmeur veut effectuer des tests de son programme sur une base SQLServer.
Dans l'analyse, une connexion OLEDB par défaut a été associée à la table OLE DB "Salaires" sur Oracle.
Les propriétés de cette connexion sont :
  • datasource: Serveur_Oracle
  • user : dupont
  • password : toto
  • provider : OraOLEDB.Oracle
La nouvelle connexion vers la base SQL Server aura les paramètres suivants :
  • datasource: "Serveur_SQLServer"
  • database : "dbo"
  • user : ""
  • password : ""
  • provider : "SQLOLEDB"
Note : Sur SQLServer, il est possible de définir une base de données interne à la source de données qu'est le serveur.
// Décrire la nouvelle connexion
HDécritConnexion("MaConnexion", "", "", "Serveur_SQLServer", ...
 "dbo", hOledbSQLServer, hOLectureEcriture, "")
 
// Ouvrir la nouvelle connexion
HOuvreConnexion("MaConnexion")
 
// Indiquer que "Salaires" utilise la nouvelle connexion
HChangeConnexion("Salaires", "MaConnexion")
// Commencer le parcours de la table "Salaires" sur SQL Server
HLitPremier("Salaires")
...
// Ferme le fichier : la connexion utilisée par le fichier "Salaires"
// a été ouverte par HOuvreConnexion. Elle ne sera pas fermée
// lors de la fermeture du fichier Salaires.
HFerme("Salaires")
...
// Ré-ouverture rapide car la connexion est toujours ouverte
HOuvre("Salaires")
 
// Fermer la connexion
HFermeConnexion("MaConnexion")
 
// Rétablir l'utilisation de la connexion sur Oracle
HChangeConnexion("Salaires", "")
 
// Ouvrir la table "Salaires" sur Oracle
HOuvre("Salaires")
Exemple 3 : Description d'une connexion sur SQL Server par OLE DB
WINDEVWindowsCode Utilisateur (MCU)OLE DB
La base de données de l'entreprise est sur Oracle. Le programmeur veut effectuer des tests de son programme sur une base SQL Server en utilisant l'accès ODBC
Sans modifier l'analyse, il est possible de changer la connexion utilisée par le fichier.
Remarque : "ODBCSQLServer" est une source de données ODBC déclarée dans les sources de données ODBC de Windows
// Décrire et ouvrir la nouvelle connexion
HDécritConnexion("MaConnexion", "", "", "Serveur_SQLServer", ...
"dbo", hODBC, hOLectureEcriture, "")
HOuvreConnexion("MaConnexion")
 
// Indiquer que "Salaires" utilise la nouvelle connexion
HChangeConnexion("Salaires", "MaConnexion")
 
// Commencer le parcours de la table "Salaires" sur SQLServer
HLitPremier("Salaires")
...
 
// Fermer la connexion
HFermeConnexion("MaConnexion")
 
// Rétablir l'utilisation de la connexion sur Oracle
HChangeConnexion("Salaires", "")
// Ouvrir la table "Salaires" sur Oracle
HOuvre("Salaires")
Exemple 4 : Description d'une connexion Access
WINDEVWindowsCode Utilisateur (MCU)OLE DB
Cet exemple permet d'ouvrir une connexion sur la base de données des signatures en utilisant l'accès OLE DB Access 2000.
Signatures est une Source de Données
 
 
// Ouverture de la connexion sur la base de données des signatures
SI PAS HDécritConnexion("ConnexionSignatures", "", "", "Signatures.mdb", "", ...
hOledbAccess2000, hOLectureEcriture) ALORS
Erreur(HErreurInfo())
RENVOYER Faux
SINON
SI PAS HOuvreConnexion("ConnexionSignatures") ALORS
Erreur(HErreurInfo())
RENVOYER Faux
SINON
...
 
FIN
FIN
Version minimum requise
  • Version 9
Documentation également disponible pour…
Commentaires
Cliquez sur [Ajouter] pour publier un commentaire

Dernière modification : 25/05/2022

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