Connexion odbc

bzouhour Messages postés 2 Date d'inscription samedi 17 novembre 2007 Statut Membre Dernière intervention 8 février 2008 - 19 janv. 2008 à 22:22
wtor Messages postés 59 Date d'inscription dimanche 23 novembre 2003 Statut Membre Dernière intervention 18 mars 2011 - 20 janv. 2008 à 01:38
SVP, j'ai besoin d'un code qui assure la connexion à access en utilisant odbc.(vb 6.0)

1 réponse

wtor Messages postés 59 Date d'inscription dimanche 23 novembre 2003 Statut Membre Dernière intervention 18 mars 2011
20 janv. 2008 à 01:38
bonjour

essayez ce bout de code

Dim Con As ADODB.Connection


Private Sub Form_Load()
  Dim SrcODBC As String
 
  'Cette variable contien un nom de source de données ODBC
  SrcODBC = "Nom_Source_ODBC"
  Set Con = New ADODB.Connection
  Con.Open "Provider=MSDASQL.1;Persist Security Info=False;User ID=Admin;Data Source=" & SrcODBC
 
End Sub
0
Rejoignez-nous