我用的delphi6编程的,用的数据库是Access的,BDE
1 qryTool.Close;
qryTool.SQL.Clear;
qryTool.SQL.Add('select JSHY_HYID from GXK,JSHY ');
qryTool.SQL.Add('where JSHY_LBID=GXK_LBID');
qryTool.SQL.Add(' and GXK_Year=:pYear ');
qryTool.SQL.Add(' and GXK_JD=:pJD ');
qryTool.SQL.Add(' and GXK_QYID=:pQYID ');
qryTool.ParamByName('pYear').AsString := cbxYear.Text;
qryTool.ParamByName('pJD').AsString := cbxJD.Text;
if Length(Trim(tblGXK.FieldByName('a01').AsString))=10 then
qryTool.ParamByName('pQYID').AsString := tblGXK.FieldByName('a01').AsString
else
qryTool.ParamByName('pQYID').AsString := Copy(Trim(tblGXK.FieldByName('a01').AsString),1,8)
+'-'+Copy(Trim(tblGXK.FieldByName('a01').AsString),9,1);
qryTool.Open;
以上语句在Query打开时报“Data type mismatch criteria expression”,在SQL Server下是没问题的,但是这个语句里我觉得也没有什么不符合 Access的SQL语法的地方啊
2 一个简单的维护功能,主文件是左面Grid,右面Edit的结构,数据模块里面放了Query、UpdateSQL、datasource,Query的CachedUpdated属性设置为True,在保存时报“Capability not supported”。这个在SQL Server下是没有问题的
俺是access的菜鸟,请教一下各位大侠![em04]
[此贴子已经被作者于2006-4-6 10:16:17编辑过]
|