dave
-
31 oct. 2001 à 19:43
matpal
Messages postés3Date d'inscriptionvendredi 17 mai 2002StatutMembreDernière intervention17 mai 2002
-
17 mai 2002 à 11:25
J'essaye de lire le contenu d'une base de donnee et ca ne marche pas pourquoi ?
J'ai bien coche --> Microsoft ActiveX Data Objects 2.1 Library
Private Sub Command1_Click()
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
-----------------------------------------------
je pense que ton prb est que ta base est une version différente de la chaine de connection que tu lui demande essaie plutôt :
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Davide\Vb\colle_ref.mdb"
Dans le Module "Main" :
Public db As Connection
Public Conec As String, Conec2 As String
Public nombase As String, passbase As String, adoChaine As String
Sub Main()
passbase=""
nombase="c:\Davide\Vb\colle_ref.mdb"
Load formeMain
formeMain.Show
End Sub
Proc à Appler depuis la Form qui doit se connecter...
"formeMain" dans l'exemple.
Sub OpenBase()
On Error GoTo ErrOpen
'
'OUVERTURE DE LA BASE...
Set db = New Connection
db.CursorLocation = adUseClient
db.Mode = adModeShareDenyNone
matpal
Messages postés3Date d'inscriptionvendredi 17 mai 2002StatutMembreDernière intervention17 mai 2002 17 mai 2002 à 11:25
Ce n'est pas une reponse mais plutot une question: As tu resolu ton probleme car j'ai le meme et je voudrais bien ta solution ;-))
Une autre question ( car je suis plus que debutant en vb!!!): On met toujours la même chose dans provider="......" ??
Merci d'avance pour ta reponse