<%Option Explicit '******************************************** ' 功能:顯示所有的論壇精華貼 ' 編寫:aken ' 時間:2005-1-6 '******************************************** Dim objConn,strConn,strDbDir,objRs,strSql,strRs strDbDir="bbs/db/testage/tadb.asp" Set objConn=Server.CreateObject("Adodb.Connection") strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(strDbDir) objConn.Open strConn Set objRs=Server.CreateObject("Adodb.Recordset") strSql="SELECT Top 60 * FROM besttopic WHERE Boardid=5 ORDER BY dateandtime DESC" objRs.Open strSql,objConn,1,1 %> 測試時代 - 軟件測試精品文章

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  •  
     測試精品文章  
    單元和集成測試 | 系統測試 | 測試用例技術 | 性能測試 | 自動化測試 | 安全測試 | Web測試 | 嵌入式測試 | 游戲測試
    軟件測試管理 | 軟件質量管理 | 軟件需求管理 | 軟件缺陷管理 | 軟件配置管理 | 其它類測試工具 | 本地化測試
    Rational自動化測試 | Rational測試管理 | Mercury自動化測試 | Mercury性能測試 | Mercury測試管理 | 開源測試工具
    <% objRs.Close objConn.Close Set objRs=Nothing Set objConn=Nothing %>
    <% Dim i i=1 Do While Not objRs.EOF If i<=30 Then %> <% Else Exit Do End If objRs.MoveNext i=i+1 Loop %>

    <% Response.Write("" & _ "" & objRs("title") & "
    ") %>

    <% Do While Not objRs.EOF %> <% objRs.MoveNext Loop %>

    <% Response.Write("" & _ "" & objRs("title") & "
    ") %>

    解多軟件測試精華文章,請訪問測試時代論壇。
     
    測試時代首頁 | 測試時代論壇 | 測試交流會 | Blog社區 | 測試時代工作室 | 測試時代刊物 | 軟件測試資料
    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>