J'ai un problème avec la connection a ma base de données...Chez moi ça marche très bien mais lorsque je l'ai essayé sur plusieurs autres PC, ça ne fonctionnait pas !!
Voila mon code (VB6)
------------------------------------------------------------------------------
' Variables connection BD
Public DB As ADODB.Connection
Public Rs As ADODB.Recordset
Sub Main()
On Error GoTo Erreur
'Connection base de donnée
Set DB = New ADODB.Connection
DB.Provider = "Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\donnees\Film.mdb"
DB.Open
Frm_Accueil.Show
Exit Sub
Erreur:
MsgBox "Probleme de connection à la base de donnée" & vbCrLf & "Vérifiez que la base de donnée se situe dans le repertoire donnees", vbCritical, "Erreur de connection"
End
End Sub
------------------------------------------------------------------
Quelqu'un a une idée d'ou peu venir le pb ?
merci d'avance pour vos réponses...