Погода: 0 °C
20.04−1...8переменная облачность, без осадков
21.044...11пасмурно, небольшие дожди
НГС.Форум /Компьютеры Интернет Связь / Программирование /

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

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

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

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

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

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

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

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

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

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

    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

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

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

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

Модератор: