此范例是利用 API 来开启「联机/中断网络磁盘驱动器对话框」,我们必须使用 mpr.dll API 函式库的 WNetConnectionDialog 及 WNetDisconnectDialog 函式来完成,以下的 TAPIMpr 类别为操作 mpr.dll 函式库类别。

   1:      ''' <summary>
   2:      ''' 网络芳邻相关函式库(mpr.dll)。
   3:      ''' </summary>
   4:      Public NotInheritable Class TAPIMpr
   5:   
   6:         Public Enum EResourceType As Integer
   7:              ''' <summary>
   8:              ''' 何任资源。
   9:              ''' </summary>
  10:              RESOURCETYPE_ANY = &H0
  11:              ''' <summary>
  12:              ''' 网络磁盘驱动器。
  13:              ''' </summary>
  14:              RESOURCETYPE_DISK = &H1
  15:              ''' <summary>
  16:              ''' 网络打印机。
  17:              ''' </summary>
  18:              RESOURCETYPE_PRINT = &H2
  19:              ''' <summary>
  20:              ''' 未知。
  21:              ''' </summary>
  22:              RESOURCETYPE_UNKNOWN = &HFFFFFFFF
  23:          End Enum
  24:   
  25:          ''' <summary>
  26:          ''' 联机网络磁盘驱动器对话框。
  27:          ''' </summary>
  28:          <DllImport("mpr.dll", CharSet:=CharSet.Auto)> _
  29:          Public Shared Function WNetConnectionDialog(ByVal hwnd As IntPtr, ByVal Type As EResourceType) As Integer
  30:          End Function
  31:   
  32:          ''' <summary>
  33:          ''' 中断网络磁盘驱动器对话框。
  34:          ''' </summary>
  35:          <DllImport("mpr.dll", CharSet:=CharSet.Auto)> _
  36:          Public Shared Function WNetDisconnectDialog(ByVal hwnd As IntPtr, ByVal Type As EResourceType) As Integer
  37:          End Function
  38:   
  39:      End Class

呼叫 API 的 WNetConnectionDialog 及 WNetDisconnectDialog 函式的方式如下。

   1:      ''' <summary>
   2:      ''' 联机网络磁盘驱动器对话框。
   3:      ''' </summary>
   4:      ''' <param name="Handle">窗口 Handle。</param>
   5:      ''' <returns>联机成功传回 True,反之传回 False。</returns>
   6:      Public Overloads Shared Function NetConnectionDialog(ByVal Handle As IntPtr) As Boolean
   7:          Dim iResult As Integer
   8:   
   9:          iResult = TAPIMpr.WNetConnectionDialog(Handle, TAPIMpr.EResourceType.RESOURCETYPE_DISK)
  10:          Return iResult = 0
  11:      End Function
  12:   
  13:      ''' <summary>
  14:      ''' 中断网络磁盘驱动器对话框。
  15:      ''' </summary>
  16:      ''' <param name="Handle">窗口 Handle。</param>
  17:      ''' <returns>成功传回 True,反之传回 False。</returns>
  18:      Public Overloads Shared Function NetDisconnectDialog(ByVal Handle As IntPtr) As Boolean
  19:          Dim iResult As Integer
  20:   
  21:          iResult = TAPIMpr.WNetDisconnectDialog(Handle, TAPIMpr.EResourceType.RESOURCETYPE_DISK)
  22:          Return iResult = 0
  23:      End Function

转载于:https://www.cnblogs.com/jeff377/archive/2008/04/22/1165301.html

联机/中断网络磁盘驱动器对话框相关推荐

  1. 在同一局域网内的同一工作组内登陆其中的机器时显示输入网络密码对话框

    如果在同一局域网内的同一工作组内登陆其中的机器时显示输入网络密码对话框,表明要登录的计算机的来宾(Guest)账户已经停用,可以利用"计算机管理"工具重新启用该计算机的来宾账户.

  2. 华硕服务器联机中断,Windows 7间歇性地断开有线Internet / LAN连接

    简而言之,我的Windows 7 Ultimate PC会间歇性地断开其Internet连接.为什么? 背景:我的PC连接到直接连接到电话线的ADSL调制解调器/路由器.我还打开了路由器内的无线连接, ...

  3. 刷服务器喇叭网络连接中断,网络连接中断?常见网络中断的解决方法

    在我们使用电脑时,网络中断可谓是最常见问题之一.网络中断的现象又分几种,下面小编就详细说下几种现象与分享解决的方法. 第一种:路由器无法联网 在平时,为了手机端也有无线网络(WiFi),我们一般选择连 ...

  4. 一个n人搜索的论坛精华帖子→网络(转)

    <script type="text/javascript"> function fastreply(subject) { if($('postform')) { $( ...

  5. 與网络故障专家的對話

    IP与MAC绑定的难题 问:我的计算机原来采用公网固定IP地址.为了避免被他人盗用,使用"arp -s ip mac"命令对MAC地址和IP地址进行了绑定.后来,由于某种原因,又使 ...

  6. 列举网络芳邻的网络资源

    此范例会以递归方式列举网络芳邻的网络资源,在此范例中会使用到 mpr.dll API 函式库的 WNetEnumResource.WNetOpenEnum.WNetCloseEnum 函式来进行网络芳 ...

  7. 鸟哥的Linux私房菜(服务器)- 第十一章、远程联机服务器SSH / XDMCP / VNC / RDP

    第十一章.远程联机服务器SSH / XDMCP / VNC / RDP 最近更新日期:2011/11/24 维护网络服务器最简单的方式不是跑去实体服务器前面登入,而是透过远程联机服务器联机功能来登入主 ...

  8. 第十一章、远程联机服务器SSH / XDMCP / VNC / RDP

    维护网络服务器最简单的方式不是跑去实体服务器前面登入,而是透过远程联机服务器联机功能来登入主机, 然后再来进行其他有的没的维护就是了.Linux 主机几乎都会提供 sshd 这个联机服务,而且这个服务 ...

  9. Linux远程联机服务器SSH VNC XDMCP RDP

    远程联机服务器SSH / XDMCP / VNC / RDP 利用SSH,telnet,VNC等方式取得的文字或图形shell能够进行很多系统管理的任务,与单纯的FTP能进行的工作当然不同 远程服务联 ...

最新文章

  1. ps混合模式glsl代码
  2. Vuforia 6.1提供4个版本下载
  3. 用linux集成电路版图设计,集成电路版图设计教程2012版本
  4. 在HTML中英文换行问题
  5. python 共现矩阵_Python词组共现矩阵
  6. 细节之中自有天地,整洁成就卓越代码
  7. 易车与中国海洋报社达成深度合作 开拓海洋主题汽车内容
  8. gp3688 uhf2扩频_摩托罗拉GP3688_GP3188写频软件
  9. google chrome 同步书签 查看gmail邮箱 谷歌浏览器同步助手
  10. Promise的三种状态
  11. 运用类判断三角形的形状
  12. HTML多画面同时播放,视频两个画面同时播放,两个视频放在同一画面|视频左右或上下两个画面...
  13. ie8/9收到json数据后提示下载的解决方法
  14. EntityFramework 用Moles的mock
  15. cocos2dx使用TiledMap模拟3D地图场景----斜45度2D地图的靠墙直线移动
  16. IOS 数据库操作SQLite3使用详解
  17. Linux的pcie模拟网卡,Intel英特尔PCIe万兆网卡虚拟功能驱动4.11.1版For Linux(2021年3月5日发布)...
  18. VUEX和filer过滤器的定义
  19. c语言撇号的用法,不同的语言标点使用也不同,英语中的撇号如何使用?美联英语带你了解...
  20. 深入了解DataGridView控件

热门文章

  1. 地平线开发者社区真心话大冒险,邀你闯关!
  2. 【MySQL】16-超详细的MySQL单行函数汇总
  3. 纯js写的手机版古诗填空游戏
  4. 文件分类服务器,云服务器 搭建 文件分类存储
  5. i o笔记 用户增长
  6. 《老头滚动条5》买屋 周详方案向导
  7. ASP.NET搭建企业微信公众平台源码
  8. Sublime Text 3.0版本的傻瓜式汉化步骤
  9. .NET异步和多线程系列(四)- 多线程异常处理、线程取消、多线程的临时变量问题、线程安全和锁lock
  10. 北航2021届计组 - 支持中断的CPU