Problema ShellExecute

« Older   Newer »
  Share  
3nigmaCJ
CAT_IMG Posted on 19/10/2009, 00:33     +1   -1




Stavo creando un programma per seguire un sito, ecco il codice, solo che dovrei mettere che lo ShellExecute mi esegue l'InputBox (cioè il sito che verrà scritto)...
Solo che se metto ShellExecute(&$input) non va.. e poi vorrei mettere che devi avere il bottone per farlo andare solo che non so come si mette..e poi se mi riuscite ad ordinare un pò le coordinate dell'InputBox e Del bottone ve ne sarei grato perchè non ci capisco molto su di loro..
Ecco il codice
CODICE
#Include <GUIConstants.au3>

$form = GUICreate("WeBsItE oPeNeR",500,500)
$sfondo=GUISetBkColor(0xFF0000)
$label= GUICtrlCreateLabel("Scrivi il sito in cui vuoi andare, lo aprirà col tuo browser predefinito",100,10)
$input=GUICtrlCreateInput("Sito",250,50,100,20)
$bottone=GUICtrlCreateButton("Vai",300,150,100,40)

GUISetState(@sw_show)

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

 EndSwitch
WEnd


Grazie :)
 
Top
MatteoJug
CAT_IMG Posted on 19/10/2009, 14:00     +1   -1




Il fatto è che se metti ShellExecute($input) non andrà perchè $input contiene l'ID del controllo, devi mettere GuiCtrlRead($input)...Codice corretto:
CODICE
#Include <GUIConstants.au3>

$form = GUICreate("WeBsItE oPeNeR",500,200)
$sfondo=GUISetBkColor(0xFF0000)
$label= GUICtrlCreateLabel("Scrivi il sito in cui vuoi andare, lo aprirà col tuo browser predefinito",100,10)
$input=GUICtrlCreateInput("Sito",200,50,100,20)
$bottone=GUICtrlCreateButton("Vai",200,100,100,40)

GUISetState(@sw_show)

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
      Exit
  case $bottone;Se clicca su Vai
          ShellExecute(GUICtrlRead($input));Legge il contenuto di $Input ed esegue ShellExecute
EndSwitch
WEnd
 
Top
1 replies since 19/10/2009, 00:33   155 views
  Share