With Adodc1
          .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & myPath & ";Persist Security Info=False"
          .CommandType = adCmdText
          .Mode = adModeRead
          .RecordSource = "select 环境质量项目,环境质量现状,环境质量标准,执行排放标准 from 建设项目环境质量信息 where 建设项目编号 = 'ProjectID'"
          .Refresh
End With
运行后显示“ADODC1的标准表达式中数据类型不匹配”,“ProjectID”是另一张表中的建设项目编号是自动编号的,此段程序要是实现的就是找出这张表中的建设项目编号 = 'ProjectID'的一些信息。请不吝赐教!!!!