ar
NetResource: TNetResource;
Result: cardinal;
// ...
NetResource.dwType := RESOURCETYPE_DISK;
NetResource.lpLocalName := nil;
NetResource.lpRemoteName := '\\192.168.0.100\dir';
NetResource.lpProvider := nil;
Result := WNetAddConnection2(NetResource, 'password', 'username', 0);
if Result = NO_ERROR then
// ...
// 值得注意的是：如果返回错误值是1219（ERROR_SESSION_CREDENTIAL_CONFLICT），表明这个网络路径已经连接了，可以直接使用
或者
用winexec执行命令：net use \\ip /user:用户名 密码
然后直接
\\ip地址\ipc$\文件夹名称
本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请
点击举报。
