Page 1 sur 1
[..] Script pour copier et déplaces des documents ?
Posté : mar. 23 juin 2009 10:09
par Wink
Bonjour,
Voici mon projet :
Chaque fin de mois, des statistiques sont créées (grâce à un autre script !), qui sont sous la forme de 4 fichiers Excel distincts (1 pour chaque service de mon entreprise).
Ils sont stockés sur un serveur de fichier.
Il faudrait que, grâce à un script, je puisse faire en sorte d'aller copier ces 4 fichiers Excel (ou le dossier qui les contient), pour aller le coller dans un autre serveur, accessible via le réseau externe de l'entreprise.
En gros, notre directeur qui est situé dans d'autres locaux souhaite avoir les statistiques de notre site de production, sur son serveur de fichier, auquel on a accès, car lui n'a pas accès au notre !
Est-ce réalisable, du moins sans passer par la commande 'SEND' qui serait, je pense, inappropriée !
Qu'en pensez-vous ?
Merci pour votre aide !
Cordialement,
Re: [..] Script pour copier et déplaces des documents ?
Posté : mar. 23 juin 2009 10:20
par Wink
Petite rectification : il faudrait que l'utilisateur ait la possibilité de choisir ces 4 fichiers justement.
A l'aide d'un bouton parcourir par exemple, ça serait le top !
Après renseignements, j'ai cru comprendre que je pouvais utiliser la fonction Filecopy pour arriver à ce que je souhaite ?
Mais ensuite, comment faire apparaître un bouton "parcourir" qui permettrait de sélectionner ces fichiers ?
Re: [..] Script pour copier et déplaces des docume
Posté : mar. 23 juin 2009 10:49
par jbnh
Salut, je me suis amusé a refaire une interface en me basant sur un de mes anciens script pour choisir les fichiers / dossiers à envoyer.
Dis moi quoi...
Sinon, si j'ai bien compris il faut envoyer tout sur un ftp ?
Re: [..] Script pour copier et déplaces des documents ?
Posté : mar. 23 juin 2009 11:04
par Wink
Oui c'est nickel c'est ce que je cherchais à faire :
pourvoir parcourir des fichiers/dossiers puis "enregistrer la saisie" pour pouvoir justement transférer ces fichiers sur un autre serveur !
Je vais essayer de me débrouiller pour associer au bouton transférer ce que je viens de t'expliquer... je te tiens au courant !
Merci !!!
Re: [..] Script pour copier et déplaces des docume
Posté : mar. 23 juin 2009 11:09
par jbnh
Pour le ftp cherche
ici. En espérant que ça marche pour toi.
Re: [..] Script pour copier et déplaces des documents ?
Posté : mar. 23 juin 2009 11:17
par Wink
C'est pas vraiment un ftp en fait...
Je pense qu'avec la fonction FileCopy cela suffirait :
En fait, une fois que l'utilisateur a choisi soit :
- ses 4 fichier
- tout le dossier
Il faut qu'en cliquant sur le bouton "Transférer", le dossier soit copié vers un lecteur réseau (portant la lettre 'O' par exemple).
Tu vois ce que je veux dire ?
Du genre :
FileCopy($Input_2, "\\10.69.xx.xx\fichiers")
Ça serait bon ?
Re: [..] Script pour copier et déplaces des documents ?
Posté : mar. 23 juin 2009 11:43
par Wink
J'ai un souci avec la fonction "DirCopy" ...
En fait, le but est de récupérer la saisie utilisateur (= le dossier qu'il a choisi) pour pouvoir transférer le dossier vers un endroit défini, lorsqu'il clique sur transfert ...
Je te mets le code en entier :
► Afficher le texte
Code : Tout sélectionner
#include <GuiConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>
GuiCreate("Envoi de fichiers / dossier", 350, 270)
$input_selection = GUICtrlCreateInput("Veuillez sélection un fichier / dossier", 55, 10, 220, 20)
$Button_1 = GUICtrlCreatePic("ressources/file.jpg", 280, 10, 20, 21)
$Button_2 = GUICtrlCreatePic("ressources/folder.jpg",305, 10, 21, 20)
;-----------------------------------------------------------------------------------------------------------
$Input_2 = GUICtrlCreateEdit("", 25, 50, 300, 140)
;-----------------------------------------------------------------------------------------------------------
$Input_3 = GUICtrlCreateLabel("0", 110, 200)
GUICtrlCreateLabel("Fichiers et ", 120, 200)
$Input_4 = GUICtrlCreateLabel("0", 175, 200)
GUICtrlCreateLabel("Dossiers", 185, 200)
$Button_3 = GUICtrlCreateButton("Transférer !", 135, 225, 70, 30)
GUISetState(@SW_SHOW)
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button_1
$Opened_File = FileOpenDialog("Ajouter un fichier :", "", "All Files (*.*)",12)
If GUICtrlRead($Input_2) = "" Then
$Tmp = $Opened_File
Else
$Tmp = GUICtrlRead($Input_2) & @CRLF & $Opened_File
Endif
If not $Opened_File = "" Then
GUICtrlSetData($Input_2, "")
GUICtrlSetData($Input_2, $Tmp)
$addfile = GUICtrlRead($Input_3) + 1
GUICtrlSetData($Input_3, $addfile)
Endif
While 1
$msg_ = GUIGetMsg()
Switch $msg_
Case $GUI_EVENT_CLOSE
ExitLoop
Case $Button_3
MsgBox(1, "Test", "Ceci est un test")
EndSwitch
WEnd
Case $msg = $Button_2
$Opened_File2 = FileSelectFolder("Ajouter un répertoire :", "")
If GUICtrlRead($Input_2) = "" Then
$Tmp2 = $Opened_File2
Else
$Tmp2 = GUICtrlRead($Input_2) & @CRLF & $Opened_File2
Endif
If not $Opened_File2 = "" Then
GUICtrlSetData($Input_2, "")
GUICtrlSetData($Input_2, $Tmp2)
$addfolder = GUICtrlRead($Input_4) + 1
GUICtrlSetData($Input_4, $addfolder)
Endif
While 1
$msg_ = GUIGetMsg()
Switch $msg_
Case $GUI_EVENT_CLOSE
ExitLoop
Case $Button_3
DirCopy($Input_2, "Z:\Stats Générales\STATS GENERALES v2\_Outils\Sender v1")
EndSwitch
WEnd
Case $msg = $Button_3
MsgBox(48, "ERREUR", "Veuillez sélectionner au moins 1 fichier / dossier")
EndSelect
Wend
Grosso modo, j'ai juste rajouté à ton code (dans le cas ou on clique sur "ajouter un répertoire") ceci, pour faire la copie de répertoire :
Code : Tout sélectionner
While 1
$msg_ = GUIGetMsg()
Switch $msg_
Case $GUI_EVENT_CLOSE
ExitLoop
Case $Button_3
DirCopy($Input_2, "Z:\Stats Générales\STATS GENERALES v2\_Outils\Sender v1")
EndSwitch
Mais du coup ça ne marche pas !
Vois tu ce qui cloche ?
Re: [..] Script pour copier et déplaces des docume
Posté : mar. 23 juin 2009 11:51
par jbnh
Oula, pourquoi avoir mis deux boucles différentes ?
Regroupe dans dans un seul while pour qu'on y voit plus clair.
Ensuite tu dois récupérer les fichiers choisis dans l'input, avec guictrlread et séparer chaque fichiers dans une variable, tu vas donc utiliser stringsplit. Il faut ensuite détecter si c'est un dossier ou un fichier (verifier dans le chemin si il y a un . par exemple, dans ce cas ca serait un fichier).
Ya du boulot

mais j'ai pas le temps maintenant
Re: [..] Script pour copier et déplaces des documents ?
Posté : mar. 23 juin 2009 13:58
par Wink
OK, je vais bosser la-dessus !
Merci pour votre aide !