Le lecteur C: sur ntmemo01 est-il partagé? Si ce n'est pas partagé, vous ne pouvez pas y accéder. Si elle est partagée mais nécessite un nom d'utilisateur et un mot de passe, vous devrez y accéder différemment. Vous pouvez mapper une lettre de lecteur à elle, en fournissant un nom d'utilisateur et mot de passe dans le processus:
const
RemoteName = '\\ntmemo01\C$';
UserName = 'yourusername';
Password = 'yourpassword';
function MapNetworkDrive: Boolean;
var
NetRes: TNetResource;
Res: DWord;
begin
Result := True;
FillChar(NetRes, SizeOf(TNetResource), 0);
NetRes.dwType := RESOURCETYPE_DISK;
NetRes.lpRemoteName := PChar(RemoteName);
NetRes.lpLocalName := 'H:'; // Whatever drive letter you want
Res := WNetAddConnection2(NetRes, PChar(Password), PChar(UserName), 0);
Result := (Res = NO_ERROR);
end;
Démappage après:
function UnMapNetworkDrive: Boolean;
var
Res: DWord;
begin
Res := WNetCancelConnection2(PChar('H:'), 0, True); // same drive letter as above
Result := (Res + NO_ERROR);
end;
C $ est un contenu masqué êtes-vous sûr que le compte utilisateur a les autorisations correctes? http://support.microsoft.com/kb/314984 – stukelly