Button = Website AutoITのリンク

Question

私は、私たちが$ okmysteryと呼ぶ仕事のために作っているこのプログラムのためにAutoITにボタンを作りました。私は$ Okmysteryを私の会社のウェブサイトに欲しいと思っています。ここで私が持っているコードのスニペットは、これまでのところです：

Dim $msg 
GUISetState() 
    While 1 
     $msg = GUIGetMsg() 
     Select 
      Case $msg = $GUI_EVENT_CLOSE 
       ExitLoop 
      Case $msg = $okbutton 
       ; Minimize Current Window 
       WinSetState($WINTITLE, "", @SW_MINIMIZE) 
       While Not BitAND(WinGetState($WINTITLE, ""), 16) 
        sleep(250) 
       WEnd 

       ; Take Screen Shots and Logs 
       ScreenShotAndLogs() 

       ; Compress Artifacts 
       If FileExists($ZIPFILEPATH) Then FileDelete($ZIPFILEPATH) 
       _Zip_Create($ZIPFILEPATH) 
       _Zip_AddFolderContents($ZIPFILEPATH, $OUTPUTROOT) 
       DeleteOriginals() 

       ; Restore main window 
       WinSetState($WINTITLE, "", @SW_RESTORE) 
      ;------------ Screen Shot 
      Case $msg = $okshot 
       ; Minimize Current Window 
       WinSetState($WINTITLE, "", @SW_MINIMIZE) 
       While Not BitAND(WinGetState($WINTITLE, ""), 16) 
        sleep(250) 
       WEnd 

       ScreenShot() 

       ; Restore main window 
       WinSetState($WINTITLE, "", @SW_RESTORE) 
       ;---------------------------------- 
      $okmystery = ShellExecute ("basic") 
       Run("Http://www.IT-Networks.org") 

      Case Default 
       ; Do Nothing 
     EndSelect 
    WEnd 
Exit(0) 

Answer 1

あなたは彼らを想定しているようものは、すべての作業している場合には（他のcase文に一致するように「$ okmystery」case文を変更する必要があるように見えますに）。

次に、ShellExecute()のURLを試すことができます。

Case $msg = $okmystery 
    ShellExecute("Http://www.IT-Networks.org") 

---

ここではデフォルトのWebブラウザであなたの会社のウェブサイトを開くボタンを持つGUIの作業例です：

#include <GUIConstantsEx.au3> 

Global $Button_1, $msg 

GUICreate("Test GUI Button") 
$okmystery = GUICtrlCreateButton("okmystery Button", 10, 30, 100) 

GUISetState() 

While 1 
    $msg = GUIGetMsg() 
    Select 
     Case $msg = $GUI_EVENT_CLOSE 
      ExitLoop 
     Case $msg = $okmystery 
      ShellExecute("Http://www.IT-Networks.org") 
    EndSelect 
WEnd