Probleme de connection à la baseRésolu

Question

Bonjour
je viens de formater mon ordi,j'ai tous réinstaller,et quand je veut lancer mon prog ,jai le message "MsgBox" qui s'affiche,pourtant la base est bien dans le dossier BD,je ne comprends pas 


' Variables connection BD
Public Db As ADODB.Connection
Public requete As String

Sub Main()
On Error GoTo erreur
'Connection base de donnée
Set Db = New ADODB.Connection
Db.Provider = "Microsoft.Jet.OLEDB.4.0;User ID=admin;Data Source=" & App.Path & "\BD\centre_aéré.mdb;" & "Persist Security Info=False"
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 BD", vbCritical, "Erreur de connection"
End
End Sub
auriez vous une idée
merci
petchy

cs_ghuysmans99 · Accepted Answer

Db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=admin;Data Source=" & App.Path & "\BD\centre_aéré.mdb;Persist Security Info=False"
Afficher Err.Description ne serait peut-être pas une mauvaise idée !
---
VB.NET is good ... VB6 is better

cs_petchy · Answer

Re

j'ai désinstaller VB6 et je l'ai réinstallé et tout fonctionne 
@ plus
petchy

Probleme de connection à la base

2 réponses

Votre réponse

Discussions similaires