＜%
'测试读取MySql数据库的内容

strconnection="driver={mysql odbc 3.51 driver};database=weste_net;server=localhost;uid=root;password="
'无需配置dsn
set adodataconn = server.createobject("adodb.connection")
adodataconn.open strconnection

strquery = "select * from News"
set rs = adodataconn.execute(strquery)
if not rs.bof then
%＞

＜table＞
＜tr＞
＜td＜b＞序列号＜/b＞＜/td＞
＜td＞＜b＞标题＜/b＞＜/td＞
＜/tr＞
＜%
do while not rs.eof
%＞
＜tr＞
＜td＞＜%=rs("News_id")%＞＜/td＞
＜td＞＜%=rs("News_Title")%＞＜/td＞
＜/tr＞
＜%
rs.movenext
loop
%＞
＜/table＞
＜%
else
response.write("无数据.")
end if
rs.close
adodataconn.close
set adodataconn = nothing
set rsemaildata = nothing
%＞

PS：若想直接使用以上代码，请将全角符号“＜＞”替换成半角符号“<>”。