欢迎有兴趣者一起探讨、补充，共同提高~~~
======================================================
标题：如何使用Notes与其它关系数据库进行信息交互？
在Notes环境下，可通过公式、函数和Script与其它关系数据库进行信息交互。通常步骤如下：
一、设置ODBC数据源：
Notes可通过ODBC驱动程序访问关系数据库。
1、在操作系统的控制面板中，打开“ODBC数据源”。
2、在“用户DSN”中单击“添加”，增加一个新的数据源。
3、选择数据源的驱动程序。
4、定义数据源等驱动参数。
二、利用Script读取数据库：
注意：使用LotusScript访问数据库一定要在(Options)过程中加入Uselsx "*LSXODBC"命令。
[code:1:f575fc4580]On Error Goto err '如果有错误，就转到相应错误处理程序。
Dim con As New ODBCConnection '定义ODBC连接对象
Dim qry As New ODBCQuery '定义ODBC查询对象
Dim result As New ODBCResultSet '定义ODBC结果处理对象
Set qry.Connection = con '将ODBC查询对象和相应连接对象挂靠
Set result.Query = qry '将ODBC查询对象和相应结果处理对象挂靠
con.ConnectTo("ABC" '使用ODBC数据源ABC连接上相应数据库
qry.SQL = "SELECT * from test" '定义ODBC查询对象所使用的查询SQL语句
result.Execute '执行该SQL语句
rows = result.MaxRows '返回结果记录数
Call result.FirstRow '定位第一条记录
Do
a1 = result.GetValue("1" '获得该条记录1字段中的值
a2 = result.GetValue("2" '获得该条记录2字段中的值
Print a1,a2 '将返回的值，打印显示
Call result.NextRow '继续下一条记录
Loop While maxrow > result.CurrentRow '如果搜索到最后条记录，退出循环
result.Close(DB_CLOSE) '关闭结果集
con.Disconnect '断开数据库连接
Exit Sub
errorHandler:
Messagebox result.GetExtendedErrorMessage,, result.GetErrorMessage '显示发生错误的消息
Exit Sub[/code:1:f575fc4580]
三、利用Script写入数据库：
[code:1:f575fc4580]On Error Goto err '如果有错误，就转到相应错误处理程序
Dim con As New ODBCConnection '定义ODBC连接对象
Dim qry As New ODBCQuery '定义ODBC查询对象
Dim result As New ODBCResultSet '定义ODBC结果处理对象
Set qry.Connection = con '将ODBC查询对象和相应连接对象挂靠
Set result.Query = qry '将ODBC查询对象和相应结果处理对象挂靠
con.ConnectTo("ABC" '使用ODBC数据源ABC连接上相应数据库
qry.SQL = "SELECT * from test" '定义ODBC查询对象所使用的查询SQL语句
result.Execute '执行该SQL语句
result.AddRow '增加一行记录
Call result.SetValue("1","AA" '给该记录字段1赋值"AA"
Call result.SetValue("2",3) '给该记录字段2赋值3
result.UpdateRow '将增加的记录写入数据库
result.Close(DB_CLOSE) '关闭结果集
con.Disconnect '断开数据库连接
Exit Sub
errorHandler:
Messagebox result.GetExtendedErrorMessage,, result.GetErrorMessage '显示发生错误的消息
Exit Sub [/code:1:f575fc4580]
| wildfish 回复于：2004-03-26 14:10:43 |
| 收藏 |
| qingzhou 回复于：2004-03-26 14:18:36 |
| 热切希望能够在CU上认识一些管理、研究Notes的朋友，便于共同探讨、交流Notes日常管理、开发问题。
很遗憾的是CU没有Lotus Domino/Notes交流区，只能借助这里来和大家交流了。。。 望版主们见谅~~~ |
| mamei 回复于：2004-03-26 15:24:09 |
| 早认识轻舟的话，我也许就不会放弃NOTES了！ |
| 居士 回复于：2004-03-27 20:41:48 |
| domino还有 LEI软件来实现不同数据库间数据的读取，性能比domino自带的DECS好多了。我有朋友测试过，可惜自己没有测试环境。 |
| qingzhou 回复于：2004-04-01 17:04:56 |
| LEI是个不错的方法，LOTUS提供这个工具也就是专门为Notes访问关系数据库提供的，但在配置双项连接文档时要配置许多参数，有点麻烦和容易错。
LEI不失为一个好途径。。。 |
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/