怎样建立与网络中另一台机子的网络连接,对方要求用户和密码,用什么控件啊?(10分)(10分)

  • 主题发起人 主题发起人 nottop
  • 开始时间 开始时间
N

nottop

Unregistered / Unconfirmed
GUEST, unregistred user!
同题,感谢!
 
目前,DELPHI好象还没有这样的控件.
 
netapi32函数
 
//------------------------------------------------------------------------------
//登录远端计算机
procedure LoginRemoteComputer(AComputerName, AUserName, APassword :String);
const
cCommand = 'net use "//%s" "%s" "/user:%s"';
begin
WinExec(Pchar(Format(cCommand, [AComputerName, APassword, AUserName])), sw_Hide);
Sleep(100);
end;
//------------------------------------------------------------------------------
//注销登录远端计算机
procedure LogOutRemoteComputer(AComputerName :String);
const
cCommand = 'net use "//%s" /delete';
begin
WinExec(Pchar(Format(cCommand, [AComputerName])), sw_Hide);
end;
//------------------------------------------------------------------------------
 
请问有没有这方面的控件啊,多谢楼上的!
 
接受答案了.
 
后退
顶部