'[Public] | [Private]
Declare Function RasCreatePhonebookEntry Lib "RasApi32.dll" _ Alias "RasCreatePhonebookEntryA" _ (ByVal hwnd As Long, ByVal lpszPhonebook As String) As Long 'con: 'hwnd: - l'handle della finestra attiva 'lpszPhonebook: - parametro che indica il percorso del file .PBK (Solo Windows NT) 'Quindi per poter creare una nuova connessione bastera' scrivere aaa = RasCreatePhonebookEntry(Me.hwnd, vbNullString) |