社区
网络及通讯开发
帖子详情
怎样在BCB中发现共享的网络驱动盘,并且对它进行读写操作?真诚请教!!!!!!!!!!!!!!!!!
明行
2001-07-28 04:40:37
...全文
191
18
打赏
收藏
怎样在BCB中发现共享的网络驱动盘,并且对它进行读写操作?真诚请教!!!!!!!!!!!!!!!!!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
18 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
明行
2001-08-02
打赏
举报
回复
立刻加分
whitelion
2001-07-28
打赏
举报
回复
学习
我不懂电脑
2001-07-28
打赏
举报
回复
原来就说过了。
心情极坏
明行
2001-07-28
打赏
举报
回复
你找到了原因,给我说一下,你这人挺好,交个朋友吧:zengyixun@sina.com
我现在要走了,不然我的money可受不了.今天谢谢你了,下次来的时候给你加分。OK!!!!!!!!
wjzhuang
2001-07-28
打赏
举报
回复
会提示出错
//以下这一句
ErrInfo = WNetAddConnection2(NetR, "", "", CONNECT_UPDATE_PROFILE);
wjzhuang
2001-07-28
打赏
举报
回复
不行,那样编译过不去
明行
2001-07-28
打赏
举报
回复
NETRESOURCE *NetR
把*号去掉试一下呢?
wjzhuang
2001-07-28
打赏
举报
回复
我看不出来,开始就错
我想可能我定于的类型不对
明行
2001-07-28
打赏
举报
回复
不好意思,我是在网吧里上网,无法进行调试。所以不太明白为什么。你要是找到了原因,给我说一下,OK,谢了!!!!!!!!!
wjzhuang
2001-07-28
打赏
举报
回复
呵呵~~~~~~~~~
前天刚和几个同学喝过一次
我想应该是自己寻找可共享的资源,然后读写
程序帮我看看,为什么出错
明行
2001-07-28
打赏
举报
回复
wjzhuang(困惑中的程序猪)
太谢谢你了。有机会请你喝酒,我想知道有些程序(如病毒),为什么能在局域网上传播呢。(没有共享)
wjzhuang
2001-07-28
打赏
举报
回复
NetR->dwScope = RESOURCE_GLOBALNET;
错在这里,为什么?
wjzhuang
2001-07-28
打赏
举报
回复
是呀,没共享应该不行
我改写了一下,不过运行有问题
我正在看,你也看看
void __fastcall TForm1::Button2Click(TObject *Sender)
{
NETRESOURCE *NetR;
long ErrInfo;
NetR->dwScope = RESOURCE_GLOBALNET;
NetR->dwType = RESOURCETYPE_DISK;
NetR->dwDisplayType = RESOURCEDISPLAYTYPE_SHARE;
NetR->dwUsage = RESOURCEUSAGE_CONNECTABLE;
NetR->lpLocalName = "j:";
NetR->lpRemoteName = "\\xiaojun\c";
ErrInfo = WNetAddConnection2(NetR, "", "", CONNECT_UPDATE_PROFILE);
if(ErrInfo == NO_ERROR)
MessageBox(0,"Net connection successful!","",0);
else
MessageBox(0,"ERROR: ","",0);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
// 断开映射网络驱动器
long ErrInfo;
char *strLocalName;
strLocalName ="j:";
ErrInfo = WNetCancelConnection2(strLocalName, CONNECT_UPDATE_PROFILE, false);
if( ErrInfo == NO_ERROR )
MessageBox(0,"Net disconnection successful!","",0);
else
MessageBox(0,"ERROR","",0);
}
明行
2001-07-28
打赏
举报
回复
dycdyc123(dycdyc123)
为什么不能,在计算机上只有不会,没有不能。
dycdyc123
2001-07-28
打赏
举报
回复
那恐怕不能,
否则可以黑人家了!
明行
2001-07-28
打赏
举报
回复
wjzhuang(困惑中的程序猪)
非常感谢你的指教,不知道有没有什么更好的办法,还有,可以用C++写一次吗?谢谢你了。
还有就是,如果对方没有共享,有什么办法进行读写操作吗?
wjzhuang
2001-07-28
打赏
举报
回复
回复人:wyb_star(孤星) (2001-6-7 19:41:00) 得0分
映射网络驱动器
用此方法让你可以映射网络驱动器和断开映射网络驱动器,用本机来试通不过,如果你在网络上也通不过,请告知建立映射网络驱动器
procedure TForm1.Button1Click(Sender: Tobject);
var NetR :NETRESOURCE;ErrInfo : Longint;
begin
NetR.dwScope := RESOURCE_GLOBALNET;
NetR.dwType := RESOURCETYPE_DISK;
NetR.dwDisplayType := RESOURCEDISPLAYTYPE_SHARE;
NetR.dwUsage := RESOURCEUSAGE_CONNECTABLE;
NetR.lpLocalName := 'j:';
NetR.lpRemoteName := '\\Lifang\c';
ErrInfo := WNetAddConnection2(NetR, '', '', CONNECT_UPDATE_PROFILE);
If ErrInfo = NO_ERROR Then
messagebox(0,'Net connection successful!','',0)
Else
messagebox(0,'ERROR: ','',0);
end;
断开映射网络驱动器
procedure TForm1.Button2Click(Sender: Tobject);
var ErrInfo : Longint;
strLocalName : pchar;
begin
strLocalName:='j:';
ErrInfo := WNetCancelConnection2(strLocalName, CONNECT_UPDATE_PROFILE, False);
If ErrInfo = NO_ERROR Then
messagebox(0,'Net disconnection successful!','',0)
Else
messagebox(0,'ERROR','',0);
end;
wjzhuang
2001-07-28
打赏
举报
回复
相关贴子
http://www.csdn.net/expert/Topic/75/75130.shtm
在
BCB
中
使用ActiveX控件显示Flash动画
在
BCB
中
使用ActiveX控件显示Flash动画!!!!
BCB
制作的视频捕获程序
该程序是一个利用
BCB
制作的摄像头
驱动
程序,有一定参考价值,初学者值得一看!!!
BCB
下使用COM控件
bcb
下可用的COM控件,用起来特别方便!!
BCB
工程清理助手 v1.0
BCB
工程清理助手 v1.0!!!!!!!!!!!!!!!!!!!!!
C++Builder(
BCB
)
中
文.zip
超清,不清你打死我。1300页
中
文文档 非常全面!!!!好用!亲测,初学者必须! 图文并茂,色彩鲜明!好看!好用啊!
网络及通讯开发
1,316
社区成员
8,873
社区内容
发帖
与我相关
我的任务
网络及通讯开发
C++ Builder 网络及通讯开发
复制链接
扫一扫
分享
社区描述
C++ Builder 网络及通讯开发
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章