Форум программистов, компьютерный форум CyberForum.ru

Vs2013 опять на чёто не понятное рукаеться - C++

Восстановить пароль Регистрация
 
DELAKEY
 Аватар для DELAKEY
6 / 6 / 0
Регистрация: 20.11.2013
Сообщений: 244
25.06.2014, 20:28     Vs2013 опять на чёто не понятное рукаеться #1
Есть код по словам автора он работает но
в VS2013 крмпелироваться не хочет выдаёт ошибки
Ошибка 12 error LNK2019: ссылка на неразрешенный внешний символ _RasDialA@24 в функции "int __cdecl start_vpn(char *,struct HRASCONN__ * *)" (?start_vpn@@YAHPADPAPAUHRASCONN__@@@Z) C:\Users\User\documents\visual studio 2013\Projects\test\testVPN\testVPN\testVPN.obj testVPN
Ошибка 13 error LNK2019: ссылка на неразрешенный внешний символ _RasSetEntryDialParamsA@12 в функции "int __cdecl set_username_passwd(char *)" (?set_username_passwd@@YAHPAD@Z) C:\Users\User\documents\visual studio 2013\Projects\test\testVPN\testVPN\testVPN.obj testVPN
Ошибка 14 error LNK2019: ссылка на неразрешенный внешний символ _RasSetEntryPropertiesA@24 в функции "int __cdecl create_vpn_connection(char *,char *)" (?create_vpn_connection@@YAHPAD0@Z) C:\Users\User\documents\visual studio 2013\Projects\test\testVPN\testVPN\testVPN.obj testVPN
источник http://www.netpatch.ru/create_vpn.html

вот сам код
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
/*
============================================================================
Name        : create.c
Author      : Chebotarev Roman
Version     :
Copyright   : All rights reserved
Description : Hello World in C, Ansi-style
============================================================================
*/
 
/*
Задаём тип операционной системы в которой производится сборка
программы. Старший байт (0x5) указывает версию ОС, младший
байт (0x01) - подверсию. Таким образом 0x501 = 5.1 (Windows XP).
См. подробности в описании структуры OSVERSIONINFOEX (ссылка ниже).
*/
#define WINVER    0x501 
 
#include <stdio.h>
#include <windows.h>
#include <stdint.h>
/*
При сборке использовался компилятор MinGW. В его поставке содержится
старый файл ras.h и структура RASENTRY в нём соответствует ОС до
Windows XP. В ней отсутствует ряд необходимых полей.  Поэтому
пришлось позаимствовать оригинальный заголовочный файл из SDK.
*/
#include "ras.h"
/*
Если для сборки вы используете MS Visual Studio,
то необходимо заменить предыдущую директиву #include на
#include <ras.h>
*/
 
#define    USER        "username"
#define    PASSWD      "password"
#define    SERVER      "vpn.server.address.or.hostname"
#define    VPN_NAME    "VPN connection"
 
int32_t create_vpn_connection(LPSTR connect_point, LPSTR title);
int32_t set_username_passwd(char *entry_title);
int32_t start_vpn(LPSTR title, HRASCONN * connection);
 
int main(void)
{
    puts("Demonstration of creating VPN connection"); /* prints Demonstration of creating VPN connection */
    if (!create_vpn_connection(SERVER, VPN_NAME))
        printf("Error creating VPN connection.\n");
    else
        printf("Success creating VPN connection.\n");
    /* Запускаем созданное VPN подключение */
    HRASCONN connection = 0;
    int32_t error;
    if ((error = start_vpn(VPN_NAME, &connection)))
        printf("Error starting VPN connection, code: %d\n", error);
    else printf("Start VPN success");
    return EXIT_SUCCESS;
}
 
/*
Вспомогательная функция устанавливающая пароль и имя
пользователя для RAS-подключения с именем заданным указателем *entry_title
*/
int32_t set_username_passwd(char *entry_title)
{
    RASDIALPARAMS ras_param;
    ZeroMemory(&ras_param, sizeof(RASDIALPARAMS));
    ras_param.dwSize = sizeof(RASDIALPARAMS);
    memcpy(ras_param.szEntryName, entry_title, strlen(entry_title));
    memcpy(ras_param.szUserName, "username", strlen("username"));
    memcpy(ras_param.szPassword, "password", strlen("password"));
    return RasSetEntryDialParams(0, &ras_param, 0);
}
 
int32_t create_vpn_connection(LPSTR connect_point, LPSTR title)
{
    OSVERSIONINFOEX OS_version_info;
    int32_t bOsVersionInfoEx;
    int32_t rasentry_struct_size = sizeof(RASENTRY);
 
    ZeroMemory(&OS_version_info, sizeof(OSVERSIONINFOEX));
    OS_version_info.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);
 
    /* Получаем версию ОС в которой запущена программа */
    if (!(bOsVersionInfoEx = GetVersionEx((OSVERSIONINFO *)&OS_version_info)))
    {
        OS_version_info.dwOSVersionInfoSize = sizeof (OSVERSIONINFO);
        if (!GetVersionEx((OSVERSIONINFO *)&OS_version_info))
            return 0;
    }
 
    /* Проверяем версию ОС на соответствие платформе WIN32_NT */
    if (OS_version_info.dwPlatformId == VER_PLATFORM_WIN32_NT)
    {
        if ((OS_version_info.dwMajorVersion == 5 && OS_version_info.dwMinorVersion == 0)
            || OS_version_info.dwMajorVersion <= 4)
            /* Следующий оператор выполняется если версия ОС = 5.0 или <= 4.0, что соответствует
            Windows 2000 или Windows NT. В этих ОС в структуре RASENTRY отсутствовали поля
            начиная с dwfOptions2 (включительно). Программа собранная в Windows XP имеет
            структуру RASENTRY бОльшего размера чем используется в Win 2000 и Win NT, поэтому
            при попытке вызвать функцию RasSetEntryProperties с указанием размера структуры
            через sizeof(RASENTRY) происходит ошибка. Значение 2088 соответствует
            размеру RASENTRY без полей начиная с dwfOptions2. Таким образом даже используя
            структуру бОльшего чем нужно для Win 2000 и Win NT размера можно сделать
            корректный вызов функции RasSetEntryProperties */
            rasentry_struct_size = 2088;
    }
    else /* Выходим т.к. Windows 95, 98, Me по умолчанию не поддерживают VPN подключения */
        return 0;
 
 
    RASENTRY rasEntry; /* Структура описывающая создаваемое/настраиваемое подключение */
    memset(&rasEntry, 0, sizeof(RASENTRY));
    rasEntry.dwSize = rasentry_struct_size;
    /*
    Задаём флаговые параметры VPN соединения.
    Вкладка "Общие":
    RASEO_ModemLights - флажок "При подключении отображать значок в области уведомлений"
    Вкладка "Параметры":
    RASEO_PreviewUserPw - флажок "Запрашивать имя, пароль, сертификат и т.д."
    RASEO_ShowDialingProgress - флажок "Отображать ход подключения"
    RASEO2_ReconnectIfDropped - флажок "перезвонить при разрыве связи"
    Вкладка "Безопасность":
    RASEO_Custom - радиокнопка "Дополнительные (выборочные параметры)"
    Дополнительные параметры безопасности:
    RASEO_RequireMsCHAP2 - флажок "Протокол проверки пароля Microsoft (MS-CHAP v2)
    Вкладка "Сеть":
    RASEO_SecureLocalFiles - снять флажки "Клиент для сетей Microsoft" и
    "Служба доступа к файлам и принтерам сетей Microsoft"
    Свойства "Протокол интернета (TCP/IP)":
    RASEO2_DisableNbtOverIP - отключить NetBIOS через TCP/IP
 
    RASEO2_Internet - установка данного флага обозначает что это подключение к Интернету
    */
    rasEntry.dwfOptions = RASEO_PreviewUserPw | RASEO_ShowDialingProgress | RASEO_Custom |
        RASEO_RequireMsCHAP2 | RASEO_ModemLights | RASEO_SecureLocalFiles;
    rasEntry.dwfOptions2 = RASEO2_DisableNbtOverIP | RASEO2_ReconnectIfDropped | RASEO2_Internet;
    /* Задаём значения полей структуры */
    /* Вкладка "Параметры" */
    rasEntry.dwRedialCount = 99;    /* Поле "Число повторных попыток набора номера" */
    rasEntry.dwRedialPause = 3;        /* Поле "Интервал между повторениями" */
    /* Вкладка "Безопасность -> Параметры" */
    rasEntry.dwEncryptionType = ET_Optional;    /* Значение выпадающего списка "Шифрование данных" = "необязательное" */
    /* Вкладка "Сеть" */
    rasEntry.dwType = RASET_Vpn;    /* Тип создаваемого подключения - VPN */
    rasEntry.dwVpnStrategy = VS_PptpOnly;    /* Значение выпадающего списка "Тип VPN" = "PPTP" */
 
    /* Указываем адрес VPN сервера */
    strcpy(rasEntry.szLocalPhoneNumber, connect_point);
    /* Тип и имя используемого устройства*/
    strcpy(rasEntry.szDeviceType, RASDT_Vpn);
    strcpy(rasEntry.szDeviceName, TEXT("VPN"));
 
    /* Создаём или, если подключение с этим именем уже существует - перенастраиваем, подключение */
    if (RasSetEntryProperties(0, title, &rasEntry, rasentry_struct_size, NULL, 0) ||
        set_username_passwd(title))
        return 0;
 
    return 1;
}
 
int32_t start_vpn(LPSTR title, HRASCONN * connection)
{
    RASDIALPARAMS dial_params;
    dial_params.dwSize = sizeof(RASDIALPARAMS);
    strcpy(dial_params.szEntryName, title);
    strcpy(dial_params.szPhoneNumber, "");
    strcpy(dial_params.szCallbackNumber, "");
    strcpy(dial_params.szUserName, USER);
    strcpy(dial_params.szPassword, PASSWD);
    strcpy(dial_params.szDomain, "");
    dial_params.dwSubEntry = 0;
    dial_params.dwCallbackId = 0;
    *connection = NULL;
    return RasDial(NULL, NULL, &dial_params, 0, NULL, connection);
}
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.06.2014, 20:28     Vs2013 опять на чёто не понятное рукаеться
Посмотрите здесь:

C++ В c++ компил чёто нечитает.........
Не понятное условие C++
C++ Не понятное действие в классе
C++ подкиньте идею плиз, а то чёто не вьезжаю
[VS2013] Запрос к базе данных из приложения C++
C++ Как в VS2013 добавить компилятор от VS2010
C++ Нету заголовочного файла в vs2013 professional
Запуск VS2008 проекта на VS2013 C++

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
BatonPro
30 / 30 / 24
Регистрация: 21.06.2014
Сообщений: 81
25.06.2014, 20:42     Vs2013 опять на чёто не понятное рукаеться #2
Сообщение было отмечено автором темы, экспертом или модератором как ответ
Подключите к проекту библиотеку Rasapi32.lib
Yandex
Объявления
25.06.2014, 20:42     Vs2013 опять на чёто не понятное рукаеться
Ответ Создать тему
Опции темы

Текущее время: 03:16. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru