今天delphi开发应用程序,ADO+ACCESS (ODBC连接方式).
原来运行好好的,今天测试在别人机器上,会出错(5台可以用,2台不行)。
把代码在不能运行的机器上调试,在放回原来可以用的机器上调试,变成不能用了。
提示错误:Access violation at address 1B7F7EB1 in module 'MSJTES40.dll'
其中单个adoquery数据连接,查询,更新,都可以。程序中SQL比较复杂,都是用
Parameters.ParamValues赋值参数。
原来运行好好的,今天测试在别人机器上,会出错(5台可以用,2台不行)。
把代码在不能运行的机器上调试,在放回原来可以用的机器上调试,变成不能用了。
提示错误:Access violation at address 1B7F7EB1 in module 'MSJTES40.dll'
其中单个adoquery数据连接,查询,更新,都可以。程序中SQL比较复杂,都是用
Parameters.ParamValues赋值参数。
解决方案 »
- 进入软件主界面满屏,不想别人再做其它操作,除非先退出程序,怎么实现阿?
- 求助:indy的IdHTTP控件GET流文件时,形成的文件大小问题
- 什么叫伪随机数?什么叫真正的过程?什么叫不是真正的过程?
- Delphi输入的汉字复制到WORD中变成了乱码
- 获得键盘输入
- 如何用Query向表单中输入或者更改数据!!!
- 在ActiveForm上添加属性问题
- 如何控制QReport的返回值 怎末控制用户点击“print”或"close" 的返回值
- delphi的菜鸟关于编辑框的问题!
- 关于数据库问题,请各位大侠回答!!!
- 在clientdataset的Aggregates求和Active以设为true记录也不为空。。。。。
- 我只想用一个控件选择年份月份?怎么办?
或者用我的解决办法:
......
adoquery1.open;
.......
adoquery1.close;
adoconnection1.connected:=false;
adoconnection1.connected:=true;
adoquery1..........
[代码]
SQL.Add(' Select *,Str(bznum)+mindanwei+''/''+maxdanwei as bzname,');
SQL.Add(' (select str(qrnum)+danwei from MonthQRTable where hosid='+IntToStr(HosId)+' and QRYear='+IntToStr(TempY)+' and QRMonth='+IntToStr(TempM)+' and zbid=zbtable.zbid) as tempqrnum ,');
SQL.Add(' (select danweitype from MonthQRTable where hosid='+IntToStr(HosId)+' and QRYear='+IntToStr(TempY)+' and QRMonth='+IntToStr(TempM)+' and zbid=zbtable.zbid) as tempdanweitype ,');
SQL.Add(' (select CGMoney from MonthQRTable where hosid='+IntToStr(HosId)+' and QRYear='+IntToStr(TempY)+' and QRMonth= '+IntToStr(TempM)+' and zbid=zbtable.zbid) as CGMoney ');
SQL.Add(' from zbtable,ownqrtable where zbtable.zbid=ownqrtable.zbid and ownqrtable.hosid='+IntToStr(HosId));
SQL.Add(' '+SQL_where);
SQL.Add(' '+SQL_Orderby);
[SQL语句]
Select *,Str(bznum)+mindanwei+'/'+maxdanwei as bzname,
(select str(qrnum)+danwei from MonthQRTable where hosid=1 and QRYear=2003 and QRMonth=1 and zbid=zbtable.zbid) as tempqrnum ,
(select danweitype from MonthQRTable where hosid=1 and QRYear=2003 and QRMonth=1 and zbid=zbtable.zbid) as tempdanweitype ,
(select CGMoney from MonthQRTable where hosid=1 and QRYear=2003 and QRMonth= 1 and zbid=zbtable.zbid) as CGMoney
from zbtable,ownqrtable where zbtable.zbid=ownqrtable.zbid and ownqrtable.hosid=1 order by zbtable.zbid
把SQL语句放在SQL SERVER里运行好好的,在ACCESS里有的机器可以,有的机器不可以.
和原来的程序相比,更新数据,DBGIRD显现的时候比较慢呀.
请高手指点,如何解决?
最好只有SQL语句.