Bonjour
Dans un script perl, j'utilise la commande "net use" pour connecter un partage samba en tant que lecteur réseau.
Voici un extrait de mon code:
Lorsque j'execute la commande "net use * \\xx.xx.xx.xx\interface /user:user pwd" depuis un fenetre dos, aucun probleme.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 #!C:\perl\bin\perl -w use strict; my $date=localtime; my $fromdir="interface"; print "\n************ $date: DEBUT DU SCRIPT $0 ************\n\n"; my $cmd='net use * \\xx.xx.xx.xx\interface /user:user pwd'; system("$cmd");
Lorsque j'execute la commande depuis un script .cmd, aucun probleme non plus.
Lorsque j'execute la commande depuis le script perl, j'ai le message d'erreur suivant:Auriez-vous une idée du problème ?L'erreur système 67 s'est produite.
Nom de réseau introuvable.
Partager