连接到 Internet

C.4 连接到 Internet

 ; ConnectInternet (使用 Dialer 插件)
 ; 作者： 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 "无法连接到互联网。"
       Quit ;这里将会退出安装程序。你可以改为你自己的错误处理代码。
     
     noie3:
   
     ; IE3 未安装
     MessageBox MB_OK|MB_ICONINFORMATION "请先连接到互联网。"
     
     connected:
   
   Pop $R0
   
 FunctionEnd