[求助]请MCCAD进! LISP+ACCESS问题

tchen

mccad你好!

你的在VLISP中使用数据库(一)通过数据库保存的坐标画圆这篇文章我仔细拜读后有几个问题想问问你

你的说明：本例子是通过SQL查询的方式，直接使用Execute方法来执行查询语句，再经过GetRows直接得到结果的数组，再经过转换变成了LISP中的表格式使用。
由于转换出来的表格式刚好与数据库相反(即本来应该是每行为一个记录，但在表中却是每列一个记录)，所以最后的处理比较麻烦一些。

也就是相关的  (setq resultlist (vlax-safearray->list (vlax-variant-value (vlax-invoke-method rs "GetRows" -1))));将返回值变成列表
       (setq count(vl-list-length (car resultlist)));查询列表长度，即记录数

这两行代码,我的逻辑把返回值resultlist理解成这种形式((ID1,X1,Y1,Z1,R1)(ID2,X2,Y2,Z2,R2)...) 但是从你的代码来看返回值resultlist应该是这种形式((ID1,ID2,...)(X1,X2,...) (Y1,Y2,...) (Z1,Z2,..) (R1,R2,...)) 是这样吗?

所以我想你能不能稍微详细解释一下这两行代码?也就是GetRows方法返回的结果形式.

还有1个问题就是象GetRows这些方法函数我该去哪查阅相关资料呢? 是怎么把这些方法移植到LISP语言中?

谢谢!

mccad

就象数据库是这样的：

id    x     y     z     r
id1   x1    y1    z1    r1
id2   x2    y2    z2    r2
id3   x3    y3    z3    r3

但经过GetRows并改成列表后，却变成了：

id1 id2 id3
x1  x2  x3
y1  y2  y3
z1  z2  z3
r1  r2  r3

以前许多有关LISP与ACCESS的技术文章，都少提供这样的技术内容，但我认为，LISP的优势就是对表的处理。所以，查询出来的东西立即变成表后，后续的工作就不需要数据库的知识了，这对大家的普及使用有很大的好处。

如果需要了解这方面的知识，找数据库方面的书，应该都会介绍到。

tchen

谢谢！这个问题你没回答啊  呵呵

GetRows这些方法函数我该去哪查阅相关资料呢? 是怎么把这些方法移植到LISP语言中?