使用PB调用API自动更新（非FTP模式）（二、API说明及定义（1））
2024-07-21 02:10:16
供稿：网友
一、wnetaddconnection2a
function ulong wnetaddconnection2a(ref s_netresource lpnetresource, string lppassword, string lpusername, long dwflags) library "mpr.dll" alias for "wnetaddconnection2a"
说明：
vb声明
declare function wnetaddconnection2 lib "mpr.dll" alias "wnetaddconnection2a" (lpnetresource as netresource, byval lppassword as string, byval lpusername as string, byval dwflags as long) as long
说明
创建同一个网络资源的连接
返回值
long，零表示成功。>0表示失败
参数表
参数 类型及说明
lpnetresource 在这个结构中设置了下述字段，对要连接的网络资源进行了定义：dwtype， lplocalname （可为 vbnullstring）， lpremotename， lpprovider （设为 vbnullstring 表示用默认提供者）。该结构的其他所有变量都会被忽略
lppassword string，可选的一个密码。如为vbnullstring，表示采用当前用户的默认密码。如为一个空字串，则不用任何密码
lpusername string，用于连接的用户名。如为vbnullstring，表示使用当前用户
dwflags long，设为零；或指定常数connect_update_profile，表示创建永久性连接
2、wnetgetconnectiona
function ulong wnetgetconnectiona(string lpszlocalname, string lpszremotename, long cbremotename) library "mpr.dll"
说明：
vb声明
declare function wnetgetconnection lib "mpr.dll" alias "wnetgetconnectiona" (byval lpszlocalname as string, byval lpszremotename as string, cbremotename as long) as long
说明
获取本地或已连接的一个资源的网络名称
返回值
long，零表示成功。>0表示失败。
参数表
参数 类型及说明
lpszlocalname string，本地设备的名字
lpszremotename string，指定一个字串缓冲区，用于装载设备的资源名称
cbremotename long，lpszremotename缓冲区的字符数量。如缓冲区不够大，则设为需要的缓冲区长度
3、findfirstfilea
function ulong findfirstfilea(string lpfilename, ref s_win32_find_data lpfindfiledata) library "kernel32.dll"
vb声明
declare function findfirstfile lib "kernel32" alias "findfirstfilea" (byval lpfilename as string, lpfindfiledata as win32_find_data) as long
说明
根据文件名查找文件
返回值
long，如执行成功，返回一个搜索句柄。如果出错，返回一个invalid_handle_value常数，一旦不再需要，应该用findclose函数关闭这个句柄
参数表
参数 类型及说明
lpfilename string，欲搜索的文件名。可包含通配符，并可包含一个路径或相对路径名
lpfindfiledata win32_find_data，这个结构用于装载与找到的文件有关的信息。该结构可用于后续的搜索
注解
由这个函数返回的句柄可以作为一个参数用于findnextfile函数。这样一来，就可以方便的枚举出与lpfilename参数指定的文件名相符的所有文件
4、findclose
function ulong findclose(ulong hfindfile) library "kernel32.dll"
vb声明
declare function findclose lib "kernel32" alias "findclose" (byval hfindfile as long) as long
说明
关闭由findfirstfile函数创建的一个搜索句柄
返回值
long，非零表示成功，零表示失败。会设置getlasterror
参数表
参数 类型及说明
hfindfile long，由findfirstfile函数提供的搜索句柄
