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