อยากถามเรื่องคำสั่งการสร้างสคริปครับ

สมมติคำสั่งผมประมาณว่า

ControlSettext("Test", "", "Edit1", "1")
ControlSendt("Test", "", "", "{ENTER}")
ControlSendt("Test", "", "", "{ENTER}")

แต่ผมอยากสร้างขึ้นมาหลายๆอัน โดยถ้้าจะสร้างเป็น input แล้วใส่คำลงไป เช่นใส่ 2 พอกด ok แล้วก็สร้างสคริป 2.exe ขึ้นมาหรือถ้าสร้างแบบนั้นไม่ได้ก็สร้าง 2.au3 ก็ได้ครับ ให้คำสั่งข้างในเป็นประมาณ

ControlSettext("Test", "", "Edit1", "2")
ControlSendt("Test", "", "", "{ENTER}")
ControlSendt("Test", "", "", "{ENTER}")

แบบเนี้ยอะครับ

รบกวนแนะนำหน่อยนะคับ ขอบคุณมาก

Code:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PSsix", 264, 72, 192, 124)
$Input1 = GUICtrlCreateInput("1", 16, 16, 121, 21)
$Button1 = GUICtrlCreateButton("Button1", 168, 16, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

       $file = FileOpen(GUICtrlRead($Input1)& ".au3", 2)
FileWrite($file, 'ControlSettext("Test", "", "Edit1", '&GUICtrlRead($Input1)& ')'& @CRLF)
FileWrite($file,'ControlSend("Test", "", "", "{ENTER}")' & @CRLF)
FileWrite($file,'ControlSend("Test", "", "", "{ENTER}")' & @CRLF)
FileClose($file)

   EndSwitch
WEnd


POS พิมพ์ว่า:

Code:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PSsix", 264, 72, 192, 124)
$Input1 = GUICtrlCreateInput("1", 16, 16, 121, 21)
$Button1 = GUICtrlCreateButton("Button1", 168, 16, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

       $file = FileOpen(GUICtrlRead($Input1)& ".au3", 2)
FileWrite($file, 'ControlSettext("Test", "", "Edit1", '&GUICtrlRead($Input1)& ')'& @CRLF)
FileWrite($file,'ControlSend("Test", "", "", "{ENTER}")' & @CRLF)
FileWrite($file,'ControlSend("Test", "", "", "{ENTER}")' & @CRLF)
FileClose($file)

   EndSwitch
WEnd


ขอบคุณพี่มากๆเลยนะครับ กับทุกๆคำตอบเลย ช่วยผมไ้ด้เยอะจริงๆ ขอบคุณมากๆเลยครับ เป็นกำลังใจให้ทำสิ่งดีๆแบบนี้ต่อไปนะคับ >,<