好有用的一个参数 请大侠加入 (50分)

M

meiguibao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #1

procedure TForm1.Button1Click(Sender: TObject);
var
NRW: TNetResource;
lnReturn : Dword;
begin
NRW.dwType := RESOURCETYPE_ANY;
NRW.lpLocalName :='';
NRW.lpRemoteName:= '//xsp/icme$';
NRW.lpProvider := '';
lnReturn := WNetAddConnection3(这个参数怎么写,Nrw,'7192','guest',CONNECT_UPDATE_PROFILE);
Application.MessageBox(Pchar(lnReturn),'提示！',64);
end;
end.
请问 WNetAddConnection3 的第一个参数怎么写
谢谢各位大侠的加入，但还是没有解决我的问题。我的 映射磁盘驱动器是''，而不能是可见的字
符，如‘x,y,a,m‘。而且为了不让其他人看见我所共享的文件，共享名最后一个字符必顺是 $


还有,用 WNetAddConnection3 连接之后，怎么用程序断开连接？？？？？？

 

Y

yu_gao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #2

这么写就行了，我试过了，可以的
procedure TForm1.Button1Click(Sender: TObject);
var
netRes: TNetResource;
begin
with netRes do
begin
dwType := RESOURCETYPE_DISK;
lpLocalName := 'K:';
lpRemoteName := '//myserver/D$';
lpProvider := nil;
end;
WNetAddConnection3(Handle, netRes, pchar('pass'), pchar('user'),
CONNECT_UPDATE_PROFILE);
end;

 

S

shenloqi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #3

添加网络驱动器？
楼上的就可以了。

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #4

写共享文件夹的路径就可以了如：'//server//share'

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #5

刚才写错了，应该是：'//server/share'

 

M

meiguibao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #6

谢谢各位大侠的加入，但还是没有解决我的问题。我的 映射磁盘驱动器是''，而不能是可见的字
符，如‘x,y,a,m‘。而且为了不让其他人看见我所共享的文件，共享名最后一个字符必顺是 $

 

野

野兽王子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #7

to ：yu_gao
你刚才的代码可以吗，我怎么没有成功呢，指教！

 

M

meiguibao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #8

若将 yu_gao 的 Handle 改为 Self,Handle 就应改能行了！

 

Y

yu_gao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #9

用 NRW.lpLocalName :='';的话就没有显示了，但是已经通过了验证，可以
访问对方的资源了，这是你要得到什么的效果吗？

 

M

meiguibao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #10

谢谢yu_gao,连接的问题已经解决了，可是怎么断开啊！请多指点。

 

Y

yu_gao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #11

用这个：
WNetCancelConnection(pchar('//myserver/D$'),True);

 

M

meiguibao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #12

接受答案了.

 

Y

yu_gao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-17

• #13

有没有搞错，我回答了问题，你却把分给别人，是不是作弊呀！！！
我并不是在乎分，可你也要尊重别人的劳动啊，气死我了。