VB返回记录集结果到HTML表格的方法
摘要：本文实例讲述了VB返回记录集结果到HTML表格的方法。分享给大家供大家参考。具体实现方法如下：functionReturnHTMLTable...
本文实例讲述了VB返回记录集结果到HTML表格的方法。分享给大家供大家参考。具体实现方法如下：
function ReturnHTMLTable(query) set rs = cn.Execute(query) rs.MoveFirst response.Write "<tabledata"" 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
希望本文所述对大家的VB程序设计有所帮助。
【VB返回记录集结果到HTML表格的方法】相关文章：
★ VB6实现连接Access数据库的ADODB代码实现方法
上一篇：
VB获取文件大小的方法
下一篇：
VB实现的《QQ美女找茬游戏》作弊器实例