如何映射 / 中断网络磁盘

• 
  　　下面的程序段可以模拟【网上邻居】及【我的电脑】中的【映射 / 中断网络磁盘】，就是出现【映射 / 中断网络磁盘】的问话框，让使用者根据自己电脑的情形，来决定要连接的网络磁盘要映射到自己的那一个磁盘？要中断的又是那一个对应的磁盘？
  
  　　请在声明区中加入以下声明及模组：
  
  Private Declare Function WNetConnectionDialog Lib "mpr.dll" _
  (ByVal hwnd As Long, ByVal dwType As Long) As Long
  Private Declare Function WNetDisconnectDialog Lib "mpr.dll" _
  (ByVal hwnd As Long, ByVal dwType As Long) As Long
  
  Sub ShowMapDrives(hwnd As Long)
  　WNetConnectionDialog hwnd, 1
  End Sub
  
  Sub ShowUnMapDrives(hwnd As Long)
  　WNetDisconnectDialog hwnd, 1
  End Sub
  
  '程序中使用方式如下：
  
  Private Sub Command1_Click()
  　'出现 映射网络磁盘 问话框
  　ShowMapDrives Me.hwnd
  End Sub
  
  
  Private Sub Command2_Click()
  　'出现 中断网络磁盘 问话框
  　ShowUnMapDrives Me.hwnd
  End Sub
  进入讨论组讨论。

  （出处：急速软件下载学院）

• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• 如何映射 / 中断网络磁盘 相关文章：
• ·如何映射 / 中断网络磁盘
• 如何映射 / 中断网络磁盘 相关软件

上一篇:VB数据库编程经验两则

下一篇:VB编程实现Windows XP风格的界面

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐