Page 1 sur 1

[R] Redirection commande DOS

Posté : mer. 04 nov. 2009 12:17
par DimVar
Bonjour,

Voici un pb que je rencontre souvent.
Je souhaite, sur une commande DOS, faire une redirection vers un fic txt.
En gros, je map un lecteur reseau.
Je lance un "net use" vers fic txt pour l'afficher dans notepad pour controller que le lecteur est bien monté.
Voila le code auquel j'ai pensé :

Code : Tout sélectionner

dim $file1, $file
$file_netuseLog = FileOpen("c:\temp\netuse.log", 9)
FileClose($file_netuseLog)


$net_delete = "net use * /delete /yes"
$net_use_y = "net use y: \\128.xxx.xxx.45\_test"
$net_use_control = "net use > c:\temp\netuse.log"


Run(@ComSpec & " /c " & $net_delete, "", @SW_HIDE)
Run(@ComSpec & " /c " & $net_use_y, "", @SW_HIDE)
Run(@ComSpec & " /c " & $net_use_control, @SW_HIDE)

run ("notepad c:\temp\netuse.log")
Le script ne plante pas, mais le fichier log reste vide... :?

Une idée ?

D'avance merci de votre aide.

Cdlt, Dimvar.

Re: REdirection commande DOS

Posté : mer. 04 nov. 2009 15:58
par DimVar
J'ai trouvé un autre procédé :

Code : Tout sélectionner

dim $file1, $file
dim $net_delete = "net use * /delete /yes"
dim $net_use_y = "net use y: \\128.xxx.xxx.45\_test"
dim $net_use_control = "net use > c:\temp\netuse.log"

If FileExists ("c:\temp\netuse.log") Then FileDelete ("c:\temp\netuse.log")
If FileExists ("c:\temp\netuse.bat") Then FileDelete ("c:\temp\netuse.bat")
MsgBox (0,"delete all","")

$file_netuseLog = FileOpen("c:\temp\netuse.log", 9)
FileClose($file_netuseLog)
MsgBox (0,"cree le log","")

$file_netuseBat = FileOpen("c:\temp\netuse.bat", 9)
FileWriteLine ($file_netuseBat, "net use > c:\temp\netuse.log")
FileClose($file_netuseBat)
MsgBox (0,"cree le bat","")


Run(@ComSpec & " /c " & $net_delete, "", @SW_HIDE)
Sleep(5000)
Run(@ComSpec & " /c " & $net_use_y, "", @SW_HIDE)
MsgBox (0,"map les drives","")

Run("c:\temp\netuse.bat","", @SW_HIDE)
Sleep(2000)
Run ("notepad c:\temp\netuse.log")
 
Si vous aviez la reponse, elle m'interesse toujours.
Je clos.

Merci.

Re: [R] Redirection commande DOS

Posté : mer. 04 nov. 2009 18:54
par Tlem
:shock:
DriveMapAdd() me semble bien plus pratique ...

Re: [R] Redirection commande DOS

Posté : jeu. 19 nov. 2009 12:33
par DimVar
Effectivement... :oops: