高手们，我真的不知道怎么感谢您们，请进！(50分)

V

VincentXie

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-03

• #1

小弟想用DELPHI做一个ACTIVE FORM，但是不知道在DELPHI中如何读取NT的登录用户名，
等效于ASP中的：Request.ServerVariables("AUTH_USER")

 

M

maggic

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-03

• #2

你试试，应该可以的
function TAForm.GetUserName(): AnsiString;
var
DWIword;
begin
DWI:=MAX_PATH;
setlength(Result,DWI+1);
if (WNetGetUser(nil,pchar(Result),DWI)=no_Error) then
setlength(Result,strlen(Pchar(Result)))
else
setlength(Result,0);
end;

 

V

VincentXie

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-03

• #3

这是只是得到本地的NT登录账号，我想得到那种在网页上的NT验证框中的那个用户名。
等效于ASP中的：Request.ServerVariables("AUTH_USER")

 

D

dcsdcs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-03

• #4

ACTIVE FORM是运行在client端的，你需要取得在asp中NT用户，只有通过asp取得，然后传递给ACTIVE FORM,如果取本地，楼上的

 

Z

zhangshunzhong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-03

• #5

在客户端输入登录用户名密码，
如果是在ActiveXForm中输入的，就在ActiveXForm中通过Socket发给服务器

如果是在Asp中输入的(这个ASP页中没有ActiveXForm)，在启动含ActiveXForm页时把用户名传进去