例三

cnn=SQLCONNECT(\ SQLEXEC(cnn,\orderid,productid,unitprice,quantity,discount details]\SELECT mycursor

CURSORSETPROP(\

CURSORSETPROP(\

CURSORSETPROP(\CURSORSETPROP(\

[order

details].orderid,unitprice

[order

details].unitprice,quantity [order details].quantity,discount [order details].discount\CURSORSETPROP(\

这个结果集来自于一个表：Order Details。

注意“Tables”属性的写法，在SQL Server中这种带空格的表名请用方口号分隔，Tables属性指定的是数据源表，所以必须用：[order details]填入。

注意“KeyFieldList”属性的写法，这个order details表的主关键字是一个复合关键字，有orderid与productid联合组成，所以这里就要将他们一起填入。

一个很重要的属性——WhereType

当我们设定结果集为可更新光标后，还有一个重要的属性没有设定，就是WhereType。即，Where字句产生的依据，有四种情况：

CURSORSETPROP(\根据关键字

CURSORSETPROP(\根据关键字＋可更新字段 CURSORSETPROP(\根据关键字+已更新字段 CURSORSETPROP(\根据关键字＋时间戳

更详细的内容大家可以参看“远程视图”章节，在那里面我已经讲得很多了。

from [order

四、用vfp与sql server构建Client/Server应用程序(远程视图)(1)

-

本文是《用 Visual FoxPro 与 SQL Server 构建 Client/Server 应用程序》系列的一部分，照例“远程视图”应不是开篇章节，但我们发现:在我们为网站准备的文章中有太多的理论性的东西，为了缓解这一矛盾，我们决定把“远程视图”提上来先写。

当下最流行的 ADO 脱胎于 Visual FoxPro，在实际使用中两者各有特色，所以不要小看 Visual FoxPro 在远程数据处理上的能力，它绝对强大！读者可以参看本站的《Microsoft Visual FoxPro 开发人员 ADO 快速入门》与《Visual FoxPro 漫谈》。

我们希望通过连载的形式完成《用 Visual FoxPro 与 SQL Server 构建 Client/Server 应用程序》一文，非常希望得到您宝贵的建议。

说在前面

由于本文是在两天之内赶出来的，构思不够严密，我在选择 SQL Server 端数据库时犯了一个错误：Northwind 数据库中绝大多数“字符串”型字段（列）使用了 nVarchar 型，Visual FoxPro 对此支持的不好（具体原因本站将另文论述）。以上可能造成演示程序不能正常工作，对此我们可以在 SQL Server 的 Enterprise Manager 中把有关字段的的类型从 nVarchar 改为 Varchar。我建议把 Customers 表中的 CustomerID 和 Phone字段的类型变化即可。同样的，我们可以把 Employees 的 Notes 字段类型变为 text。

不是我的错

Visual FoxPro 的视图设计器虽然能完成许多烦人的远程视图的操作，但对于特别复杂的远程视图可能会支持很差。在阅读本文做实验时，遇到以上问题请不要责怪作者。Visual FoxPro 的远程视图的功能非常强大的，大到工具程序“视图设计器”不能很好的支持！

前言

Visual FoxPro 为 Client/Server 构架的应用提供了两个内置的解决方案：远程视图(Remote Views)与 SPT(SQL pass through)。当然在Visual FoxPro中我们可以使用其它的远程数据连接的方法，比如 ADO。所有这些解决方案都各有优劣，远程视图最大的好处就是它可以非常方便地与Visual FoxPro内置控件绑定。每一个远程视图就是一个存储于Visual FoxPro数据库容器（DBC）的对象，是一句SQL-SELECT语句。远程视图通过ODBC（Open Database Connectivity)与异构数据库通讯。

虽然本文的实例使用SQL Server 作为后端数据库，但大家同样可以使用其它数据源作为后端数据库，例如 Oracle，IBM DB2，Informix,Sybase,Microsoft Access,Excel,甚至是Visual FoxPro自己。使用远程视图操作远程数据就像操作Visual FoxPro本地数据一般，以下我们将介绍这一伟大工具的初级应用。

连接-Connections

使用远程视图操作远程数据的第一步就是建立与远程数据源的通讯，这里有好几种方法可供选择，请注意所有这些方法都使用 ODBC 与远程数据连接。

这里有一个非常简单的远程视图，它的作用是：读取 Northwind 数据库中 Customers 表的记录到远程视图 Vcustomers 中。

CREATE SQL VIEW Vcustomers ; REMOTE CONNECTION Northwind ; AS SELECT * From Customers

*先别试用这条语句，因为连接还没有建立

在上述命令的第二行我们告诉Visual FoxPro使用连接 Northwind 与 SQL Server 通讯。在运行上面的语句时，Visual FoxPro将在两个地方寻找这个连接：

当前 数据库容器（DBC）中查看是否存在数据库“连接对象”——Northwind。笔者称之为基于 DSN 的连接对象。

如果没有发现，Visual FoxPro将在客户机的 OCBC Data Source Names(DSNs)中查看是否存在连接 Northwind。笔者称之为 DSN 连接。

建立 DSNs 连接

建立连接的最快、最方便的方法是建立DSNs，您可以在控制面板中打开 ODBC 控制器，如图1。

图 1. ODBC Data Source Administrator 面板

我们发现有三种DSN 连接:

用户型DSN、系统型DSN、文件型DSN。其中用户型只对建立它的用户有效，譬如你以 Administrator 的身份登录系统并建立了一个用户DSN，那么除非你以 Administrator 登录系统否则你不能使用这一DSN；系统型则对当前用机器所有用户生效，无论你以什么身份登录系统；文件型DSN实际上是一个以DSN为后缀名的文本文件。从 Visual FoxPro 的角度，笔者把这三种 DSN 分成两类：

用户型、系统型 DSN。它可以单独作为连接为远程视图使用；也可以作为“基于 DSN 连接对象”的基础，“基于 DSN 连接对象”依赖于用户型或是系统型 DSN。

文件型 DSN。它不可以单独作为连接为远程视图使用；它可以为设计“基于字符串的连接对象”提供资料，但“基于字符串的连接对象”不依赖于文件型 DSN。

我们先建立一个系统型 DSN。

在 ODBC Data Source Administrator 面板中选中 “System DSN”页，按“Add”键，再选择 SQL Server 驱动程序，按“完成”按钮。出现图2。

图 2. 设定 DSN 的名称及服务器

这里我们选择“（local)”，注意如果系统将尝试连接目标服务器如果无法连接将报错，如果顺利的话您将看到图3的画面，要求选择用户认证方式，这里我们选择 SQL Server 与 Windows 混合认证方式，并输入登录SQL Server的用户名：“sa”，口令为空。

图 3. 设定 DSN 的登录信息

如果顺利画面4将出现在屏幕上，这里有一个选项要特别的注意，就是选择目标数据库。这里我们当然是选“Northwind”。

图 4. 设定 DSN 的登录数据库

废话就不多说了，如果一些顺利，这条叫“Northwind”的System DSN 就建成了。

在Visual FoxPro的命令窗口中建立如下语句：

CREATE DATABASE Northwind

*建立本地数据库容器，存储数据库对象。 CREATE SQL VIEW VCustomers ;

REMOTE CONNECTION Northwind ; AS SELECT * FROM Customers

*建立远程视图，注意这个视图是数据库（DBC）的一个对象，所以必须先建立DBC USE VCustomers *打开远程视图 BROWSE

*浏览远程视图

建立数据库容器（DBC）中的“连接对象”

记得在前文我们讲过连接可以存在于两个地方，就是 DSNs与DBC，那么DSN与基于DSN的连接对象有什么区别？

基于DSN的连接对象可以为数个远程视图共享，而DSN连接不可以。我们知道，每一条与SQL Server的连接都是要收费的，共享连接就可以省钱；我们还知道，SQL Server管理每条连接大约要花去24K的内存空间，有人讲：24K不多，但您别忘了SQL Server是服务器，不只是您一个人使用它——东一条连接、西一条连接——系统效率一定会受影响。因此无论从开发成本还是系统工作效率的角度，共享连接都是开发人员必然的选择。

为了说明什么是共享连接，为了证明DSN连接不能为试图共享，我们做以下试验：

CREATE SQL VIEW VOrders ;

REMOTE CONNECTION Northwind SHARE;