精易论坛

标题: 易语言利用ADO连接sybase的问题解决 [打印本页]

---

作者: bolonglx    时间: 2024-5-25 08:58
标题: 易语言利用ADO连接sybase的问题解决
这个问题困扰了2天。原来维护的一个医院系统用的sqlserver，然后很多小工具都是用易语言开发。现在接另外个医院，数据库用的是sybase，试了很多种方法都不行。sybase的ODBC驱动已经安装，但是使用易语言原来的一些数据库连接和精易模块的ODBC，都出现一个奇怪的问题，就是连接之后提示成功，但是select就没数据返回。因为之前我一直都是使用 数据库连接 这个来连接sqlserver，各种代码都确定是没问题，数据库也确定是有数据，所以一直不知道怎么解决。

昨天晚上找到一个易语言的ADO模块，就来试一下，没想到真的可以连通。

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
a	文本型
sql	文本型
db	数据库类型
jlj	记录集类型
dx	对象
i	整数型

如果真 (db.连接 (“Provider=MSDASQL.1;;Password=123456;Persist Security Info=True;User ID=sa;Data Source=sybase;Extended Properties=” ＋ #引号 ＋ “DSN=sybase;UID=sa;PWD=123456;NA=192.168.0.175,5000;DB=fl_yb” ＋ #引号 ))
输出调试文本 (“ado成功”)
db.执行SQL (“select * from xmjg”, , , , dx, )
jlj.置对象 (dx)
计次循环首 (10, i)
a ＝ jlj.读文本 (“c_title”)
输出调试文本 (“last:” ＋ a)
jlj.到下一条 ()
计次循环尾 ()

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 a, 文本型<br /> .局部变量 sql, 文本型<br /> .局部变量 db, 数据库类型<br /> .局部变量 jlj, 记录集类型<br /> .局部变量 dx, 对象<br /> .局部变量 i, 整数型<br /> <br /> <br /> <br /> .如果真 (db.连接 (“Provider=MSDASQL.1;;Password=123456;Persist Security Info=True;User ID=sa;Data Source=sybase;Extended Properties=” ＋ #引号 ＋ “DSN=sybase;UID=sa;PWD=123456;NA=192.168.0.175,5000;DB=fl_yb” ＋ #引号))<br />     输出调试文本 (“ado成功”)<br />     db.执行SQL (“select * from xmjg”, , , , dx, )<br />     jlj.置对象 (dx)<br />     .计次循环首 (10, i)<br />         a ＝ jlj.读文本 (“c_title”)<br />         输出调试文本 (“last:” ＋ a)<br />         jlj.到下一条 ()<br />     .计次循环尾 ()

sybase这种老古董数据库，相关的资料非常少。我在这里发一下ADO模块。ODBC驱动比较大这里发不了，有需要的只能找我私聊。

ADO类1.33Z简终结版.zip

2024-5-25 08:57 上传

点击文件名下载附件

下载积分: 精币 -2 枚

50.87 KB, 下载次数: 5, 下载积分: 精币 -2 枚

---

作者: 不苦小和尚    时间: 2024-5-25 16:19
为什么我找不到医院的项目呢

---

作者: bolonglx    时间: 2024-5-27 13:37

不苦小和尚 发表于 2024-5-25 16:19
为什么我找不到医院的项目呢

医院这种项目，只能圈内人转介，一般都信不过圈外人，毕竟行业壁垒太深。

---

作者: qq977352880    时间: 2024-8-15 01:30
这个真的很棒。

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4