现在时间<%=now()%>
<% 
strconnection="driver={mysql odbc 5.2 driver};database=数据库;server=localhost;uid=用户名;password=密码"
set adodataconn = server.createobject("adodb.connection") 
adodataconn.open strconnection
strquery = "select * from 表" 
set rs = adodataconn.execute(strquery) 
if not rs.bof then 
%> 

<table border="1"> 
<tr>
<td><b>序列号</b></td>
<td><b>标  题</b></td>
</tr> 
<% 
do while not rs.eof 
%> 
<tr>
<td><%=rs("字段名")%></td>
<td><%=rs("字段名")%></td>
</tr> 
<% 
rs.movenext 
loop 
%> 
</table> 
<% 
else 
response.write("无数据.") 
end if 
rs.close 
adodataconn.close 
set adodataconn = nothing 
set rsemaildata = nothing 
%>