連接到 Internet

C.9 連接到 Internet

 ; ConnectInternet (使用 Dialer 插件)
 ; Written by Joost Verburg 
 ;
 ; 當沒有可用連接時該函數嘗試去建立一個網際網路連接。
 ; 如果你不能確認使用該安裝程式前已有可用的連接的話
 ; 在用 NSISdl 插件下載前最好先調用這個函數。
 ; 
 ; 這個函數需要 Internet Explorer 3，但是如果 IE3 未安裝的話
 ; 將會詢問是否手動連接。
 
 Function ConnectInternet
 
   Push $R0
     
     ClearErrors
     Dialer::AttemptConnect
     IfErrors noie3
     
     Pop $R0
     StrCmp $R0 "online" connected
       MessageBox MB_OK|MB_ICONSTOP "Cannot connect to the internet."
       Quit ;這裡將會登出安裝程式。你可以改為你自己的錯誤處理代碼。
     
     noie3:
   
     ; IE3 未安裝
     MessageBox MB_OK|MB_ICONINFORMATION "請先連接到網際網路。"
     
     connected:
   
   Pop $R0
   
 FunctionEnd