Results 1 to 2 of 2

Thread: Dial Up Connection

  1. #1

    Thread Starter
    New Member
    Join Date
    Oct 2000
    Posts
    13
    How can I bring up the Dial Up connection dialog box through VB?
    N.M.

  2. #2
    Guest
    If you want to bring it up and connect as well:

    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
    If you just want to bring up that dialog box:

    Code:
    Private Sub Command1_Click()
    X = Shell("rundll32.exe rnaui.dll,RnaDial " & "ConnectionName", 1)
    End Sub

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width