日韩精品中文字幕一区二区-日韩精品中文字幕一区-日韩精品中文字幕视频-日韩精品在线一区二区三区-第一页在线-第一福利视频

當前位置:首頁文章首頁 IT學院 IT技術

在記錄集中加入判斷的實例分享

作者:  來源:  發布時間:2011-6-8 15:46:19  點擊:

本文跟大家介紹的是關于在記錄集中加入判斷使之靈活的實例分享,對ASP有興趣的朋友可以學習學習。

在應用中,有時候會要求按照日期來排列數據,并且還會需要簡單的按日期來檢索數據,比如在頁面上加入一個跳轉菜單,包含數據的日期列表,然后選擇日期后傳遞日期參數跳轉。這種做法在沒有日期的時候應該顯示哪一天的數據呢?
  通常會用“DATE()”作為沒有參數情況下的選擇,就是顯示當天的數據,但如果當天沒有數據呢?
  “DATE()-1”?似乎不能解決問題。
  先看看Dreamweaver MX 自動生成記錄集的SQL代碼:
  
  SCSJ.Source = "SELECT * FROM dbo.MCIS_生產數據 WHERE 日期 = '" + Replace(SCSJ__MMColParam, "'", "''") + "' ORDER BY 日期 DESC"
  
  在日期字段的過濾上使用了“=”,大家都知道如果是文本類型的話可以使用“LIKE”操作符配合“%”來獲得所有記錄,如果可以做到,那么在沒有日期參數傳遞的情況下就顯示所有的記錄倒是不錯的選擇。
  這里的實現方法就是修改Dreamweaver MX 自動生成的記錄集代碼,加入判斷,當URL參數不存在的時候,記錄集SQL過濾使用“LIKE”操作符獲得所有記錄,否則使用“=”操作符獲得屬于參數日期的記錄。
  
  下面是代碼,應該很好理解的。
  <%
  Dim SCSJ__MMColParam
  SCSJ__MMColParam = "%"
  If (Request.QueryString("MCISDATE") <> "") Then
  SCSJ__MMColParam = Request.QueryString("MCISDATE")
  End If
  %>
  <%
  Dim SCSJ
  Dim SCSJ_numRows
  
  Set SCSJ = Server.CreateObject("ADODB.Recordset")
  SCSJ.ActiveConnection = MM_jbcjsql_STRING
  If (Request.QueryString("MCISDATE") <> "") Then
  SCSJ.Source = "SELECT * FROM dbo.MCIS_生產數據 WHERE 日期 = '" + Replace(SCSJ__MMColParam, "'", "''") + "' ORDER BY 日期 DESC"
  ELSE
  SCSJ.Source = "SELECT * FROM dbo.MCIS_生產數據 WHERE 日期 LIKE '" + Replace(SCSJ__MMColParam, "'", "''") + "' ORDER BY 日期 DESC"
  END IF
  SCSJ.CursorType = 0
  SCSJ.CursorLocation = 2
  SCSJ.LockType = 1
  SCSJ.Open()
  
  SCSJ_numRows = 0
  %>

相關軟件

相關文章

文章評論

軟件按字母排列: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
主站蜘蛛池模板: 送老师锦旗写什么最好| 综评典型事例填写范例| 《幸福花园动漫双男主》| 红岩下的追捕电视剧| 热带雨林电影| 南来北往电视剧40集免费观看| 母亲韩国| 李乃文朱媛媛电视剧| 安吉拉·莫雷纳| 达科塔·高尤| 五月天诺亚方舟| barazzares 女演员| 工会基层组织选举工作条例| 里番在线看| 九九九九九九九九九九热| 范冰冰激情片段| 《禁忌2》在线观看| 超越天堂菲律宾| 男生帅气动漫头像| 最新欧美电影| 范瑞君| 按摩私处| 彭丹丹最惊艳的电影| 王渝萱林教授电影| 吉泽明步电影| 五年级下册语文第七单元口语交际| 天河电影演员表| 三年电影免费高清完整版| 可爱美女跳舞蹈视频| 最可爱的人 电影| 陈若仪个人简历资料| 误杀1演员表| 国内自拍99| 周柯宇个人资料| 我,喜欢你演员表介绍| douying.com| 大众故事1974意大利| 源代码 电影| 帅克| 老司机免费在线观看| 金允石|