sql - 如何处理 Word VBA SQL 查询中的单引号？

Question

我从下拉列表中获取客户名称并使用该值查询 Excel 电子表格，但是，该名称可以包含单引号(例如:Adam's Meat)。这会破坏我的应用程序，如何使用包含单引号的变量进行查询？

Private Sub cboCompany_Change()
            Dim customerName As String
            customerName = cboCompany.Value

rsT.Open "SELECT Customer, Postcode, Address1, Address2, State, Country FROM Customers WHERE  Customer = '" & customerName & "'", cn, adOpenStatic

Answer 1

指定两个单引号的地方 '' ，一个会逃脱另一个并导致单例，尝试像这样替换它:

customerName = Replace(customerName, "'", "''")