[VB6 ] 有關資料庫存取的問題

看板Visual_Basic作者時間19年前 (2006/11/02 16:16), 編輯推噓1(101)
留言2則, 2人參與, 最新討論串1/1
Date1 = CStr(Mid(TextLine, 4, 8)) Rcif = CStr(Trim(Mid(TextLine, 12, 9))) Ccy = CStr(Mid(TextLine, 23, 3)) Retail_ac_no = CStr(Trim(Mid(TextLine, 26, 12))) Balance = CVar(Trim(Mid(TextLine, 38, 25))) Customer_name = CVar(Trim(Mid(TextLine, 62))) SQLSRV1 = "INSERT INTO " & DBname _ & " (DATE,RCIF,CCY,RETAIL_AC_NO,BALANCE,CUSTOMER_NAME) " _ & " VALUES ('" & Date1 & "','" & Rcif & "','" & Ccy & "','" & Retail_ac_no & "','" & Balance & "','" & Customer_name & "'" & ")" MsgBox SQLSRV1 cnmdb.Execute SQLSRV1, adCmdText 以上是一小段程式碼 先讀入一筆筆的字串 分拆成一個個數值 然後塞到資料庫裡面 但是customer_name 這個欄位 有一筆資料是 abcdf'Ldfdf 也就是說 在寫入資料庫時 應該是'abcdf'Ldfdf' 整個字串寫進去 但是中間多一個單引號 它會誤認為 'abcdf' 而後面的Ldfdf卻不會寫入 而產生錯誤 請問各位高手大大 這有辦法解決嗎??? -- http://www.wretch.cc/blog/skating0814 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 211.20.28.254

11/02 20:30, , 1F
Replace(Customer_name, "'", "''")
11/02 20:30, 1F

11/03 15:16, , 2F
用replace只是把'變成" 那就改變原來的字串了啊??
11/03 15:16, 2F
文章代碼(AID): #15IQbG3S (Visual_Basic)
文章代碼(AID): #15IQbG3S (Visual_Basic)