Мобильная версия форумов
Открыть
 −4°C
завтра: −2°C
Погода в Перми
−4°C
ночью−4°C
утром−4°C
завтра−2°C
Подробно
 65,86
−0.3454
Курс USD ЦБ РФна 21 февраля
65,8568
−0.3454
 74,68
−0.1335
Курс EUR ЦБ РФна 21 февраля
74,6816
−0.1335
PRM.Форум /Компьютеры Интернет Связь / Программирование /

Как получить на странице имя пользователя Windows?

  • activist

    Сообщений: 450

    Используя PHP или javascript

    Например чтобы выглядело вот так:
    Welcome, VasyaPupkin

    Какая функция вернет строку содержащую имя пользователя залогиненного на клиентской машине (в данном случае VasyaPupkin)?

    В PHP элементарно можно получить IP адрес клиента, как получить username?
    На javascript наверное неполучится, т.к. он выполняется только на стороне клиента, а содержимое переменной нужно сохранить в файл на сервере.
    Можно еще использовать уязвимости IE в сочетании с ActiveX, это тоже по понятным причинам не подходит.
    В общем удалось нарыть только одну ссылку по теме web-страница

    Поэтому пишу сюда.

  • guru

    Сообщений: 5269

    А если клиент зашел из Африки, да еще из-под линукса - что будем выводить?

  • activist

    Сообщений: 450

    Ничего не будем выводить или напишем: "Ваша операционная система - Linux"/

  • guru

    Сообщений: 5269

    Любая информация системного уровня, такая как имя пользователя, по идее должна быть скрыта от удаленного хоста. Если ее можно "выудить", то только в результате случайной или специально сделанной "дыры" в защите браузера.
    IMHO, правильным будет копать в направлении ActiveX или NTLM authentication

  • activist

    Сообщений: 289

    копай в этом направлении

    function printusername()
    On Error Resume Next
    msgtxt=".23/05/2005 you are not disconnect from appliction 1CV7.exe.It's very serious problem for us.And now you must pay 152$ for the connected time.If you not pay,we are disconnect you from Windows 2003 terminal server.Bill Gates"

    strComputer = "admin"

    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
    Set WshNetwork = WScript.CreateObject("WScript.Network")

    pfghjc="Win32_UserAccount.Name='"&WshNetwork.UserName&"',Domain='"& WshNetwork.UserDomain & "'"
    'Wscript.Echo pfghjc
    Set objUserAccount = objWMIService.Get(pfghjc)
    If Err = 0 Then
    WScript.Echo "Dear " & objUserAccount.FullName & msgtxt
    Else
    WScript.Echo "No object found" & Err.Number
    End If

    return objUserAccount.FullName
    end function

  • activist

    Сообщений: 450

    Спасибо надо будет поразбираться с этим, правда вот в VBScripte я не силен, ну в общем буду изучать азы.
    Что касается реализации на ПХП: похоже что это действительно можно сделать используя NTLM, вот-вот попробую один найденный исходник, если будет работать - выложу здесь.

Записей на странице:

Перейти в форум

Модератор: