delphi如何在局域网别的机器上创建目录?

Question

诚恳的向大家请教
在delphi中如何在局域网中别的机器上创建目录

Answer 1

先用WNetAddConnection2将远程机的共享资源映射成本地盘符,然后就可像操作本地硬盘一样对它进行访问
前提:你必须有访问远程机共享资源的权限(要用户/密码)

Answer 2

完整程序
procedure TForm1.Button1Click(Sender: TObject);
var
    NR:TNetResource;
    begin
    with NR do
    begin
    dwType:=RESOURCETYPE_ANY;
    lpLocalName:='X:'; //map to this driver letter
    lpRemoteName:='//MyServer/MyDirectory';
    //Must be filled in.
    lpProvider:='';
    end;
    WNetAddConnection2(NR,'MyPassword','MyUername',
    CONNECT_UPDATE_PROFILE);
    MkDir('x:\newdir');
end;