怎样在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转换。