PDA

Ver la Versión Completa : Conexion a unidad de red compartida


maikeloh
20-03-2007, 19:54:25
TEngo el siguiente problema, me conecto a unidad de red compartida en la red, pero si lo hago con el proceso elevado a System no se conecta, sin embargo como administrador o como cualquier otro usuario si lo hace ¿Que puede ser?, Aqui les remito mi codigo de conexion.

procedure TForm1.BitBtn1Click(Sender: TObject);
var
NetResource: TNetResource;
begin

{ fill our TNetResource record structure }
NetResource.dwType := RESOURCETYPE_DISK;
NetResource.lpLocalName := 'S:';
NetResource.lpRemoteName := '\\matri\td$';
NetResource.lpProvider := '';

{ map our network drive using our TNetResource
record structure }
WNetAddConnection2(NetResource,
pansichar(Edit2.text), {Clave o vacio /Password or empty}
pansichar(Edit1.text), {Nombre del usurio o vacio/User name o vacio}
CONNECT_UPDATE_PROFILE);
end;