社区
网络编程
帖子详情
想要映射网络驱动器的源码和断开映射网络驱动器的源码
tubo_true
2006-01-05 09:48:35
谢谢
...全文
164
5
打赏
收藏
想要映射网络驱动器的源码和断开映射网络驱动器的源码
谢谢
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
立在心间
2006-01-08
打赏
举报
回复
关键技术是调用了两个Windows API函数WNetAddConnection2和WNetCancelConnection2,下面分别加以介绍:
1、WNetAddConnection2
其作用是创建一个同网络资源的连接,当调用成功时函数返回0。其参数说明如下:
lpNetResource:数据类型是结构NETRESOURCE,该结构中的各个字段对要连接的网络资源进行了定义,包括远程计算机共享文件夹的名字(如图2所示,在“远程共享文件夹”文本框中的“\\1.1.1.1\share”),以及本地系统为网络驱动器分配的盘符“X:”,等等;
lpPassword:数据类型为string,该参数是个可选参数,用来设置网络密码,对应本程序控件Text3中的文本。如果该参数的值等于vbNullString,则表示采用系统当前登录用户的默认密码;如果是一个空字符串,则表示不需要任何密码就可访问网络资源;
lpUserName:数据类型为string,指定用于网络连接的用户名,对应本程序控件Text2中的文本。如果该参数的值等于vbNullString,则表示使用系统当前的登录用户名;
dwFlags:数据类型为long,该参数可以设为0,也可以指定常量CONNECT_UPDATE_PROFILE(表示创建永久性的网络连接)。
2、WNetCancelConnection2
其作用是断开一个网络连接,当调用成功时函数返回0。其参数说明如下:
lpName:数据类型是string,用来指定已连接资源的远程名称或本地名称,具体在本文中就是给远程共享文件夹分配的盘符:“X:”;
dwFlags:数据类型为long,可以取两个值,0或CONNECT_UPDATE_PROFILE,如果为0,而且建立的网络连接是永久性连接,则在Windows下次重新启动时仍会重新连接;
fForce:数据类型为long,如果为True,那么,即使连接的网络资源上有正在打开的文件或作业,也强制断开网络连接,这样就会造成数据的丢失、不完整性,建议将该参数的值设为False
程序园苑
2006-01-06
打赏
举报
回复
up
feiyun0112
2006-01-06
打赏
举报
回复
调用API函数映射网络驱动器
http://www.services-ha.com/article_view.asp?id=232
yinweihong
2006-01-06
打赏
举报
回复
cmd--subst /?
tubo_true
2006-01-05
打赏
举报
回复
要VB的
60建立和
断开
网络
映射
驱动器
的软件
源码
60建立和
断开
网络
映射
驱动器
整理了一下本人硬盘里实用的编程资料和
源码
,全部是VB代码,希望大家能喜欢.
Delphi
映射
和
断开
网络
驱动器
源码
实例.rar
Delphi
映射
和
断开
网络
驱动器
源码
实例,之前的都是代码版,不是完整的
源码
,这次是可编译的
源码
包,下载后用Delphi7编译就运行了,界面效果如截图所示,部分代码如下: 将远程资源
映射
到此
驱动器
lpRemoteName :=pchar(edit1.text); // 远程
网络
资源 lpProvider := ''; // 必须赋值,如为空则使用lpRemoteName的值。 end; if WnetAddConnection2(NetSource, pchar(edit4.text), pchar(edit3.text), CONNECT_UPDATE_PROFILE)=NO_ERROR //用户名为Guest,口令为Password,下次登录时重新连接,此时在Windows资源管理器中可看到
网络
驱动器
: then //
映射
成功 showmessage(edit1.text '成功
映射
成' edit2.text) else showmessage('
映射
失败!'); end; procedure TForm1.Button2Click(Sender: TObject); begin if MessageDlg('确实要
断开
么?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then //不管是否有文件打开,
断开
网络
驱动器
: if WNetCancelConnection2(pchar(edit2.text), CONNECT_UPDATE_PROFILE, True)=NO_ERROR then //
映射
断开
成功 showmessage(edit1.text '
映射
断开
!') else showmessage('
断开
映射
失败'); end;
《计算机体系结构—
网络
篇1、2》之
网络
结构、IP分组交换技术、IP/MAC
映射
、NAT转换等
课程内容:
网络
结构、IP分组交换技术、IP/MAC地址
映射
、私网公网IP、NAT转换、网卡、交换机、路由器等,以上这些内容对于很多同学来说是熟悉又陌生,熟悉的是经常听到,陌生的是没有多少同学真的完全弄明白了,这...
VB实现
映射
网络
驱动器
的示例源程序.rar
一个
映射
网络
驱动器
的VB例子,WNetConnectionDialog启动一个标准对话框,以便建立同
网络
资源的连接,参数 类型及说明,hwnd Long,指定要成为对话框父窗口的一个窗口的句柄,dwType Long,设成RESOURCETYPE_DISK,浏览磁盘资源,hwnd Long,指定要成为对话框父窗口的一个窗口的句柄,dwType Long,设成RESOURCETYPE_DISK 或 RESOURCETYPE_PRINT,决定要
断开
的是磁盘还是打印机资源
用API函数
映射
和
断开
网络
驱动器
(3KB)
用API函数
映射
和
断开
网络
驱动器
(3KB)
网络编程
1,502
社区成员
18,437
社区内容
发帖
与我相关
我的任务
网络编程
VB 网络编程
复制链接
扫一扫
分享
社区描述
VB 网络编程
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章