Connexion à une base de données oracle ou Mysql
cs_babylone5
Messages postés
7
Date d'inscription
lundi 29 août 2005
Statut
Membre
Dernière intervention
7 juin 2007
-
14 mars 2006 à 09:36
wassimosh007 Messages postés 1 Date d'inscription samedi 1 décembre 2007 Statut Membre Dernière intervention 12 octobre 2008 - 12 oct. 2008 à 00:30
wassimosh007 Messages postés 1 Date d'inscription samedi 1 décembre 2007 Statut Membre Dernière intervention 12 octobre 2008 - 12 oct. 2008 à 00:30
A voir également:
- Connexion à une base de données oracle ou Mysql
- Connexion base de données - Conseils pratiques -PHP
- Base de données javascript - Conseils pratiques -Javascript
- Récupérer données json (javascript) - Conseils pratiques -Javascript
- Connexion base de données mysql java netbeans - Forum Java
- Ebp impossible de se connecter à la base de données ✓ - Forum SQL
1 réponse
wassimosh007
Messages postés
1
Date d'inscription
samedi 1 décembre 2007
Statut
Membre
Dernière intervention
12 octobre 2008
12 oct. 2008 à 00:30
12 oct. 2008 à 00:30
Declaration des varables de connexion a la base
Dim DSN as String
Dim Server as string
Dim DataBase as string
Dim Login as string
Dim Pass as string
' Server MySQL
Server = "MonServerMySQL" ' ou 192.168.200.9
' Nom de la base
DataBase = "BaseDeTeste"
' Utilisateur pour la connexion
Login = "Testeur"
' Mot de passe de l'utilisateur
Pass = "hadock"
' Création de la chaine de connexion a la base
DSN = "driver={MySql};server=" & Server & ";db=" & DataBase & ";UID=" & Login & ";pwd=" & Pass & ";option=2048"
' Instantiation des objets d'utilisation de la base
Set Db = CreateObject("ADODB.Connection")
' Parametrage de la connexion base
Db.ConnectionTimeout = 30
Db.CommandTimeout = 30
' Connexion a la base
Db.Open DSN
puis il ne reste que de faire les requete
bon j'ai trouvé ca sur vbfrance.
normalement ca suffit
*bon chanse
Dim DSN as String
Dim Server as string
Dim DataBase as string
Dim Login as string
Dim Pass as string
' Server MySQL
Server = "MonServerMySQL" ' ou 192.168.200.9
' Nom de la base
DataBase = "BaseDeTeste"
' Utilisateur pour la connexion
Login = "Testeur"
' Mot de passe de l'utilisateur
Pass = "hadock"
' Création de la chaine de connexion a la base
DSN = "driver={MySql};server=" & Server & ";db=" & DataBase & ";UID=" & Login & ";pwd=" & Pass & ";option=2048"
' Instantiation des objets d'utilisation de la base
Set Db = CreateObject("ADODB.Connection")
' Parametrage de la connexion base
Db.ConnectionTimeout = 30
Db.CommandTimeout = 30
' Connexion a la base
Db.Open DSN
puis il ne reste que de faire les requete
bon j'ai trouvé ca sur vbfrance.
normalement ca suffit
*bon chanse
