Visual Basic Scripting, ou VBS, vous permet de connecter à votre base de données interne pour récupérer des données pour vos utilisateurs. VBS est généralement utilisé par les administrateurs réseau Windows pour configurer les préférences sur l`ordinateur et la carte des lecteurs réseau d`un utilisateur. Vous vous connectez à une base de données en utilisant VBS pour récupérer les préférences utilisateur stockées dans les tables de base de données Microsoft SQL Server. L`objet utilisé pour se connecter est appelé "ADO," qui est un objet de connexion Microsoft disponible pour chaque langage de programmation Microsoft.
droite, cliquez sur votre fichier de script VBS et sélectionnez "Ouvrir avec." Double-cliquez sur "Bloc-notes" pour ouvrir le fichier dans votre éditeur de texte. Si vous avez un éditeur tiers, double-cliquez dessus.
Créez vos variables d`ADO. Les variables d`objet ADO sont utilisés pour se connecter à votre base de données. L`objet contient les fonctions et les propriétés utilisées pour se connecter dans un environnement Windows. Tapez le code suivant dans votre fichier:
Set conn = CreateObject ("ADODB.Connection")
Set rs = CreateObject ("ADODB.Recordset")
Créez la connexion. le "connexion" objet que vous avez créé à l`étape 2 permet de vous connecter à la base de données. Vous devez spécifier votre serveur de base de données, nom d`utilisateur et mot de passe. Tapez le code suivant dans l`éditeur:
conn.Open "Provider = SQLOLEDB-Data Source = sql_server-Trusted_Connection = Yes-Initial Catalog = db_name-User ID = utilisateur Mot de passe = passe"
Remplacer "serveur SQL" avec votre nom de serveur MS SQL. Remplacer "db_name" avec le nom de votre base de données, et remplacer "utilisateur" et "passer" avec le nom d`utilisateur SQL Server et mot de passe mis en place sur la base de données.
Récupérer les enregistrements de la base de données. Maintenant que vous avez une connexion, vous pouvez interroger les tables pour les enregistrements. Voici un exemple d`interrogation pour le nom d`un employé:
query = "sélectionnez le nom des employés"
rs.Open requête, conn, adOpenStatic, adLockOptimistic
Remplacez la requête variable chaîne avec votre propre requête.
presse "Ctrl" et "S" pour enregistrer vos modifications. Double-cliquez sur le fichier VBS pour l`exécuter dans Windows et tester le nouveau code.
