線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1496
推到 Plurk!
推到 Facebook!

網路copy檔案

答題得分者是:wameng
gavinj123
初階會員


發表:88
回覆:48
積分:27
註冊:2002-10-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-11-29 01:42:26 IP:61.62.xxx.xxx 未訂閱
我想直接用copyfile(pchar('\\192.168.1.100\test\1.txt'),pchar('c:\1.txt'),true)結果一直失敗,後來發現是因為沒登入192.168.1.100這台電腦的問題,可是要登入他,又會跳出一個帳號密碼的視窗。 請問有沒有什麼方法,可以讓我copy時,直接帶帳號密碼的摻數, 或是可以不用出現登入視窗,直接給帳號密碼就能登入的方法。
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-11-29 08:02:35 IP:202.39.xxx.xxx 未訂閱
可用 WNetAddConnection2 這個 API 參考: http://www2.ccw.com.cn/tips/9906/060704_05.asp
// 建立網路磁碟機 X 槽
procedure TForm1.Button1Click(Sender : TObject);
var
  NetSource : TNetResource;
begin
  with NetSource do
  begin
    dwType := RESOURCETYPE_ANY;
    lpLocalName := 'X:';             
    lpRemoteName := '\192.168.1.100\test';  
    lpProvider := '';
  end;      WnetAddConnection2(NetSource, 'Password', 'Guest', CONNECT_UPDATE_PROFILE);  // Login ID 為 Guest, Password 為 Password
end;    // 中斷網路磁碟機 X 槽
procedure TForm1.Button1Click(Sender : TObject);
begin
  WNetCancelConnection2('X:', CONNECT_UPDATE_PROFILE, True); 
end;
設定網路磁碟機成功後, 再執行 copy 的動作
gavinj123
初階會員


發表:88
回覆:48
積分:27
註冊:2002-10-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-11-29 09:02:42 IP:210.192.xxx.xxx 未訂閱
這個方法不錯,可是會在我的電腦中,出現x的連結, 如果我不想讓user看到有多出的磁碟機,請問還有另的好方法嗎?
wameng
版主


發表:31
回覆:1336
積分:1188
註冊:2004-09-16

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-11-29 10:02:53 IP:61.222.xxx.xxx 未訂閱
{ 建立連接到遠端電腦共享資料夾.成功 Result = 0 失敗 Result ErrorCode } Function NetAddConnection(RemoteDir,UserID,PSWD :String; Const ResType:DWORD = RESOURCETYPE_DISK):integer; var NetSource : TNetResource; PUserID,PPSWD : PChar; begin with NetSource do begin lpLocalName := nil; dwType := ResType; lpRemoteName := Pchar(RemoteDir); lpProvider := Nil; end; if UserID<>'' then PUserID:=PChar(UserID) else PUserID := Nil; if PSWD<>'' then PPSWD :=PChar(PSWD) else PPSWD := Nil; Result := WnetAddConnection2(NetSource,PUserID,PPSWD,CONNECT_UPDATE_PROFILE); end; 不需要建立網路磁碟機 試試!
Dragon_1977
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-20

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-05-05 17:23:58 IP:218.4.xxx.xxx 未訂閱
請教﹐如果romote user id 在不同domain下,該如何訪問..
系統時間:2024-05-15 0:44:07
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!