例6－19.txt

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习的好资料」· 文本代码 · 共 30 行

TXT

30 行

<HEAD>
<TITLE> Show Table sales </ TITLE >
</HEAD><BODY>
<%
Set Conn=Server.CreateObject ("ADODB.Connection")
Conn.Open "MyData"
'将通过执行SELECT语句创建一个记录集
Set RS=Conn. Execute ("SELECT * FROM sales")
%>
<TABLE border=1>
<TR>
<% for i=0 to RS.Fields.Count?1 %>		'Fields.Count是记录集的字段数
      <TH><% =RS(i).Name %> </TH>	'显示字段名
      <% next %>
</TR>
<% While Not RS.EOF %>
<TR>
<% for i=0 to RS.Fields.Count?1 %>
      <TD><% = RS(i) %> </ TD>		'显示字段的值
      <% next %>
</ TR>
<%
RS.MoveNext						'移向下一个记录
Wend
RS.Close
Conn.Close
%>
</TABLE>
</BODY>

例6－19.txt - 源码说明

本页面展示了「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习的好资料」中的例6－19.txt 源码文件，采用文本编程语言编写，共 30 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与Web开发相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?