ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Определение идентификатора (API)
25 сообщений из 36, страница 1 из 2
  1  все
Определение идентификатора (API)
    #33673977
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Уважаемые коллеги!
Случайно никто не использовал вызов

FUNCTION long RasEnumConnections(Any lpRasCon, long lpcb, long lpcConnections) LIBRARY "RasApi32.dll" ALIAS FOR RasEnumConnectionsA

Мне срочно надо получить параметр подключенного через RAS коннекта
long lpcConnections для использования в функции RASHangUp
Дело в том, что если вызов осуществлялся через систему, то указатель равен 0 и вызываеться через раз. А время поджимает

Если кто может помочь....
Pb 9.0.3 Build 8511
WinXP
...
Рейтинг: 0 / 0
18.04.2006, 15:57
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674086
Konstantin Goldobin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konstantin Goldobin
Гость
Я пробовал так, как написано в последнем письме ветки
http://makeashorterlink.com/?E2AB169FC

Правда, на билдере 6.5 под виндовс 98.

--
With regards,
Konstantin Goldobin
http://www.vsi.ru/~kgold


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
18.04.2006, 16:35
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674131
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Что - то не то, возвращает код 87
...
Рейтинг: 0 / 0
18.04.2006, 16:49
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674134
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Структура наверное не та
Системы разные
Придется где-нибудь на MSDN полазить
Спасибо за поддержку
...
Рейтинг: 0 / 0
18.04.2006, 16:50
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674178
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Ребята я наверное чего-то не допонимаю

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/rras/rras/rasconn.asp


Какая - же все-таки структура rasconn
...
Рейтинг: 0 / 0
18.04.2006, 17:03
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674302
Фотография PL99
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PL99
Участник
Вот здесь смотрите
...
Рейтинг: 0 / 0
18.04.2006, 17:31
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674331
Pasha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pasha
Участник
встречный вопрос
Ребята а как вы структуры в PB описываете?
а то я уже собирался поднять вопросик, как же всетаки к PB подключить С++ (а то спомощью мануала я так и не разобрался к сожалению)
...
Рейтинг: 0 / 0
18.04.2006, 17:37
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674368
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Да знаю, что WINVER 0x0501
Код функции
long i
long ll_ret
RasConn lpRasConn[256]
long lpcb
long lpcConnections
Long hRasConn
//Set the structure's size
lpRasConn[1].dwSize = 412
lpcb = 256 * lpRasConn[1].dwSize
lpcConnections = 0

ll_ret = RasEnumConnections(lpRasConn[1], lpcb, lpcConnections)
If ll_ret = 0 Then
For i = 1 To lpcConnections
hRasConn = lpRasConn .hRasConn
//'Hang up

Next
End If
Структура
type rasconn from structure
ulong dwsize
ulong hRasConn
character szEntryName[257]
character szDeviceType[16]
character szDeviceName[129]
string szPhonebook
long dwSubEntry
end type

Все-равно возвращает код 87
...
Рейтинг: 0 / 0
18.04.2006, 17:45
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674382
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Просто может кто знает

structure:typedef struct _RASCONN {DWORD dwSize;
HRASCONN hrasconn;
TCHAR szEntryName[RAS_MaxEntryName + 1];
#if (WINVER >= 0x400)
TCHAR szDeviceType[ RAS_MaxDeviceType + 1 ];
TCHAR szDeviceName[ RAS_MaxDeviceName + 1 ];
#endif
#if (WINVER >= 0x401)
TCHAR szPhonebook [ MAX_PATH ];
DWORD dwSubEntry;
#endif
#if (WINVER >= 0x500)
GUID guidEntry;#endif
#if (WINVER >= 0x501)
DWORD dwFlags;
LUID luid;
#endif} RASCONN ;
...
Рейтинг: 0 / 0
18.04.2006, 17:49
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674390
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Как GUID и LUID сконвертить
Как string?
...
Рейтинг: 0 / 0
18.04.2006, 17:51
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674408
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Нашел какой-то вариант, буду пробовать
http://home.iprimus.com.au/billmcc/PlatformVB/dun/rasenumconns.htm
...
Рейтинг: 0 / 0
18.04.2006, 17:57
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33674500
Фотография Dmitry.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry.
Участник
явно обьявление ф-ции не правильное

из winapi help:

Код: plaintext
1.
2.
3.
4.
DWORD RasEnumConnections(
    LPRASCONN lprasconn,	// buffer to receive connections data
    LPDWORD lpcb,	// size in bytes of buffer
    LPDWORD lpcConnections	// number of connections written to buffer
   );

это значит обьявление должно быть примерно таким:
Код: plaintext
1.
FUNCTION long RasEnumConnections(ref MY_RASCON_STRUCT lpRasCon, ref long lpcb, ref long lpcConnections) LIBRARY "RasApi32.dll" ALIAS FOR RasEnumConnectionsA
...
Рейтинг: 0 / 0
18.04.2006, 18:18
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33678102
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Сейчас проверим
...
Рейтинг: 0 / 0
20.04.2006, 08:53
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33678107
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Дмитрий спасибо, не все, но работает
...
Рейтинг: 0 / 0
20.04.2006, 08:56
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33678108
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Если нужны объекты для RAS, пишите - мыло в профиле
...
Рейтинг: 0 / 0
20.04.2006, 08:57
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33723260
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Извините, что возвращаюсь к прежней теме
Программа готова, единственная странность
В собранном ехе-файле почему-то не происходит ретурн
long i
long ll_ret
RasConn lpRasConn[256]
long lpcb
long lpcConnections
Long hRasConn
lpRasConn[1].dwSize = 692
lpcb = 256 * lpRasConn[1].dwSize
lpcConnections = 0
ll_ret = RasEnumConnections(ref lpRasConn[1], ref lpcb, ref lpcConnections)
Messagebox('','2')
If ll_ret = 0 Then
For i = 1 To lpcConnections
hRasConn = lpRasConn .hRasConn
//'Hang up
il_RASCON = hRasConn
exit
//RasHangupA( hRasConn )
Next
israsconnect=true

return 1
End If

return 0

В скомпиленном просто повисает, возврата из функции не происходит
Есть у кого-нибудь какие соображения
Да забыл добавить - все это происходит если соединение инициировано из-вне
, т.е. не из самой программы
Если запускаешь RAS из программы все проходит без сучка и задоринки
...
Рейтинг: 0 / 0
12.05.2006, 15:21
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33723748
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Фил на тебя вся надежда может ты что новое выкопаешь
Самое прикольное видеть как в собранном файле теряется return
Может я вообще туплю
И ошибка исключительно pbvm выскакивает
Отрубать вроде отрубает, вообще как-то странно все происходит
Главное если пользуешься исключительно софтом - ок
иначе - вообще круговерть
Help me!!!!!!!!!!!! SOS me !!!!!!!!!!!!!!!!!!
Карьера под угрозой!!!!!!!!!
...
Рейтинг: 0 / 0
12.05.2006, 17:31
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33723838
Фотография Dmitry.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry.
Участник
предположение:
если строишь "Machine code" то может "Pi code" может помочь
...
Рейтинг: 0 / 0
12.05.2006, 17:56
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33727121
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Без разницы. Пробовал и pbd. Результат тот-же
...
Рейтинг: 0 / 0
15.05.2006, 14:01
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33727874
Oleg1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oleg1
Гость
spas2001Без разницы. Пробовал и pbd. Результат тот-же
Как вариант. Функции неверон передается область памяти, в которую она пишет. Из-за этого может быт перетерта нужная инфа.
...
Рейтинг: 0 / 0
15.05.2006, 16:21
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33737749
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Да а почему под отладчиком все путем?
Короче почему-то теряется указатель точки возврата
Только почему это происходит только при скомпиленном коде и только
если коннект инициирован из-вне
Хотя видно что идентификатор определяется верно
Можно конечно разрешить вызов только из программы и завершение вызова тоже
Просто некрасивое решение
...
Рейтинг: 0 / 0
19.05.2006, 10:40
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33737821
Фотография Dmitry.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry.
Участник
Однозначно что-то с памятью

а как у тебя выглядит RasConn структура?
...
Рейтинг: 0 / 0
19.05.2006, 10:57
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33744971
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
type rasconn from structure
ulong dwsize
ulong hRasConn
character szEntryName[257]
character szDeviceType[16]
character szDeviceName[129]
string szPhonebook
long dwSubEntry
end type

Еще вопрос lpRasConn[1].dwSize = 692 ????
Т.е. какой размер под один элемент структуры
...
Рейтинг: 0 / 0
23.05.2006, 12:33
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33746144
Фотография Dmitry.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dmitry.
Участник
из винхелпа:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
#define RAS_MaxEntryName       256 
#define RAS_MaxDeviceType      16 
#define RAS_MaxDeviceName      128 

RASCONNA
{
    DWORD    dwSize;
    HRASCONN hrasconn;
    CHAR     szEntryName[ RAS_MaxEntryName +  1  ];
    CHAR     szDeviceType[ RAS_MaxDeviceType +  1  ];
    CHAR     szDeviceName[ RAS_MaxDeviceName +  1  ];
    CHAR     szPhonebook [ MAX_PATH ];
    DWORD    dwSubEntry;
};

итого в ПБ

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    ulong    dwSize
    ulong    hrasconn
    char     szEntryName[  257  ]
    char     szDeviceType[  17  ]
    CHAR     szDeviceName[  129  ]
    CHAR     szPhonebook [  260  ]
    ulong    dwSubEntry

4+4+257+17+129+260+4=675 bytes
...
Рейтинг: 0 / 0
23.05.2006, 16:19
| Ответить | Цитировать | Написать  
Определение идентификатора (API)
    #33747357
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
При 675 вылазит ошибка 632 (маленький буфер)
...
Рейтинг: 0 / 0
24.05.2006, 09:33
| Ответить | Цитировать | Написать  
25 сообщений из 36, страница 1 из 2
  1  все
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Определение идентификатора (API)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=15&msg=33744971&tid=1337765]:
 0ms
get settings:
 8ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 49ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 1ms
others: 231ms
total:  358ms
созд. / загр.: 358ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]