＜%
'測試讀取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：若想直接使用以上代碼，請將全角符號“＜＞”替換成半角符號“<>”。