Para conectar unidad en red

[nferigo]

Hola este Soy nuevo este es mi primer post, ya que el problema que tendo no los puedo resolver, busque en todo el foro pero no aparecena nada;
El codigo es una copia de un poste del del foro no es el mismo


NetResouce.dwType:=RESOURCETYPE_ANY;
NetResouce.lpLocalName:='K:';
NetResouce.lpLocalName:='\\desarrollo\test';
NetResouce.lpProvider:= nil;

NetResult:= WNetAddConnection2A(NetResouce, '', '', 0);
if NetResult = NO_ERROR then
Application.MessageBox('Se a podido conetar a la unidad de red', 'Atención', MB_ICONINFORMATION);


el problema que NETRESULT simpre me toma el Valor 487;
que significa que no se "Intento de acceso dirección inválida";
ya cambien todos lo parametros pero siempre me da lo mismo.

Si alguien me puede ayudar diciendo donde esta mi error en el codigo se lo agradecería mucho, desde ya muchas gracias

[[cHackAll]]

Código Delphi [-]
NetResouce.lpLocalName:='K:';
NetResouce.lpRemoteName:='\\desarrollo\test';