Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Problem mit RasEntryDlg
Autor: Martoeng (Moderator)
Datum: 17.02.08 15:16
Option Explicit Const RASEDFLAG_NewEntry = &H2 Const RASEDFLAG_IncomingConnection = &H400 Private Type RASENTRYDIALOG dwSize As Long hwndOwner As Long dwFlags As Long xDlg As Long yDlg As Long szEntry As String * 257 dwError As Long reserved As Long Reserved2 As Long End Type Private Declare Function RasEntryDlg Lib "RASDLG.DLL" Alias "RasEntryDlgW" _ (ByVal lpszPhonebook As String, ByVal lpszEntry As String, ByRef lpInfo As RASENTRYDIALOG) As Long Private Sub Form_Load() Dim lResult As Long Dim re As RASENTRYDIALOG With re .hwndOwner = hWnd .dwFlags = RASEDFLAG_NewEntry .dwSize = LenB(re) End With lResult = RasEntryDlg(vbNullString, vbNullString, re) Me.Caption = lResult & ", " & re.dwError End Sub Dieser Code bringt bei mir den Assistenten. Unter Vista soll die Ansi-Version gar nicht mehr laufen, bei meinem XP vielleicht auch nicht mehr!? Keine Ahnung. Alles sehr komisch. Probier diesen Code mal aus. Die Länge müsste übrigens 257 sein ("MAX_LENGTH" + 1), da hat wohl damals jemand neben die 5 gehauen vbarchiv.dll (Freeware), Tutorials uvm. auf http://www.martoeng.com.

Problem mit RasEntryDlg	1.877	Tomy41	16.02.08 12:07
Re: Problem mit RasEntryDlg	1.109	Martoeng	16.02.08 23:55
Re: Problem mit RasEntryDlg	1.059	Tomy41	17.02.08 11:18
Re: Problem mit RasEntryDlg	1.151	Martoeng	17.02.08 15:16
Re: Problem mit RasEntryDlg	1.068	Tomy41	17.02.08 19:23
Re: Problem mit RasEntryDlg	1.038	Tomy41	17.02.08 19:28

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen