Ошибка DotRas «Значение gre не поддерживается для преобразования». - PullRequest
0 голосов
/ 04 июня 2019

Я использую vb.net с DotRas SDK https://archive.codeplex.com/?p=dotras У меня проблема, если я пытаюсь выполнить пример, я всегда получаю ошибку «Значение gre не поддерживается для преобразования».

При вызове должна быть ошибка

RasDevice.GetDevice

Полный вызов:

Dim entry As RasEntry = RasEntry.CreateVpnEntry(EntryName, IPAddress.Loopback.ToString(), RasVpnStrategy.Default, RasDevice.GetDeviceByName("(PPTP)", RasDeviceType.Vpn))

Кто-нибудь знает, в чем может быть проблема или какэто можно исправить?

Я использую Windows Server 2016 64Bit

Спасибо!

Редактировать:

Public Class MainForm
    Public Const EntryName As String = "VPN Connection"
    Private connectionHandle As RasHandle

    Private Sub CreateEntryButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CreateEntryButton.Click
        ' This opens the phonebook so it can be used. Different overloads here will determine where the phonebook is opened/created.
        Me.AllUsersPhoneBook.Open()

        Dim device = RasDevice.GetDeviceByName("(PPTP)", RasDeviceType.Vpn)
        Dim entry = RasEntry.CreateVpnEntry(EntryName, IPAddress.Loopback.ToString(), RasVpnStrategy.Default, device)


        ' Add the new entry to the phone book.
        Me.AllUsersPhoneBook.Entries.Add(entry)
    End Sub
...