主题：通用代码失效

有这样一段代码，在access数据源时，运行正常，当转为SQL Server时却提示：找不到列[出库时间]，检查服务器上名为“数据源”的数据库中名为"出库记录"的表，明明就有名为”出库时间“的列！而打开项目中的表"出库记录"，同样有这一列，怎么就找不到呢？甚为不解！

If Connections("数据源").SourceType = 1 Then
    max = DataTables("出库记录").Compute("Max(出库单号)","发货单位 ='" & user.Group & "' And 出库时间 =#" & d & "#")
ElseIf  Connections("数据源").SourceType = 2 Then
    max = DataTables("出库计划记录").Compute("Max(出库单号)","发货单位 ='" & user.Group & "' And 出库时间 ='" & d & "'")
End If