네트워크 드라이브를 잡아서 파일을 전송하려고 하는데 아래와 같이 했는데요... 안 되네요... 음, 좀 가르쳐주세요...

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

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

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

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

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