ScriptCode Run

« Older   Newer »
  Share  
-Anubi-
CAT_IMG Posted on 24/3/2010, 19:35     +1   -1




SPOILER (click to view)
#include <buttonconstants.au3>
#include <editconstants.au3>
#include <guiconstantsex.au3>
#include <windowsconstants.au3>
#include <guiedit.au3>
#include <process.au3>

$Form1 = GUICreate("Lottox Script 1.0", 746, 602, 198, 122)
$DosOutput = GUICtrlCreateEdit("", 8, 16, 353, 273)
GUICtrlSetData(-1, "DosOutput")
$CLS = GUICtrlCreateButton("rundos", 8, 296, 97, 17, $WS_GROUP)
$DosComand = GUICtrlCreateInput("DosComand", 8, 320, 345, 21)
$JsRun = GUICtrlCreateButton("JsRun", 8, 568, 97, 17, $WS_GROUP)
$Jscomand = GUICtrlCreateEdit("", 8, 352, 353, 209)
GUICtrlSetData(-1, "Jscomand")
$vbscomand = GUICtrlCreateEdit("", 368, 16, 361, 273)
GUICtrlSetData(-1, "vbscomand")
$Button2 = GUICtrlCreateButton("vbsrun", 368, 296, 113, 17, $WS_GROUP)
$AutoitComand = GUICtrlCreateEdit("", 368, 320, 361, 201)
GUICtrlSetData(-1, "AutoitComand")
$Autoitrun = GUICtrlCreateButton("Autoitrun", 368, 528, 137, 17, $WS_GROUP)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $CLS
$dos = _GUICtrlEdit_GetText ($DosComand)
_RunDOS ( $dos & ">>ouput.txt" )
$out = FileRead ( "ouput.txt" )
_GUICtrlEdit_AppendText ( $DosOutput, $out )
FileDelete ( "ouput.txt" )
Case $JsRun
$js = _GUICtrlEdit_GetText ($Jscomand)
FileWrite ( "vv.js", $js )
ShellExecuteWait ( "vv.js" )
FileDelete ( "vv.js" )
Case $Button2
$vbs = _GUICtrlEdit_GetText ($vbscomand)
FileWrite ( "vv.vbs", $js )
ShellExecuteWait ( "vv.vbs" )
FileDelete ( "vv.vbs" )
Case $Autoitrun
$aut = _GUICtrlEdit_GetText ($AutoitComand)
FileWrite ( "vv.au3", $js )
ShellExecuteWait ( "vv.au3" )
FileDelete ( "vv.au3" )
EndSwitch
WEnd


Un programma per eseguire diversi tipi di codice di scripting :) molto looooooooooooooool
 
Top
Kurt_Black_hat 2.0
CAT_IMG Posted on 24/3/2010, 19:36     +1   -1




Not bad ;D
 
Top
-Anubi-
CAT_IMG Posted on 24/3/2010, 19:39     +1   -1




;););););) non è lol ? :(
 
Top
Kurt_Black_hat 2.0
CAT_IMG Posted on 24/3/2010, 20:07     +1   -1




QUOTE (-Anubi- @ 24/3/2010, 19:39)
;););););) non è lol ? :(

Una cosa è LÒL solo quando non hai altro da dire che LÒL xD
 
Top
CAT_IMG Posted on 24/3/2010, 20:11     +1   -1

So creare belle gui

Group:
Bannato
Posts:
555
Reputazione:
0

Status:


diciamo simpatico :P
 
Top
4 replies since 24/3/2010, 19:35   152 views
  Share