您的位置:首页 > 编程语言 > Delphi

delphi 访问有登陆密码的局域网电脑文件

2012-04-05 08:55 495 查看
//连接到\\192.168.0.1\picbook目录,用户名是administrator,密码是:'aaaa'

procedure TForm1.ConnectServer;

var

NetSource : TNetResource;

begin

with NetSource do

begin

dwType := RESOURCETYPE_ANY;

lpLocalName :=''; // 将远程资源映射到此驱动器

lpRemoteName:='\\192.168.0.1\picbook'; // 远程网络资源

lpProvider :='';

end;

WnetAddConnection2(NetSource, 'aaaa','Administrator',CONNECT_UPDATE_PROFILE);

end;

//关闭连接

procedure TForm1.DisConnectServer;

begin

WNetCancelConnection2('\\192.168.0.1\picbook',CONNECT_UPDATE_PROFILE,True);

end;

连接后就可以在程序代码中直接用\\192.168.0.1\picbook\aa.jpg查看网络图片
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐