html的表格使用函数,简单的函数来返回记录集结果到HTML表格

下面是编程之家 jb51.cc 通过网络收集整理的代码片段。

编程之家小编现在分享给大家，也给大家做个参考。

function ReturnHTMLTable(query)

set rs = cn.Execute(query)

rs.MoveFirst

response.Write "

response.Write "

"

For Each oField In rs.Fields

response.Write "

" & oField.Name & ""

Next

response.Write "

"

Do While Not rs.EOF

response.Write "

"

For Each oField In rs.Fields

response.Write "

"

If IsNull(oField) Then

response.Write " "

Else

response.Write oField.Value

End If

response.Write "

"

Next

rs.MoveNext

response.Write "

"

Loop

response.Write "

"

end function

以上是编程之家(jb51.cc)为你收集整理的全部代码内容，希望文章能够帮你解决所遇到的程序开发问题。

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

总结

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。

小编个人微信号 jb51ccc

喜欢与人分享编程技术与工作经验，欢迎加入编程之家官方交流群！