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

當前位置:首頁文章首頁 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
主站蜘蛛池模板: 苏州标志性建筑大裤衩| 天国恩仇| 李修文| 徐若晗个人简介| 美丽的坏女人中文字幕| 鹰冠庄园| 椿十三郎| 重回蓝色珊瑚礁| 我爱你在线观看| 电影《在云端》| 柚子猫卡夫卡的心理暗示在线观看 | 美丽的邂逅| 韩国伦理片在线播放| 男生的帅气头像| 禁忌的恋爱关系凯帕克| 3d成人国产同人动漫焰灵姬| 红色角落| 红色诗词六年级下册| 诈欺游戏电影| 永恒传说图文详细攻略| 视频爱爱| 韩国电影《甜性涩爱》| 免费观看熊出没之狂野大陆| 李姝| 零食店加盟免费品牌| 蓝色男孩| 爱在西元前简谱| 电影白洁少妇完整版| 香港之夜在线观看完整版| 1—42集分集剧情简介| 林丹出轨视频| 刘思维| 无人区电影免费观看| 少爷和我短剧| 艾娜| 金燕子| 李路导演的电视剧有哪些| 闺房趣事电影| 吻胸吃胸激情舌吻| 成人免费黄色电影| 粉嫩在线|