vb 怎么样实现搜索网络共享资源

来源：百度知道 编辑：UC知道 时间：2024/06/04 17:59:41
用VB怎么判断局域网环境下的共享资源 （包括隐藏共享资源C$ D$ E$ 以及共享的文件夹目录MOVIE MUSIC等） 添加到LISTBOX 中 能读取文件名 文件大小 权限设置（可读，可写）等。。。

答案满意后我在追加20分~~
关键代码(用VB怎么判断局域网环境下的共享资源)能给出相关语句注释~~
一楼的大哥给的代码运行结果输出立即窗口那里 那我每次都要在VB6.0 才能使用啊~~ 怎么实现填加到列表框中的代码!!!

Private Const RESOURCE_CONNECTED As Long = &H1&
Private Const RESOURCE_GLOBALNET As Long = &H2&
Private Const RESOURCE_REMEMBERED As Long = &H3&

Private Const RESOURCEDISPLAYTYPE_DIRECTORY& = &H9
Private Const RESOURCEDISPLAYTYPE_DOMAIN& = &H1
Private Const RESOURCEDISPLAYTYPE_FILE& = &H4
Private Const RESOURCEDISPLAYTYPE_GENERIC& = &H0
Private Const RESOURCEDISPLAYTYPE_GROUP& = &H5
Private Const RESOURCEDISPLAYTYPE_NETWORK& = &H6
Private Const RESOURCEDISPLAYTYPE_ROOT& = &H7
Private Const RESOURCEDISPLAYTYPE_SERVER& = &H2
Private Const RESOURCEDISPLAYTYPE_SHARE& = &H3
Private Const RESOURCEDISPLAYTYPE_SHAREADMIN& = &H8
Private Const RESOURCETYPE_ANY As Long = &H0&
Private Const RESOURCETYPE_DISK As Long = &H1&
Private Const RESOURCETYPE_PRINT As Long = &H2&
Private Const RESOURCETYPE_UNKNOWN As Long = &HFFFF&
Private Const RESOURCEUSAGE_ALL As Long = &H0&
Private Const RESOURCEUSAGE_CONN