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

求助:各位大哥,请帮我看看我下面这个问题(关于WNetCancelConnection2 )谢谢!

 
npsgsys
一般會員


發表:12
回覆:0
積分:2
註冊:2007-03-02

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-03-03 09:13:51 IP:125.89.xxx.xxx 訂閱
请教:
服务器的
计算机名为:lsh
IP 地址为 :192.168.0.188

客户端的
计算机名为:wqs
IP 地址为 :192.168.0.166


我的图片是放在 ledtest\test4\ 目录下
并且把 ledtest 是设置为共享的


procedure TForm1.Button1Click(Sender: TObject);
var
NetShare :NETRESOURCE;
begin
NetShare.dwType := RESOURCETYPE_ANY;
//NetShare.lpLocalName := PAnsiChar(edit1.Text);
NetShare.lpLocalName := 'D:';
//NetShare.lpRemoteName:= PAnsiChar(edit2.Text);
NetShare.lpRemoteName:= '\\lsh\ledtest\test4\';
NetShare.lpProvider:='';
WNetAddConnection2(NetShare,'administrator','1999',CONNECT_UPDATE_PROFILE);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
strLocalName : PChar;
begin
strLocalName:= PAnsiChar(edit1.Text);
WNetCancelConnection2(strLocalName,CONNECT_UPDATE_PROFILE,False);
end;

procedure TForm1.Button3Click(Sender: TObject);
var
map:Tbitmap; //位图实例变量
begin
map:=Tbitmap.Create;
map.Transparent:=true;
map.LoadFromFile('\\lsh\ledtest\test4\001.bmp');
form1.Canvas.Draw(20,20,map);
end;


程序运行后:
我首先单击 Button1,想使登陆到服务器
然后 单击 Button3, 想显示图片

可是还是
提示:
can not open file "\\lsh\ledtest\test4\001.bmp'"
登陆失败,未知的用户名或密码错误


各位大哥,这是什么原因?
我哪里写错了
是不是
map.LoadFromFile('\\lsh\ledtest\test4\001.bmp');
这里写错了,如果是的话,那要怎么写呢?

谢谢!
------
帮助别人的同时自己会得到更大的快乐——因为我们都是delphi的爱好者!!
Kingron
中階會員


發表:1
回覆:51
積分:60
註冊:2005-09-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-03-03 15:34:05 IP:125.89.xxx.xxx 訂閱
映射目录名没有成功,检查你的代码。
最好不要再映射共享目录名下的子目录名,Windows不支持。
另外,映射的驱动器名字不对,我猜测你的D:在你的机器中已经有了!如果再映射一个网络驱动器为D:,明显就会冲突。
> NetShare.lpLocalName := 'D:';

你可以改D: 为 z: 或者 x: 看看。
------
超级猛料:http://kingron.delphibbs.com
系統時間:2024-03-29 22:26:29
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!