VB скрипт проблемы в ASP - PullRequest
Новая
       12

VB скрипт проблемы в ASP

0 голосов
/ 04 мая 2009

Я пытаюсь заставить этот код работать на странице asp. когда пользователь нажимает кнопку OnClick, он перенаправляет их на эту страницу, которая создает файл для хранения имени пользователя и времени выполнения кода. До сих пор, когда этот код запускается, он создает файл userinfo.flag, но не записывает данные пользователя. По сути, я не собираю данные пользователей правильно. 

<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set NewTextFile = FSO.OpenTextFile(server.mappath("UserInfo.flag"),2,true)
Set WshNetwork = WScript.CreateObject("WScript.Network")
WScript.Echo "User Name = " & WshNetwork.UserName
NewTextFile.WriteLine("user:")
NewTextFile.WriteLine(WshNetwork.userName)
NewTextFile.WriteLine(Now)
NewTextFile.Close
Set NewTextFile = Nothing
Set FSO = Nothing

%>

<HTML>
<HEAD>
<TITLE>TEST PAGE</TITLE>
</HEAD>
</HTML>

1 Ответ

0 голосов
/ 04 мая 2009

При работе в среде .asp у вас нет всех глобальных переменных, доступных в среде .vbs. Вот несколько вещей:

  • Не используйте объект WshNetwork для поиска информации о пользователе. Эта информация (если пользователь аутентифицирован) доступна в Request.ServerVariables["AUTH_USER"]
  • Используйте Response.Write вместо WScript.Echo

Это должно дать вам правильную информацию о пользователе.

...