按照系统要求把所有文件的只读属性去掉了，然后今天在机器上运行一下，出现错误！
具体如下：
按照系统操作步骤：首先用系统管理员运行mr用户名
进行修改读者信息过程中出现如下提示错误：标准表达式中数据类型不匹配。
不知道是谁编写的这章 写的东西太差劲了，根本无法正常运行，买书买的是成品这是什么东西？
Private Sub Command5_Click()
    If Text11.Text = "" Or Text12.Text = "" Then
        MsgBox "不能修改空记录信息", vbInformation
    Else
        Dim i, sql As String
        i = MsgBox("是否修改此条记录！", vbYesNo + vbOKOnly)
        If i = vbYes Then
            sql = "update dzxxtb set 读者编号='" & Text11 & "',读者姓名='" & Text12 & "',性别='" & Combo4 & "',出生日期='" & DTPicker3 & "',单位='" & Text13 & "',家庭住址='" & Text14 & "',家庭电话='" & Text15 & "',手机号码='" & Text16 & "',传真号码='" & Text17 & "',Email='" & Text18 & "',证件类型='" & Combo5 & "',证件号码='" & Text19 & "',登记日期='" & DTPicker4 & "',读者级别='" & Text20 & "',备注='" & Text21 & "' where 读者编号 like '" & Text11.Text & "'"
            cnn.Execute (sql)   → 错误所在位置
            Adodc1.Refresh
            clear
        Else
            On Error Resume Next
            rs.CancelUpdate
        End If
    End If
End Sub