在MDF文件中的窗体筛选怎么在ADP中不能用？

丁丁　发表于：2009-02-02 17:20:15 　

以下代码，在MDF文件中用得上好，怎么升成ADP后却不能用了？初学ADP，请老师们指点一下！

Dim strWHERE As String
      strWHERE = ""
      If Not IsNull(Me.Text12) Then
        strWHERE = strWHERE & "([Xs_date] >= # " & Format(Me.Text12, "yyyy-mm-dd") & "#) AND "
        End If
      If Not IsNull(Me.Text10) Then
       strWHERE = strWHERE & "([Xs_date] <= # " & Format(Me.Text10, "yyyy-mm-dd") & "#) AND "
      End If
      If Not IsNull(Me.[Text4]) Then
          strWHERE = strWHERE & "([Sc_name] like'*" & Me.[Text4] & "*') AND "
      End If
         If Len(strWHERE) > 0 Then
          strWHERE = Left(strWHERE, Len(strWHERE) - 5)
      End If

      Me![子窗体1].Form.Filter = strWHERE

      Me![子窗体1].Form.FilterOn = True

Top

ACMAIN.CHM 发表于：2009-02-02 17:24:31

MS SQL SERVER用的是T-SQL,而ACCESS用的是JET-SQL，有一些不一样的地方比如通配符%，还有日期常量的表示

Top

丁丁发表于：2009-02-02 18:02:02

没明白，请你改一改上面的语句！

Top

丁丁发表于：2009-02-02 19:09:42

明白了，除了ACMAIN0CHM所说的，还有：Me![子窗体1].Form.FilterOn = 1（不能为TRUE）

Top

shenboo 发表于：2010-06-13 23:09:41

adp里查询表达式应改为%，'

Top

唤发表于：2012-03-30 10:19:00

我在ADP中按上面的所有要求去做，还是不能筛选，这是为什么？？

Top

流浪狗狗发表于：2012-07-27 17:36:32

我也遇到了同样的问题，但是不知道怎么改正为可以使用的请高手指教怎么改成正确的。

Top

jimmy.lau 发表于：2012-08-10 15:05:43

Dim strWHERE As String
      strWHERE = ""
      If Not IsNull(Me.Text12) Then
        strWHERE = strWHERE & "([Xs_date] >= '" & convert(varchar(20),Me.Text12,102) & "') AND "
        End If
      If Not IsNull(Me.Text10) Then
       strWHERE = strWHERE & "([Xs_date] <= ' " & convert(varchar(20),Me.Text10,102) & "') AND "
      End If
      If Not IsNull(Me.[Text4]) Then
          strWHERE = strWHERE & "([Sc_name] like'%" & Me.[Text4] & "%') AND "
      End If
         If Len(strWHERE) > 0 Then
          strWHERE = Left(strWHERE, Len(strWHERE) - 5)
      End If

      Me![子窗体1].Form.Filter = strWHERE

      Me![子窗体1].Form.FilterOn = True

试一下？

Top

总记录：7篇页次：1/1 9 1 :

Access交流中心

在MDF文件中的窗体筛选怎么在ADP中不能用？