mapear unidade de rede no xp...

Delphi

22/12/2004

Estou tentando mapear um unidade de rede, mas não estou conseguindo no windows xp professional, o código q estou utilizando é o seguinte:

procedure TForm1.Button1Click(Sender: TObject);
var
NRW: TNetResource;
begin
with NRW do
begin
dwType := RESOURCETYPE_ANY;
lpLocalName := ´G:´;
lpRemoteName := ´\\servidor\c´;
lpProvider := ´´;
end;
WNetAddConnection2(NRW, ´MyPassword´, ´MyUserName´, CONNECT_UPDATE_PROFILE);
end;

O que devo fazer?


Universodosoftware

Universodosoftware

Curtidas 0

Respostas

Massuda

Massuda

22/12/2004

De acordo com a [url=http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wnet/wnet/wnetaddconnection2.asp]ajuda sobre a função WNetAddConnection2 no MSDN[/url], você não pode nesse caso usar RESOURCETYPE_ANY. Pelo que entendi, deveria ser:
with NRW do begin 
  dwType := RESOURCETYPE_DISK; // <-- modificado
  lpLocalName := ´G:´; 
  lpRemoteName := ´\\servidor\c´; 
  lpProvider := ´´; 
end; 
WNetAddConnection2(NRW, ´MyPassword´, ´MyUserName´, CONNECT_UPDATE_PROFILE);
Outro motivo para não funcionar é que o usuário especificado não tem permissão para acessar a pasta no servidor.


GOSTEI 0
Universodosoftware

Universodosoftware

22/12/2004

Beleza verifiquei esse e outros parametros e deu tudo certo.
Alguém do fórum teria o código de como fazer para desconectar-se unidade mapeada.


GOSTEI 0
Massuda

Massuda

22/12/2004

Alguém do fórum teria o código de como fazer para desconectar-se unidade mapeada.

O complemento de WNetAddConnection2 é [url=http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wnet/wnet/wnetcancelconnection2.asp]WNetCancelConnection2[/url].
  WNetCancelConnection2(´\\servidor\c´, CONNECT_UPDATE_PROFILE, True);



GOSTEI 0
POSTAR