请问,这样映射网络驱动器有什么错误???谢谢!(穷人我只有5分了)(5分)

  • 主题发起人 主题发起人 ling0303
  • 开始时间 开始时间
L

ling0303

Unregistered / Unconfirmed
GUEST, unregistred user!
我的目的是,用已知的用户名和密码先去登陆另一台机器,再用COPYFile复制文件,不胜感激!!!!!!!!!!
procedure TForm1.Button1Click(Sender: TObject);
var
NetR:NETRESOURCE;
intRet:Longint;
begin
NetR.dwScope:=RESOURCE_GLOBALNET;
NetR.dwType:=RESOURCETYPE_DISK;
NetR.dwDisplayType:=RESOURCEDISPLAYTYPE_SHARE;
NetR.dwUsage:=RESOURCEUSAGE_CONNECTABLE;
netr.lpProvider:='';
NetR.lpLocalName:=pchar('G:/');
NetR.lpRemoteName:=pchar('//hp-netserver/C:/FF');
intRet:=WNetAddConnection2(NetR,pchar(''),pchar('administrator'),CONNECT_UPDATE_PROFILE);

end;
 
NetR.lpRemoteName:=pchar('//hp-netserver/C:/FF');->
NetR.lpRemoteName:=pchar('//hp-netserver/C/FF');
 

Similar threads

后退
顶部