Mon 2004-11-01 00:01:04: > Message subject: Get Your Meds, without any ~Waiting Li'nes ! 我要將一個txt檔寫入資料庫中， 如在一段文字中，有一個單引號， 寫入時會發生錯誤， 請問：我要如何將 ' 單引號截掉， 以避免錯誤。

如果只是要把'放進字串，你可以用''代表 Ex: s:=''''; --> ShowMessage(s) 可見到' 中間的''就是' ----------------------- God bless you! I am Dark_Angel.

------
-----------------------
God bless you!
I am Dark_Angel.

Hi gaui 你好: 這是因為單引號會造成SQL解析的誤解, 舉個例子 你要找一個欄位裡面是She's的資料 Select * from Table1 where F1 = 'She's' 這行指令會被翻譯成She是一個完整的字串, 後面的s'當然就錯啦 解決方法有兩種, 一種是在遇到'符號時再加一個, 變成 Select * from Table1 where F1 = 'She''s' 連續兩個'符號會被翻譯成一個, 使用Delphi的函式QuotedStr來解決, 可達到這個目的 Query1.SQL.Add('Select * from Table1 where F1 = ' QuotedStr(Edit1.Text)); 另一種解決方式就是將'符號去掉, 那你所存入的資料就都少了'符號, 看你的需求是否符合, 可用StringReplace將字串做替換 Query1.SQL.Text := StringReplace(Query1.SQL.Text, '''', '', [rfReplaceAll]); 我不是高手, 高手是正在銀幕前微笑的人.

------


我不是高手, 高手是正在銀幕前微笑的人.

不好意思！ 想再請問一下， 那如果一段文字中， 我除了要避免'之外，還要避免", 要怎麼做了

引言: 不好意思！ 想再請問一下， 那如果一段文字中， 我除了要避免'之外，還要避免", 要怎麼做了

您好﹗ 可寫成組字串的方法﹐讓其SQL自動組合正确的語法﹐如下紅色處﹕ 第一種﹐取用Edit的Text屬性加入到SQL中 ADOQuery1.SQL.Add('Select * From 資料表 Where 欄位名='''+Edit1.Text+''''); 第二種﹐取用字串變數加入到SQL中 ADOQuery1.SQL.Add('Select * From 資料表 Where 欄位名='''+變數+''''); ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

Hi gaui 你好: 我上面寫的第一種方式可防,  第二種方式 Query1.SQL.Text := StringReplace(Query1.SQL.Text, '"', '', [rfReplaceAll]); 我不是高手, 高手是正在銀幕前微笑的人.

------


我不是高手, 高手是正在銀幕前微笑的人.