VB6 und aut. mehrfachen RAS Einwahl

[keksi77]

Hallo,

Habe von Inet für VB6 ein paar Codesamples für eine RAS Einwahl gefunden.
Ich brauche etwas damit ich automatisch zuerst eine GPRS und dannach VPN Verbindung herstelle.

Ich verwende folgendenen Aufruf:

~~~~Code
Private Declare Function InternetDial Lib "wininet.dll" _
(ByVal hwndParent As Long, ByVal lpszConiID _
As String, ByVal dwFlags As Long, ByRef hCon _
As Long, ByVal dwReserved As Long) As Long

~~~Code

InternetDial Me.hWnd, "A1.net GPRS", DIAL_FORCE_UNATTENDED, ConID, 0


Das Problem ist nur, sobald eine RAS bzw. DFÜ Verbindung aktiv ist, macht mir WININET.DLL keine zweite Verbindung mehr auf.

Weiss da jemand wie ich dieses Problem umgehen kann?

Danke
Horst