[求助]为何sql语句中INSERT语句不能插入带有单引号的句子

liulubing

sql中的insert和update语句不能插入或更新带有单引号的句子,请问怎么办呀.例如

Dim cn1 As ADODB.Connection
Set cn1 = New ADODB.Connection
Set cn1 = CurrentProject.Connection
Dim cm1 As New ADODB.Command
cm1.ActiveConnection = cn1
   cm1.CommandText = "insert [O-订单单头](客户简称,合同号,) " & _
                    "values('" & 客户简称 & "','" & Me.合同号 & "')"
   cm1.Execute

如合同号出现单引号,如LD'00001就无法插入,更新语句也是一样,不知各位是如何解决的.