Discussion :

[jean tof]

Bonjour

J'aimerais pourvoir créer un repertoire sur un poste distant mais mon problème, c'est qu'il faut s'identifier pour pouvoir entrer sur le pc distant. J'ai essayer en m'identifiant manuellement puis créer mon repertoire avec mon petit programme perl avec la fonction mkdir, et ça marche nikel. Et maintenant j'aimerais pouvoir m'identifier automatiquement et créer mon repertoire. J'ai essayer de faire comme avec le FTP c'est a dire utilisateur:motdepasse@toto.com, mais ça ne marche pas.

Voici ma ligne qui créer mon répertoire sur un poste distant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

mkdir "\\192.168.1.1\TFTP\";

Merci d'avance

P.S. Je travaille sous Windows XP

[2Eurocents]

Bonjour,

Voici ma ligne qui créer mon répertoire sur un poste distant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

mkdir "\\192.168.1.1\TFTP\";

...

P.S. Je travaille sous Windows XP

Une solution consisterait à connecter un lecteur réseau, puis à aller créer un répertoire dans celui-ci.

Dans ce cas, il y a des informations disponibles dans ce fil . Le module Win32::NetRessource est probablement un bon bout de solution.

En tout état de cause, il ne faut pas mélanger les ressources et les protocoles comme tu étais tenté de le faire ...

//192.168.1.1/TFTP (avec des /, et pas des \, parce que Perl fait automatiquement le remplacement qui va bien), c'est un partage Microsoft, donc du protocole SMB.

On ne peut donc en aucun cas y accéder avec des protocoles tels que FTP ou NFS. Et la logique d'identification/authentification peut être totalement différente (tu t'en es aperçu ).

Il faut utiliser le protocole adéquat, et c'est ce que propose le module cité dans le fil que je t'ai donné. Les fonctions de connexion fournies reçoivent les bons paramètres d'authentification et ensuite, tout va bien 8).

Bon courage, et bon Perl !

[jean tof]

Ok merci bien pour le lien, je vais regarder ça.

[jean tof]

Voila pour ceux que cela interresse.

Ouverture d'une session windows

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
use Win32::NetResource;
 
$repTFTP = '\\\\192.168.1.103\Dossier';
my $utilisateurDistant = "utilisateur";
my $mdpDistant = "motDePasse";
my $ConnectionDistante=0;
my %NETRESOURCE;
 
$NETRESOURCE{'Type'}=RESOURCETYPE_DISK;
$NETRESOURCE{'RemoteName'}=$repTFTP;
my $Connect=Win32::NetResource::AddConnection(\%NETRESOURCE, $mdpDistant, $utilisateurDistant, $ConnectionDistante);

et pour se déconnecter normalement c'est comme cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my $Connect = Win32::NetResource::CancelConnection(\%NETRESOURCE,$ConnectionDistante,1);

Mais la connexion n'est pas fermer car quand je veux y aller avec l'explorateur de windows, il ne me redemande pas de m'identifier.
Donc si quelqu'un sait pourquoi la session n'est pas fermée, merci de me tenir au courant.