Common dialogRésolu

Question

J'ai cr&#233;&#233; un common dialog en open , mais quand je lance le programme et que je selectionne mon fichier dans ce common dialog , je clic sur ouvrir et rien ne ce passe ... Quelqu'un pourrait m'expliquer comment &#231;a fonctionne . 
J'ai mis :
On error GoTo annulation
cmd.DialogTitle = "Ouvrir"
cmd.CancelError = True
cmd.Filter = "Fichier access (*.mdb) | *.mdb"
cmd.FilterIndex = 1
cmd.InitDir = "c:"
cmd.ShowOpen
annulation :

cs_DARKSIDIOUS · Accepted Answer

Pour lancer la base de donn&#233;es &#224; partir d'un nom de fichier, utilise la
fonction Shell, pour la copier &#224; un autre endroit, utilise la fonction
FilyCopy (le fichier ne doit alors pas &#234;tre ouvert !)

DarK Sidious

Administrateur et reponsable VB/API du site www.ProgOtoP.com

mrdep1978 · Answer

La CommonDialog permet uniquement de choisir le fichier, &#224; toi ensuite de mettre le code n&#233;cessiare
Exemple, si tu veux ouvrir une connexion &#224; la base de donn&#233;es en partant de ton code :

Private Sub cb_Click()
Dim cnnConn as ADODB.Connection
On error GoTo annulation
cmd.DialogTitle = "Ouvrir"
cmd.CancelError = True
cmd.Filter = "Fichier access (*.mdb) | *.mdb"
cmd.FilterIndex = 1
cmd.InitDir = "c:"
cmd.ShowOpen
Set cnnConn = New ADODB.Connection
With cnnConn
    .ConnectionString = _
        "Provider=Microsoft.Jet.OLEDB.4.0"
    .Open cmd.FileName

End With
annulation : 
End Sub

oBud · Answer

Ahhh D'accord merci ... Non en fait j'aurais juste aim&#233; qu'il ouvre le fichier access ...
Ou alors de pouvoir selectionner la base sur laquelle on travaille et lenregistrer ailleurs &#231;a serait pas mal &#231;a aussi .... Mais je ne sais absolument pas comment faire....
Si quelqu'un a une id&#233;e elle sera labien venue :)

oBud · Answer

Merciiiiiiii :)

Common dialog

4 réponses

Discussions similaires