uses wininet;
lpdwConnection:DWORD;
//连接
InternetDial(form1.handle,PChar('宽带连接'),INTERNET_DIAL_UNATTENDED,@lpdwConnection,0);
//挂断
InternetHangUp(lpdwConnection,0);
uses wininet;
lpdwConnection:DWORD;
//连接
InternetDial(form1.handle,PChar('宽带连接'),INTERNET_DIAL_UNATTENDED,@lpdwConnection,0);
//挂断
InternetHangUp(lpdwConnection,0);