Auteur: Patrick BikerExemples évolués
Chaque exemple montre une utilisation pratique de la fonction du WLangage.
Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.
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 La nouvelle connexion vers la base SQL Server aura les paramètres suivants :
datasource: "Serveur_SQLServer" 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")
|
||
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")
|
