我图上的系统函数标签   自定义函数标签   自定义静态标签  点时都是这图片这样进不去  我刚刚下载的都是这样我下载了很多个 在调试都是这个问题 下载科讯的老版就没有这个问题了 新版都有 

此主题相关图片如下：

 Case 2
      Param = Param & " AND LabelContent like '%" & KeyWord & "%'"
    End Select
    If StartDate <> "" And EndDate <> "" Then
       If CInt(Application("DataBaseType")) = 1 Then         'Sql
      Param = Param & " And (AddDate>= '" & StartDate & "' And AddDate<= '" & DateAdd("d", 1, EndDate) & "')"
      Else                                                 'Access
      Param = Param & " And (AddDate>=#" & StartDate & "# And AddDate<=#" & DateAdd("d", 1, EndDate) & "#)"
      End If
      End If
   Else
     FolderSql = "SELECT ID,FolderName,Description,OrderID,OrderID FROM [KS_LabelFolder] where  FolderType=" & LabelType & " And ParentID='" & FolderID & "'"
     Param = Param & " AND FolderID='" & FolderID & "'"
   End If
   Param = Param & " ORDER BY OrderID "
  Set LabelRS = Server.CreateObject("ADODB.recordset")
  （这是409行 ） LabelRS.Open FolderSql & " UNION Select ID,LabelName,Description,LabelFlag,OrderID from [KS_Label] " & Param, Conn, 1, 1
  If LabelRS.EOF And LabelRS.BOF Then
     Else
     totalPut = LabelRS.RecordCount
       If CurrentPage < 1 Then
        CurrentPage = 1
       End If
  
       If (CurrentPage - 1) * MaxPerPage > totalPut Then
        If (totalPut Mod MaxPerPage) = 0 Then
         CurrentPage = totalPut \ MaxPerPage
        Else
         CurrentPage = totalPut \ MaxPerPage + 1
        End If
       End If
  

我现在不是不能弄好  大家帮帮忙