powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Как узнать Имя пользователя, ПБ 9.0.3
4 сообщений из 4, страница 1 из 1
Как узнать Имя пользователя, ПБ 9.0.3
    #35666125
Imperous
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем привет!
Как узнать имя компа понятно - computernameA.
А вот как узнать Имя пользователя компа?
...
Рейтинг: 0 / 0
Как узнать Имя пользователя, ПБ 9.0.3
    #35666180
VanoR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
наверно что-то из этого
Код: plaintext
1.
Function boolean GetUserName (ref string  lpBuffer, ref ulong nSize) Library "ADVAPI32.DLL" Alias for "GetUserNameA"
Function boolean LogonUser ( ref string lpszUsername, ref string lpszDomain, ref string lpszPassword, ulong dwLogonType,  ulong dwLogonProvider, ref ulong phToken) Library "ADVAPI32.DLL" Alias for "LogonUserA"
...
Рейтинг: 0 / 0
Как узнать Имя пользователя, ПБ 9.0.3
    #35666689
Я
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Я
Гость
Код: plaintext
1.
2.
3.
4.
FUNCTION long GetComputerNameA &
    (ref string ComputerName, ref ulong BufferLength) 
  LIBRARY "KERNEL32.DLL"
FUNCTION long GetUserNameA(ref string UserName, ref ulong BufferLength) 
LIBRARY "ADVAPI32.DLL"

Далее:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
long ll_ret
string ls_ComputerName, ls_UserName
ulong BufferLength =  250   // you may need to adjust this. see Note

ls_ComputerName = Space(BufferLength)
ls_UserName     = Space(BufferLength)

ll_ret = GetComputerNameA(ls_ComputerName, BufferLength)
ll_ret = GetUserNameA(ls_UserName, BufferLength)
...
Рейтинг: 0 / 0
Как узнать Имя пользователя, ПБ 9.0.3
    #35667792
Imperous
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем пасиб, воспользовался GetUserNameA
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Как узнать Имя пользователя, ПБ 9.0.3
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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