Enregistrement avec CommonDialog sur le réseauRésolu

Question

Salut!!!!

Voilou, je me sert d'un CommonDialog pour récupérer une adresse de sauvegarde. Seulement je voudrai que le commonDialog s'ouvre directement sur un dossier qui se trouve sur le réseau, et en cas d'absence du réseau, qu'il souvre sur un répertoire en local sur la machine.
J'ai essayé de faire comme ceci, mais lorsque le réseau est innaccesible, le soft plante, j'ai même essayé avec des on error goto mais il ne passe pas en Error quand le réseau est innaccesible.

If Dir$("\Data_Serveur", vbDirectory) <> vbNullString Then    'Là j'essai de tester si le réseau est
CommonDialog1.InitDir = "\Data_Serveur\Public\PV"                'accesible mais ca marche pas!
Else
CommonDialog1.InitDir = "C:\PV"
End If
CommonDialog1.Flags = cdlOFNHideReadOnly
CommonDialog1.FileName = Textbox1.text             'Ici c'est le nom de sauvegarde du fichier
CommonDialog1.Filter = "Fichier (.*xls) | *.xls"
CommonDialog1.ShowSave

Ma question est donc, comment savoir proprement si le réseau est accessible ou non?

Merciiiiii

Renfield · Accepted Answer

et voilà exactement pourquoi il ne faut pas utiliser Dir$ pour tester la présence de fichiers :p


Public Function IsFileExisting(ByRef Path As String) As Boolean
    IsFileExisting = (GetFileAttributes(Path) <> -1)
End Function 

en ayant déclaré :

Private Declare Function GetFileAttributes Lib "kernel32.dll" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long

mortalino · Answer

salut,

ton serveur, dans le poste de travail, il a bien une lettre associé au chemin, non ?
S:\, N:\, par exemple

@++ 

<hr size="2" width="100%" />( Nouveau forum : Exclusivement Office & VBA

cs_cyriloo · Answer

Énorme[auteurdetail.aspx?ID=2359 Renfield] ! Merci ! ça marche impec.

Mortalino, je peux pas mettre la lettre associé au chemin car les lecteurs réseaux sont montés à l'aide d'un script, et c'est pas dis que tous les utilisateur auront la même lettre de lecteur réseau en fonction de leurs machines.

Enregistrement avec CommonDialog sur le réseau

3 réponses

Votre réponse

Discussions similaires