精华区文章阅读

发信人: bloom (├┝┞┟┠┢┣�), 信区: VB
标题: EnumPorts(打印函数)(转载)
发信站: 哈工大紫丁香 (2000年09月07日18:36:36 星期四), 转信

【以下文字转载自 cnTemp 讨论区】
【原文由 catchy 所发表】
发信人: yucheng (无话可说), 信区: VisualBasic
发信站: BBS 水木清华站 (Sat Apr 8 01:34:17 2000) WWW-POST

EnumPorts

VB声明
Declare Function EnumPorts Lib "winspool.drv" Alias "EnumPortsA" (ByVal pName
As String, ByVal Level As Long, ByVal lpbPorts As Long, ByVal cbBuf As Long,
pcbNeeded As Long, pcReturned As Long) As Long
说明
枚举一个系统可用的端口
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参数表
参数类型及说明
pName String，指定服务器的名字。用vbNullString指定本地系统
Level Long，1或2（1用于NT 3.51），分别指定PORT_INFO_1 或 PORT_INFO_2
lpbPorts Long，包含PORT_INFO_1 或 PORT_INFO_2结构的缓冲区
cbBuf Long，lpbPorts缓冲区中的字符数量
pcbNeeded Long，指向一个Long型变量的指针，该变量用于保存请求的缓冲区长度，或者
实际读入的字节数量
pcReturned Long，载入缓冲区的结构数量（用于那些能返回多个结构的函数）
注解
参考AddPort函数，了解进一步的情况

--

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: casi.bbs@smth.org]
--
※ 转载:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: 202.118.247.254]

VB 版 (精华区)