Cita:
Empezado por Casimiro Notevi
Mira si te sirve alguno de los enlaces relacionados, abajo del todo de esta página.
|
Parece que lo único que tenia que hacer era modificar un poco el NetResource
Dejo código por si a alguien se le ofrece en un futuro:
Código Delphi
[-]
function AgregarCarpeta(const NetworkPath: string): string;
var
NetResource: TNetResource;
RemoteName: string;
begin
RemoteName := NetworkPath;
NetResource.dwType := RESOURCETYPE_ANY;
NetResource.lpLocalName := nil;
NetResource.lpRemoteName := PChar(RemoteName);
NetResource.lpProvider := nil;
WNetAddConnection2(NetResource, nil, nil, CONNECT_UPDATE_PROFILE);
end;