VB.NET通过Win32API完成访问共享文件夹功能中

VB.NET通过Win32API完成访问共享文件夹功能

VB.NET通过Win32API完成访问共享文件夹功能

VB.NET实现访问网络共享文件夹,使用 WNetAddConnection2A 和 WNetCancelConnection2A。

Imports System
Public Class clsNetworkConnect

#Region "----- Win32API关联 常量 -----"
    '------------------------------------------------ 
    ' 访问共享文件夹 常量 
    '------------------------------------------------ 
    Public Const RESOURCE_CONNECTED = &H1
    Public Const RESOURCE_GLOBALNET = &H2
    Public Const RESOURCE_REMEMBERED = &H3
    Public Const RESOURCE_RECENT = &H4
    Public Const RESOURCE_CONTEXT = &H5

    Public Const RESOURCETYPE_ANY = &H0
    Public Const RESOURCETYPE_DISK = &H1
    Public Const RESOURCETYPE_PRINT = &H2
    Public Const RESOURCETYPE_RESERVED = &H8
    Public Const RESOURCETYPE_UNKNOWN = &HFFFFFFFF

    Public Const RESOURCEUSAGE_CONNECTABLE = &H1
    Public Const RESOURCEUSAGE_CONTAINER = &H2
    Public Const RESOURCEUSAGE_NOLOCALDEVICE = &H4
    Public Const RESOURCEUSAGE_SIBLING = &H8
    Public Const RESOURCEUSAGE_ATTACHED = &H10
    Public Const RESOURCEUSAGE_ALL = RESOURCEUSAGE_CONNECTABLE + RESOURCEUSAGE_CONTAINER + RESOURCEUSAGE_ATTACHED
    Public Const RESOURCEUSAGE_RESERVED = &H80000000

    Public Const RESOURCEDISPLAYTYPE_GENERIC = &H0
    Public Const RESOURCEDISPLAYTYPE_DOMAIN = &H1
    Public Const RESOURCEDISPLAYTYPE_SERVER = &H2
    Public Const RESOURCEDISPLAYTYPE_SHARE = &H3
    Public Const RESOURCEDISPLAYTYPE_FILE = &H4
    Public Co
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值