저는 네트워크 드라이브를 연결해서 파일 전송하는 루틴을 짜고 있습니다...
나름대로 확신을 가지고 아래와 같이 짰는데 WNetAddConnection2함수를 호출하는 곳에서 네트워크 연결이 되질 않네요...
뭐가 문제일까요? 부탁드리겠습니다...

function TFrmMain.DownloadFile(sFileName: String): boolean;
var
  wnetInfo : TNetResource;
  bTemp : Boolean;
begin
  result := true;

  // 네트워크 드라이브 연결 'Z:' driver
  with wnetInfo do begin
    dwType        := RESOURCETYPE_ANY; // DWORD;
    lpLocalName   := PChar('Z:');             // PAnsiChar;
    lpRemoteName  := PChar('\\211.171.159.88\C:\mpeg');  // PAnsiChar;
    lpProvider    := Pointer(nil);
  end;

  if WNetAddConnection2(wnetInfo, PChar('1234'), PChar('administrator'), 0) <> NO_ERROR then begin
     result := false;
     Exit;
  end;

  try
    ProgressBar.Position := 0;
    ProgressBar.Enabled := True;
    bTemp := CopyFile(PChar(sMpegPath + '\' + sFileName), PChar('Z:\' + sFileName), False);

    if not bTemp then result := false;
    ProgressBar.Position := 100;
  finally
    WNetCancelConnection2('Z:', 0, true);
  end;
end;