怎样在vfp中增加与去除网络联接
Microsoft Visual FoxPro for Windows,版本3.0、5.0
摘要
使用FoxPro for Windows 2.x中的Foxtools.fll和Visual FoxPro中的DECLARE DLL命令定义相关的Windows API函数,可以在FoxPro中添加和删除网络连接。虽然Visual FoxPro仍然支持FOXTOOLS库作为向后兼容,但DECLARE命令是调用DLL函数的更好方式。
更多信息
以下章节包括FoxPro 2.x和Visual FoxPro的使用惯例。
FoxPro 2.x
使用FoxPro 2.x中的FOXTOOLS库,按照以下步骤添加和删除网络连接。
使用以下命令加载库:
将库设置为SYS(2004)+'FOXTOOLS。FLL添加剂
注册您想要调用的Windows API函数。在本例中,我们将使用WNetAddConnection()和WNetCancelConnection()。
add conn = RegFn(' WNetAddConnection ',' CCC ',' I ')
del conn = RegFn(' WNetCancelConnection ',' CI ',' I ')
要连接到网络设备,请发出以下命令:
=CallFn(addconn," \SERVER\SHARE "," password ",":")
要断开网络连接,请发出以下命令:
=CallFn(delconn,":",0)
计算机二级
使用DECLARE DLL命令定义要调用的DLL函数:
* *-DLL定义
WIN32API中声明整数WNetAddConnection string,string,String声明整数WIN32API中声明整数WNetCancelConnection String,integer
* *-添加网络连接
= WNetAddConnection(" \ \ SERVER \ SHARE ",""," DriveLetter:")
* *-移除网络连接
= WnetCancelConnection(" drive letter:",0)以下信息为这两个API调用提供了其他参考资料。
WNetAddConnection()
函数的作用是:将指定的本地设备(磁盘或打印端口)重定向到指定的共享设备或远程设备。它使用以下参数:
lpszNetPathName
以null结尾的字符串,指定要连接的网络资源,如\Server\Share。
注意:通常Novell用户不使用::符号来指代服务器和目录。例如,不要试图以下列方式引用目录:
\ \服务器\卷::\mydirectory。
相反,应该使用以下方法:
\ \服务器\卷\我的目录
lpsz密码
指向以null结尾的字符串,该字符串指定连接操作要使用的密码。该参数通常是与当前用户相关的密码。如果该参数为空,则使用默认密码。如果该字符串是空,则不使用密码(使用中间空字符串作为占位符):
=CallFn(addconn," \SERVER\SHARE ","",":")
lpszllocalname
以null结尾的字符串,指定要重定向的本地设备。所有lpszLocalName字符串(如LPT1)都区分大小写。仅使用设备名A:到Z:和设备名LPT1到LPT3。
WNetCancelConnection()
函数的作用是:取消网络连接。它使用以下参数:
lpszName
以null结尾的字符串,指定重定向的本地设备名(如LPT1:或d:)或断开的远程网络资源。当此参数指定重定向的本地设备时,将取消指定设备的重定向。如果此参数指定远程网络资源,则只会断开远程资源的连接,而不会断开设备的连接。
力量
指定即使连接上有打开的文件或任务,是否也要断开连接。如果该参数为FALSE,当有打开的文件或任务时,调用该函数将失败。
涉及
有关WNetAddConnection()和WNetCancelConnection() API调用的更多信息,请参考Microsoft Windows软件开发工具包(SDK)“程序员参考,第二卷:函数”。
注意:API调用返回值不会被FoxPro for Windows转换。
0条评论