pb9连接SQLite数据库

[velen000]

pb9连接SQLite数据库，数据库可以连接上，但查询数据不正确，表base_config有2行数据，查询出来ll_count=0。
connect 后， sqlca.sqlcode=0是连接上数据库了吗？


代码如下：
// Profile SQLite
SQLCA.DBMS = "OLE DB"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PROVIDER='MSDASQL',PROVIDERSTRING='Driver=SQLite3 ODBC Driver;Database=C:\code\DataTest\BSDBLOC.db;PassWord=' "

connect;

if sqlca.sqlcode=0 then
messagebox("ok","ok")
dw_1.settransobject(sqlca)
long ll_count
select count(*) into :ll_count from base_config;
if sqlca.sqlcode <> 0 then
messagebox("error " + string(sqlca.sqldbcode) + '|'+string (sqlca.sqlcode), sqlca.sqlerrtext)
//这里返回sqlca.sqldbcode=0，sqlca.sqlcode=-1，sqlca.sqlerrtext=“MISMATCH Between retrieve columns and fetch columns”
end if
string ls_temp
ls_temp=string(ll_count)
messagebox("ok",ls_temp)
end if

[WorldMobile]

引用 楼主 velen000 的回复:

pb9连接SQLite数据库，数据库可以连接上，但查询数据不正确，表base_config有2行数据，查询出来ll_count=0。 connect 后， sqlca.sqlcode=0是连接上数据库了吗？ 代码如下： // Profile SQLite SQLCA.DBMS = "OLE DB" SQLCA.AutoCommit = False SQLCA.DBParm = "PROVIDER='MSDASQL',PROVIDERSTRING='Driver=SQLite3 ODBC Driver;Database=C:\code\DataTest\BSDBLOC.db;PassWord=' " connect; if sqlca.sqlcode=0 then messagebox("ok","ok") dw_1.settransobject(sqlca) long ll_count select count(*) into :ll_count from base_config; if sqlca.sqlcode <> 0 then messagebox("error " + string(sqlca.sqldbcode) + '|'+string (sqlca.sqlcode), sqlca.sqlerrtext) //这里返回sqlca.sqldbcode=0，sqlca.sqlcode=-1，sqlca.sqlerrtext=“MISMATCH Between retrieve columns and fetch columns” end if string ls_temp ls_temp=string(ll_count) messagebox("ok",ls_temp) end if

看你的代码，应该是连接成功了，但select没有成功，可能是表base_config未找到，你在pb的设计环境配置一下，执行这个sql试试 怀疑还是连接参数的问题

[velen000]

PB的设计环境连接不上数据库，一连接就报PB内存错误。

[WorldMobile]

引用 2 楼 velen000 的回复:

PB的设计环境连接不上数据库，一连接就报PB内存错误。

换成ODBC试试，或许是你的pb安装的有问题

[kandari]

手上正遇pb 连SQLite数据库情况 先试下