最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

VB返回記錄集結(jié)果到HTML表格的方法

 更新時(shí)間:2015年06月25日 10:23:29   作者:小卒過(guò)河  
這篇文章主要介紹了VB返回記錄集結(jié)果到HTML表格的方法,實(shí)例分析了VB獲取記錄集與HTML表格生成的相關(guān)技巧,需要的朋友可以參考下

本文實(shí)例講述了VB返回記錄集結(jié)果到HTML表格的方法。分享給大家供大家參考。具體實(shí)現(xiàn)方法如下:

function ReturnHTMLTable(query)
  set rs = cn.Execute(query)
  rs.MoveFirst 
  response.Write "<table class=""data"" cols=""" & rs.Fields.Count & """>"
  response.Write "<tr>"
  For Each oField In rs.Fields
    response.Write "<th>" & oField.Name & "</th>"
  Next
  response.Write "</tr>"
  Do While Not rs.EOF
    response.Write "<tr>"
    For Each oField In rs.Fields
    response.Write "<td>"
    If IsNull(oField) Then
      response.Write " "
    Else
      response.Write oField.Value
    End If
    response.Write "</td>"
    Next
    rs.MoveNext
    response.Write "</tr>"
  Loop
  response.Write "</table>"
end function

希望本文所述對(duì)大家的VB程序設(shè)計(jì)有所幫助。

相關(guān)文章

最新評(píng)論

抚州市| 丽江市| 大安市| 墨脱县| 东乡| 灌阳县| 利津县| 伊宁市| 南京市| 施甸县| 蕲春县| 淳化县| 河北区| 天长市| 山东省| 吴川市| 锦屏县| 清徐县| 达拉特旗| 广丰县| 西平县| 安乡县| 和静县| 广河县| 靖边县| 玛多县| 金川县| 通许县| 常德市| 衡阳县| 修武县| 和龙市| 浮山县| 赫章县| 界首市| 呼图壁县| 百色市| 贞丰县| 宿迁市| 石嘴山市| 延川县|