Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

VB6 et réseau

3 réponses
Avatar
gbonamy
Bonjour,
J'utilise VB6 et je voudrais pouvoir lire/copier le contenu de certains
fichiers partagés sur un autre PC
relié en réseau.
Je ne sais comment m'y prendre : dir(\\nomdupc\nomdudossier\nomdufichier) ne
semble pas marcher.
Merci d'avance pour votre aide.
gbonamy

3 réponses

Avatar
Jean-marc
gbonamy wrote:
Bonjour,
J'utilise VB6 et je voudrais pouvoir lire/copier le contenu de
certains fichiers partagés sur un autre PC
relié en réseau.
Je ne sais comment m'y prendre :
dir(nomdupcnomdudossiernomdufichier) ne semble pas marcher.
Merci d'avance pour votre aide.
gbonamy



Hello,

Pour parcourir un répertoire distant (avec Dir$),
c'est tout simple:

Dans cet exemple, CHRISDESK est le nom de la machine
distante:
'--------------------------------------
Dim s As String

s = Dir$("CHRISDESKJMexchgvb*.*")
While s <> ""
Debug.Print s
s = Dir$
Wend
'--------------------------------------

Pour détruire un fichier distant:
Kill "CHRISDESKJMexchgvbnoel_rene001.gif"

Bien sur, tout ceci ne fonctionne que si les
répertoires sur la machine distante sont partagées
et munies des bons droits (lecture/écriture/etc).

Tu trouveras pas mal d'infos sur la manipulation des
fichiers dans la FAQ VB:
http://faq.vb.free.fr/index.php?rubrique

Cordialement,

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/
Avatar
gbonamy
Bonjour et merci pour ta réponse.
Mon erreur était de mettre la lettre du disque dans la description du
fichier alors que seul le dossier est partagé (pas le disque) :
je faisais Dir(m70c:mes documents*.*") alors qu'il fallait faire
Dir(m70mes documents*.*")
Encore merci et à +
Gilbert


"Jean-marc" a écrit dans le message
de news: 464c22cd$0$14238$
gbonamy wrote:
Bonjour,
J'utilise VB6 et je voudrais pouvoir lire/copier le contenu de
certains fichiers partagés sur un autre PC
relié en réseau.
Je ne sais comment m'y prendre :
dir(nomdupcnomdudossiernomdufichier) ne semble pas marcher.
Merci d'avance pour votre aide.
gbonamy



Hello,

Pour parcourir un répertoire distant (avec Dir$),
c'est tout simple:

Dans cet exemple, CHRISDESK est le nom de la machine
distante:
'--------------------------------------
Dim s As String

s = Dir$("CHRISDESKJMexchgvb*.*")
While s <> ""
Debug.Print s
s = Dir$
Wend
'--------------------------------------

Pour détruire un fichier distant:
Kill "CHRISDESKJMexchgvbnoel_rene001.gif"

Bien sur, tout ceci ne fonctionne que si les
répertoires sur la machine distante sont partagées
et munies des bons droits (lecture/écriture/etc).

Tu trouveras pas mal d'infos sur la manipulation des
fichiers dans la FAQ VB:
http://faq.vb.free.fr/index.php?rubrique

Cordialement,

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/




Avatar
Jean-marc
gbonamy wrote:
Bonjour et merci pour ta réponse.
Mon erreur était de mettre la lettre du disque dans la description du
fichier alors que seul le dossier est partagé (pas le disque) :
je faisais Dir(m70c:mes documents*.*") alors qu'il fallait faire
Dir(m70mes documents*.*")
Encore merci et à +
Gilbert



Hello,

merci pour le retour :-)


Cordialement;


--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/