|
下面代码演示7行代码将数据库中的表按表格显示 set rst=Server.CreateObject("Adodb.Recordset") rst.Open "select * from users", "DRIVER={SQL Server};server=llh;database=bbs;uid=sa;pwd=", 1, 3, adCmdText tBody=rst.getString(2,,"</td><td>","</td></tr><tr><td>") For i=0 to rst.fields.count-1 tHead=thead&"<td>"&rst.fields(i).name&"</td>" next response.write "<table border><tr>"&tHead&"</tr><tr><td>"&left(tBody,len(tBody)-8)&"</table>" | 