Prerequisites Using this process are to write the code for the database connection before calling.
General
<% Sub Table_Show (TableName)%>
<%
SET RS = Server.createObject ("AdoDb.Recordset")
SQL = "Select * from" & Tablename
RS.Open SQL, CONN, 1, 1
%>
<% for i = 0 to rs.fields.count-1%>
<% = rs.fields (i) .Name%>
<% next%>
<% do while not rs.eof%>
|
<% for i = 0 to rs.fields.count-1%>
<% = rs (i)%>
<% next%>
<% rs.movenext
loop
Rs.close
SET RS = NOTHING%>
<% end sub%>
转载请注明原文地址:https://www.9cbs.com/read-35913.html
|
