HELP RUN APLICATION AFTER VERIFICATION

[ramonzitoo]

hello I found the following script, the more I'm not getting it open, for example notepad after verification.

expandcollapse popup

Func validate($iLicense)
    Local $o_IE
    Dim $html_text
  
    ; Create IE obect
    $o_IE = ObjCreate("Shell.Explorer.2")
    ; Create Validation GUI
    GuiCreate("Licensing", 300, 45,-1, -1)
    ; Create IE object in the GUI
    GUICtrlCreateObj($o_IE, 0, 0, 1, 1)
  
    ; Load Validation URL into object
    $o_IE.navigate2($page & "?ilicense=" & $iLicense)
  
    ; Wait for IE Object to load page
    While $o_IE.Busy
        Sleep(10)
    WEnd
  
    ; Split HTML source return by "~"
    $html_text = StringSplit($o_IE.document.body.innerHTML, "~")
  
    ; Fire notification if stringsplit failed due to page not loading.
    If @error Then
        MsgBox(4096, "Error", "Cannot connect to page!")
        Exit
    EndIf
  
    ; Delete GUI since we are no longer using it.
    GUIDelete()
  
    ; Check for return by PHP page
    If $html_text[2] = "yes" Then
        return 1
    Else
        return 0
    EndIf
EndFunc ; Address of webpage, must be globaled in main script
Global $page = "www.mysite.com/check.php"
; Check for valid code, if not then exit
if validate("12345") = 0 then Exit
EndFunc
Func Runp() ;
  Run("notepad.exe");
EndFunc

help please and sorry my bad english!

Edited April 15, 2012 by ramonzitoo

[qsek]

expandcollapse popup

Global $page = "www.mysite.com/check.php"

; Check for valid code, if not then exit
if validate("12345") = 1 then Runp()

Exit

Func validate($iLicense)
    Local $o_IE
    Dim $html_text
  
    ; Create IE obect
    $o_IE = ObjCreate("Shell.Explorer.2")
    ; Create Validation GUI
    GuiCreate("Licensing", 300, 45,-1, -1)
    ; Create IE object in the GUI
    GUICtrlCreateObj($o_IE, 0, 0, 1, 1)
  
    ; Load Validation URL into object
    $o_IE.navigate2($page & "?ilicense=" & $iLicense)
  
    ; Wait for IE Object to load page
    While $o_IE.Busy
        Sleep(10)
    WEnd
  
    ; Split HTML source return by "~"
    $html_text = StringSplit($o_IE.document.body.innerHTML, "~")
  
    ; Fire notification if stringsplit failed due to page not loading.
    If @error Then
        MsgBox(4096, "Error", "Cannot connect to page!")
        Exit
    EndIf
  
    ; Delete GUI since we are no longer using it.
    GUIDelete()
  
    ; Check for return by PHP page
    If $html_text[2] = "yes" Then
        return 1
    Else
        return 0
    EndIf
EndFunc ; Address of webpage, must be globaled in main script

Func Runp() ;
  Run("notepad.exe");
EndFunc

[ramonzitoo]

@qsek very thanks my friend working perfectly.

[ramonzitoo]

sorry my noob question, is because I'm starting with autoit. As with the above script would be if the serial was accepted returns a welcome message, otherwise it returns an error message!

Edited April 15, 2012 by ramonzitoo

[qsek]

As with the above script would be if the serial was accepted returns a welcome message, otherwise it returns an error message!

Sorry i do not understand, is this a question?

And what should return a welcome message, the script, the validate function or the webpage?

[ramonzitoo]

Thanks, already got.