Remerciez-le!

Remerciez @Admin pour avoir partagé cet document gratuitement, de la manière la plus simple, en partageant sur les réseaux sociaux.

Développer sous Microsoft Visual Basic 6 Denis Szalkowski - Tous droits réservé

Développer sous Microsoft Visual Basic 6 Denis Szalkowski - Tous droits réservés 7 7 7 7 7. Le client ser . Le client ser . Le client ser . Le client ser . Le client serv v v v veur a eur a eur a eur a eur av v v v vec SQL Ser ec SQL Ser ec SQL Ser ec SQL Ser ec SQL Serv v v v ver er er er er 7.1 7.1 7.1 7.1 7.1 Denis Szalkowski Tous droits réservés Hist Hist Hist Hist Historique des méthodes de conne orique des méthodes de conne orique des méthodes de conne orique des méthodes de conne orique des méthodes de connexion xion xion xion xion En terme de middleware, c'est-à-dire de logiciel de connectivité entre les applications et le serveur de base de données, Sybase et Microsoft ont proposé avec SQL Server 1 un client développé en C : DB-Library. Avec Windows 3.x, Microsoft a développé une méthode universelle et ouverte avec ODBC (Open Data Base Connectivity) qui permet de se connecter à Access et à SQL Server. Avec DAO (Data Access Objects), Microsoft définit un modèle objet S'appuyant sur ODBC. Le Client devient complètement indépedant de la abse de données. RDO (Remote Data Objects) permer d'accroître les performances de cette méthode. Visula Basic 6 s'appuie aujourd'hui sur OLE-DB et le modèle objet ADO (ActiveX Data Objects). Avec Visual Studio .Net, les outils De middleware s'appuient sur .Net Framework. A A A A Accès à SQL Ser ccès à SQL Ser ccès à SQL Ser ccès à SQL Ser ccès à SQL Serv v v v ver er er er er Il existe deux manières d'accéder aux données sur les machines à base de processeurs Intel compatibles et de systèmes d'exploitation Windows 98-98-Nt Workstation 4. Vous pouvez disposer d'un accès natif, propriétaire et souvent plus rapide. Le système propriétaire de Microsoft repose sur Jet. Il vous permet de vous connecter notamment à une base Access. Ou bien, vous pouvez utiliser ODBC, Open Data Base Connectivity qui vise à une plus grande ouverture et interopérabilité en vous éloignant des couches matérielles. Vous accédez aux ressources par le biais d'un identifiant logique : le DSN (Data Source Name). Utiliser le composant A Utiliser le composant A Utiliser le composant A Utiliser le composant A Utiliser le composant Ado do do do do A partir du menu Démarrer, choisissez Paramètres | | | | | Panneau de configuration. . . . . Double-cliquez sur l'icône . Pour créer votre DSN, vous disposez de deux possibilités : un DSN attaché à l'utilisateur (non accessibles aux autres), un DSN attaché à la machine (accessibles à Client- Client- Client- Client- Client- ser ser ser ser serv v v v veur eur eur eur eur ODBC ODBC ODBC ODBC ODBC Visual Basic Visual Basic Visual Basic Visual Basic Visual Basic 7.2 7.2 7.2 7.2 7.2 Denis Szalkowski Tous droits réservés DSN DSN DSN DSN DSN tous les utilisateurs). Cliquez sur le bouton . Utiliser les Data En Utiliser les Data En Utiliser les Data En Utiliser les Data En Utiliser les Data Envir vir vir vir vironments onments onments onments onments La première consiste à déterminer le pilote représentant la nature de la base de données. Dans l'exemple ci-dessous, il s'agit de Microsoft Access. Entrez un alias qui représente la connexion dans le nom de la source de données. C'est le nom que vous emploierez sous VB pour vous connecter. La description explicite sous forme d'un commentaire la source de données. Dans une seconde phase, cliquez sur le bouton pour choisir la base de données. Sélectionnez alors la base de données. Dans l'exemple, il s'agit de la base de données Biblio fournie avec la distribution de Visual Basic. Cont Cont Cont Cont Contenu du f enu du f enu du f enu du f enu du fic ic ic ic ichier UDL hier UDL hier UDL hier UDL hier UDL [oledb] Data Data Data Data Data Contr Contr Contr Contr Control ol ol ol ol 7 7 7 7 7. Le client ser . Le client ser . Le client ser . Le client ser . Le client serv v v v veur a eur a eur a eur a eur av v v v vec SQL Ser ec SQL Ser ec SQL Ser ec SQL Ser ec SQL Serv v v v ver er er er er 7.3 7.3 7.3 7.3 7.3 Denis Szalkowski Tous droits réservés L'e L'e L'e L'e L'ex x x x xemple emple emple emple emple ; Everything after this line is an OLE DB initstring Provider=SQLOLEDB.1;Password="";Persist Security Info=True;User ID=SA;Initial Catalog=Northwind;Data Source=SERVER2\DSFC P P P P Par le code ar le code ar le code ar le code ar le code Connexion en mode SQLOLEDB en définissant les propriétés de connexion ‘ Déclaration des variables Dim cn As New ADODB.Connection ‘ Fournisseur OLE-DB. cn.Provider = «sqloledb» ‘ Définition des propriétés de connexion cn.Properties(«Data Source»).Value = «SERVER2\DSFC» cn.Properties(«Initial Catalog»).Value = «NorthWind» ‘ Type d’authentification If optWinNTAuth.Value Then cn.Properties(«Integrated Security»).Value = «SSPI» Else cn.Properties(«User ID»).Value = «sa» cn.Properties(«Password»).Value = «» End If ‘ Ouverture de la base cn.Open Connexion en mode SQLOLEDB par un chaîne de connexion ‘ Déclaration des variables. Dim cn As New ADODB.Connection Visual Basic Visual Basic Visual Basic Visual Basic Visual Basic 7.4 7.4 7.4 7.4 7.4 Denis Szalkowski Tous droits réservés DataGrid DataGrid DataGrid DataGrid DataGrid DataList DataList DataList DataList DataList Cr Cr Cr Cr CrystalR ystalR ystalR ystalR ystalRepor epor epor epor eport t t t t Dim provStr As String ‘ Fournisseur OLE-DB. cn.Provider = «sqloledb» ‘ Ouverture de la connexion ProvStr = «Server=MyServer;Database=northwind;Trusted_Connection=yes» cn.Open provStr Utilisation de MSDASQL (via un DSN ODBC) Dim cn As New ADODB.Connection cn.ConnectionTimeout = 100 ‘ Le DSN Suppose la création préalable d’une connexion ODBC cn.Open «MyDataSource», «sa», «MyPassword» ‘ Autre syntaxe ‘ cn.Open «DSN=DataSourceName;UID=sa;PWD=Password;» 7 7 7 7 7. Le client ser . Le client ser . Le client ser . Le client ser . Le client serv v v v veur a eur a eur a eur a eur av v v v vec SQL Ser ec SQL Ser ec SQL Ser ec SQL Ser ec SQL Serv v v v ver er er er er 7.5 7.5 7.5 7.5 7.5 Denis Szalkowski Tous droits réservés cn.Close Utilisation de MSDASQL (via ODBC sans DSN) Dim cn As New ADODB.Connection ‘ Pas de Data Source Name cn.Open «Driver={SQL Server};Server=Server1;Uid=SA;Pwd=;Database=northwind» cn.Close Visual Basic Visual Basic Visual Basic Visual Basic Visual Basic 7.6 7.6 7.6 7.6 7.6 Denis Szalkowski Tous droits réservés Le Data Control, contrôle accessible à partir de la boîte à outils, représente le jeu d'enregistrements auquel votre application peut accéder. Il peut s'agir d'une table, d'un requête sous la forme d'un ordre SQL SELECT en lecture-écriture ou lecture seule. A partir de la boîte à outils, sélectionnez l'outil Data et dessinez une surface dans la feuille correspondant à l'emplacement du Data Control. Au préalable, nommez votre DataControl à l'aide de la propriété Name Data_AUTEURS par exemple. Dans un deuxième temps, vous devez déterminer la nature de la connexion à l'aide de la propriété Connect. Pour se connecter à Access via MS Jet, choisissez dans la liste Access. Pour se accéder via ODBC, veuillez taper dans la zone ODBC;DSN=Biblio;[UID=UserName;PWD=Password;]. Le fait de rentrer en "dur" le mot de passe ne répond à une bonne logique de sécurité. Pour les connexions de type MsJet, sélectionnez directement la base Access par DataBaseName. Si vous choisissez l'un ou l'autre mode, allez préciser la nature de la connexion au niveau de la propriété DefaultType. Pour ODBC, prenez UseODBC. UseJet est réservé à l'emploi de connexions de type MsJet. Pensez aussi au niveau dur DefaultCursorType à choisir en mode ODBC à prendre ODBCCursor. Il vous reste encore deux étapes. Précisez le RecordSetType. Le type Table est réservé à la connexion MsJet. La différence entre le type Dynaset et Snapshot est que le premier permet des opérations en lecture-écriture alors que le second ne permet que les accès en consultation (lecture seule). Enfin, entrez l'ordre SELECT correspondant à la collection d'enregistrements dans la propriété RecordSource, par exemple SELECT * FROM Authors. En mode MsJet, vous pouvez sélectionner directement la table. S S S S Structure de la base Biblio tructure de la base Biblio tructure de la base Biblio tructure de la base Biblio tructure de la base Biblio Les contrôles dépendants Les contrôles dépendants Les contrôles dépendants Les contrôles dépendants Les contrôles dépendants Vous pouvez lier des contrôles standards diffusés avec VB comme la zone de texte, la case à cocher, la zone de liste, la zone de liste modifiable et le conteneur OLE pour les images au Data Control précédemment créé. Maniement Maniement Maniement Maniement Maniement du du du du du R R R R Recordse ecordse ecordse ecordse ecordset t t t t 7 7 7 7 7. Le client ser . Le client ser . Le client ser . Le client ser . Le client serv v v v uploads/S4/ support-vb-6.pdf