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 par OLE DB
  • Exemple 2 : Description d'une connexion sur SQL Server par OLE DB
  • Exemple 3 : Description d'une connexion sur des fichiers HFSQL Classic
  • Exemple 4 : Description d'une connexion sur un fichier Access (MDB)
HDécritConnexion (Exemple)
Exemple 1 : Description d'une connexion sur SQL Server par OLE DB
WINDEVWindowsLinuxCode 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 2 : 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 3 : Description d'une connexion sur des fichiers HFSQL Classic
WINDEVCode Utilisateur (MCU)
La base de données de l'entreprise est sur Oracle. Le programmeur veut effectuer des tests de son programme sur des fichiers de données HFSQL Classic.
Sans modifier l'analyse, il est possible de changer la connexion utilisée par le fichier.
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 pseudo-connexion (utilisation d'une base de données HFSQL Classic) aura les paramètres suivants :
datasource: "c:\tmp"
database : ""
user : ""
password : ""
provider : hAccèsHF7
// Décrire la nouvelle connexion
HDécritConnexion ("MaConnexion", "", "", "c:\tmp", "", ...
hAccèsHF7, hOLectureEcriture, "")
// Indiquer que "Salaires" utilise la nouvelle connexion
HChangeConnexion("Salaires", "MaConnexion")
// Commencer le parcours de la table "Salaires" sur SQLServer
HLitPremier("Salaires")
...
// Fermer le fichier
HFerme("Salaires")
...
// 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 sur un fichier Access (MDB)
WINDEVCode Utilisateur (MCU)
La base de données de l'entreprise est sur Access. Le code suivant permet d'accéder aux données.
// Variables de connexion
sNomConnexion est une chaîne = "CNX_ACCESS"
sTypeConnexion est une chaîne = "Microsoft.Jet.OLEDB.4.0"
sTypeAccès est un entier = hOLectureEcriture
sNomSource est une chaîne = "C:\MaBaseAccess.mdb"
sNomBase est une Source de Données = ""
sNomUtilisateur est une chaîne = ""
sMotDePasse est une chaîne = ""
 
SI HDécritConnexion(sNomConnexion, sNomUtilisateur, sMotDePasse, ...
sNomSource, sNomBase, sTypeConnexion, sTypeAccès) ALORS
SI HOuvreConnexion(sNomConnexion) ALORS
HChangeConnexion(Cedex, "CNX_ACCESS")
Info("Connexion créée." + RC + ...
"Changement de connexion effectué")
SINON
Erreur(HErreurInfo())
FIN
SINON
Erreur(HErreurInfo())
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