Page 1 sur 1

[..] Création d'un gui de transfert de data

Posté : mar. 12 août 2014 14:29
par Eldiablo84
Bonjour je voudrais effectuer la création d'un gui de transfert de data
Pourriez vous m'aider a créer un gui reproduisant un tableau de transfert de data entre deux poste en réseau
Poste 1 doit contenir le nom de la machine ou il y aura la réception des données
Poste 2 doit contenir le nom de la machine qui envoi les données vers le poste 1

pour la partie user et mot de passe il faudrait pouvoir ce connecter avec l'userid sur la machine 2 pour récupérer les données
la connexion de la machine ce fait via le mapping machine \\nom de la machine\c$

Bouton ok pour lancer le script
Annuler pour stopper
et le must du must serai une barre de pourcentage avec les tache en cours

Merci d'avance pour votre aide

Re: [..] Création d'un gui de transfert de data

Posté : jeu. 14 août 2014 09:41
par Eldiablo84
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ###
$Form1 = GUICreate("Form1", 501, 341, 285, 208)
GUISetBkColor(0xC0C0C0)
$OK = GUICtrlCreateButton("OK", 136, 224, 89, 41, $WS_GROUP)
$Annuler = GUICtrlCreateButton("Annuler", 280, 224, 89, 41, $WS_GROUP)
$Userid = GUICtrlCreateInput("Profil Utilisateur ", 64, 152, 137, 21)
$Motdepasse = GUICtrlCreateInput("Mot de passe Utilisateur ", 296, 152, 137, 21)
$TitreUserid = GUICtrlCreateLabel("User ID", 112, 128, 40, 17)
$TitreMotdepasse = GUICtrlCreateLabel("Mot de passe", 336, 128, 68, 17)
$ZonePc1 = GUICtrlCreateInput("RNEMVMRI", 40, 80, 185, 21)
$ZonePc2 = GUICtrlCreateInput("RNEMVMRI", 272, 80, 185, 21)
$TitrePoste1 = GUICtrlCreateLabel("Poste 1", 112, 64, 40, 17)
$TitrePoste2 = GUICtrlCreateLabel("Poste 2", 344, 64, 40, 17)
$TitrePrincipal = GUICtrlCreateLabel("Script Siège", 184, 8, 117, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Verdana")
$Progress1 = GUICtrlCreateProgress(136, 272, 233, 25)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1)
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 33)
GUISetState(@SW_SHOW)
#EndRegion ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Form1
EndSwitch
WEnd