Jump to content

2 inputs and execute gui

pcjunki

By pcjunki,
in AutoIt GUI Help and Support

 Share

Recommended Posts

pcjunki Polymath

pcjunki

Posted
Posted

i'm trying to make a simple gui to do a xcopy command.

i know there are lots of examples out there, but i want to learn how to do this.

my simple gui has 2 input, orginal destination and final destination.

when i click the xcopy button, the xcopy switches will already be "programmed" in the button.

i'm just having a hard time passing the 2 inputs and the button to execute

i understand a little about the variables, just don't know how to piece them together

here is what i have so far

#include <GUIConstants.au3>
#include < GuiButton.au3>
#Include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("xcopy gui", 523, 312, 193, 125)
$Label1 = GUICtrlCreateLabel("Source", 16, 24, 38, 17)
$input1 = GUICtrlCreateInput("", 16, 48, 465, 21)
$Label2 = GUICtrlCreateLabel("Destination", 16, 104, 57, 17)
$input2 = GUICtrlCreateInput("", 16, 128, 465, 21)
$xcopy = GUICtrlCreateButton("xcopy", 16, 184, 89, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd



Func xcopy($xcopy)
Run(@ComSpec & " /c xcopy /e /v /f /h /k /o /i ")



EndFunc
Link to comment
Share on other sites
  • Moderators
JLogan3o13 Universalist

JLogan3o13

Posted
  • Moderators
Posted (edited)

Hi, pcjunki. You are nearly there. The only thing I would change is your While statement. Something like this:

No need to pass the $xcopy variable when calling the xcopy function

While 1
Local $msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $xcopy
xcopy()
EndSelect
WEnd

For the xcopy function itself, I would do something like this:

Func xcopy()
ShellExecuteWait("xcopy.exe", GUICtrlRead($input1) & ' ' & GUICtrlRead($input2) & ' /e /v /f /h /k /o /i')
EndFunc
Edited by JLogan3o13

"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Link to comment
Share on other sites
pcjunki Polymath

pcjunki

Posted
  • Author
Posted

i made the change, now the gui closes, and nothing copies

here's what i have

#include <GUIConstants.au3>
#include < GuiButton.au3>
#Include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("xcopy gui", 523, 312, 193, 125)
$Label1 = GUICtrlCreateLabel("Source", 16, 24, 38, 17)
$input1 = GUICtrlCreateInput("", 16, 48, 465, 21)
$Label2 = GUICtrlCreateLabel("Destination", 16, 104, 57, 17)
$input2 = GUICtrlCreateInput("", 16, 128, 465, 21)
$xcopy = GUICtrlCreateButton("xcopy", 16, 184, 89, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
Local $msg = GUIGetMsg()
Select
  Case $msg = $GUI_EVENT_CLOSE
   ExitLoop
  Case $msg = $xcopy
   xcopy()
EndSelect
WEnd
Func xcopy($xcopy)
Run(@ComSpec & " /c xcopy /e /v /f /h /k /o /i ")

EndFunc
Link to comment
Share on other sites
  • Moderators
JLogan3o13 Universalist

JLogan3o13

Posted
  • Moderators
Posted

I made an edit to show how I would do the xcopy function. It is working for me.

"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Link to comment
Share on other sites
pcjunki Polymath

pcjunki

Posted
  • Author
Posted

this is what i have so far...

#include <GUIConstants.au3>
#include < GuiButton.au3>
#Include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("xcopy gui", 523, 312, 193, 125)
$Label1 = GUICtrlCreateLabel("Source", 16, 24, 38, 17)
$input1 = GUICtrlCreateInput("", 16, 48, 465, 21)
$Label2 = GUICtrlCreateLabel("Destination", 16, 104, 57, 17)
$input2 = GUICtrlCreateInput("", 16, 128, 465, 21)
$xcopy = GUICtrlCreateButton("xcopy", 16, 184, 89, 57, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
Local $msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $xcopy
xcopy()
EndSelect
WEnd


Func xcopy()
ShellExecuteWait("xcopy.exe", GUICtrlRead($input1) & ' ' & GUICtrlRead($input2) & ' /e /v /f /h /k /o /i')


EndFunc
Link to comment
Share on other sites
pcjunki Polymath

pcjunki

Posted
  • Author
Posted (edited)

i've added a local varialbe, thinking it might help with spaces and quotes, but still no luck

the variable is in the xcopy function called $Var1

#include <GUIConstants.au3>
#include < GuiButton.au3>
#Include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("xcopy gui", 523, 312, 193, 125)
$Label1 = GUICtrlCreateLabel("Source", 16, 24, 38, 17)
$input1 = GUICtrlCreateInput("", 16, 48, 465, 21)
$Label2 = GUICtrlCreateLabel("Destination", 16, 104, 57, 17)
$input2 = GUICtrlCreateInput("", 16, 128, 465, 21)
$xcopy = GUICtrlCreateButton("xcopy", 16, 184, 89, 57, 0)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
Local $msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $xcopy
xcopy()
EndSelect
WEnd


Func xcopy()
Global $Var1 = '/e /v /f /h /k /o /i'
ShellExecuteWait ("xcopy.exe", GUICtrlRead($input1) & ' ' & GUICtrlRead($input2) & ' ' & $Var1)
EndFunc
Edited by pcjunki
Link to comment
Share on other sites
BrewManNH Universalist

BrewManNH

Posted
Posted

It works for me if you don't use the /O option, that option is causing an access denied error message for me, and the copy never occurs.

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Link to comment
Share on other sites
BrewManNH Universalist

BrewManNH

Posted
Posted

Have you tried RoboCopy instead of xcopy?

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...