How can I bring up the Dial Up connection dialog box through VB?
Printable View
How can I bring up the Dial Up connection dialog box through VB?
If you want to bring it up and connect as well:
If you just want to bring up that dialog box:Code:Private Sub Command1_Click()
Dim X
'Replace ConnectionName with something like Netzero
'or a Dial-Up Connection in your Dial-Up Networking Folder
X = Shell("rundll32.exe rnaui.dll,RnaDial " & "ConnectionName", 1)
DoEvents
'You can type in your password before the { below.
SendKeys "{enter}", True
DoEvents
End Sub
Code:Private Sub Command1_Click()
X = Shell("rundll32.exe rnaui.dll,RnaDial " & "ConnectionName", 1)
End Sub