var sssq:string;
begin
sssq:='200101';//trim(year_edit.text+month_Edit.text);
if not gs_T.Active then
gs_T.Open ;
gs_T.First ;
while not gs_T.Eof do
begin
qyjbcwsj_q.Close;
qyjbcwsj_q.SQL.Clear;
qyjbcwsj_q.SQL.Add(' Select qyjbcwsj.qybm,qyjbcwsj.sssq,qyjbqk.qybm,qyjbqk.qymc,qyjbqk.frdb,qyjbqk.dhhm from qyjbcwsj,qyjbqk');
qyjbcwsj_q.SQL.Add('where ('+gs_T.FieldByName('gs_gs').AsString+') and (qyjbcwsj.qybm=qyjbqk.qybm) and (qyjbcwsj.sssq='''+sssq+''')');
qyjbcwsj_q.Prepare ;
//qyjbcwsj_q.ExecSQL ;
qyjbcwsj_q.Open;
gs_T.Next;
end;
end;
出错信息:message 'General SQL error.[Microsoft][ODBC Microsoft Access Driver]参数不足,期待是1.'
另外在ASP中查看sql 语句执行情况。 用 response.write sql 就可以了，在delphi5中如何实现这样的功能。
