1.access資料庫是否有像oracle或sql server等
  有可以直接下sql子句執行的地方    2.下面程式一直出現
  參數 p_no 沒有預設值
  而且會把系統搞得一段時間不會動
  不知何處出錯
  
procedure Update_Person(a: Trec);
var
  str: string;
begin
  str:= 'UPDATE PERSON SET '  
    ' P_NAME = '   ''''   a.p_name   ''''  
    ' WHERE P_NO = '   ''''   a.p_no   ''''   ';';
  dm.myq.close;
  dm.myq.SQL.Clear;
  dm.myq.SQL.Text:= str;
  dm.myq.ExecSQL;
end;

您好﹗    Access資料庫形態在Access中不能直接下達SQL指令﹒

a.p_no是從何處賦值來的﹐如果是PERSON資料表中的話﹐將程式碼改為如下即可﹕
begin
dm.myq.close;
  dm.myq.SQL.Clear;
  dm.myq.SQL.Add('UPDATE PERSON SET P_NAME = '''+p_name+''' ');
  dm.myq.SQL.Add('WHERE P_NO = '''+p_no+'''');
  dm.myq.ExecSQL;
end;

================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟

Hi,writeman, access资料库中可以下SQL执行，只是比较麻烦而已，如下操作: Queries---Create query in Design view---[在Add table框中按Close]---[在上部灰色区域中右键点击]---[在弹出菜单中选'SQL View']，可以下SQL了。 唵嘛呢呗咪吽

發覺好像不是delphi那邊的問題 我依上述xxiaowang兄的方法在access裡試了一下sql 發覺他都會跳出一個小視窗叫我輸入p_no 會不會是我在建立table時有問題 我只建了兩個欄位p_no(設為主索引鍵),p_name sorry,對access不熟........

Hi,writeman, 贴出你在在Acess中的SQL来看看。 一般跳出这個小視窗，是因为SQL有不存在的Field名或SQL中有变数,要求用家为其赋值后才能执行。 唵嘛呢呗咪吽