请教：如何将简单留言薄的内容在其他网站显示？附全部源码
我是菜鸟，请教各位大哥大姐，下面只有2个文件和1个数据库的简单的留言簿，我想将调用代码放到其他网站页面能显示留言簿前面10条信息，每条信息显示12个字留言内容，怎么写调用代码？谢谢。留言簿源码如下：
【1】index.asp
<%
connstr="DBQ="+server.mappath("message.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.CreateObject("ADODB.Recordset")
rs.Open "select * from message order by id desc",conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>最简单的留言系统</title>
</head>
<body>
<table width="600" border="1">
<form name="form1" method="post" action="save.asp">
<tr>
<td height="30" colspan="2"><div align="center">最简单的留言系统</div></td>
</tr>
<%do while not rs.eof%>
<tr>
<td height="30"><div align="center"><%=rs("name")%>
</div></td>
<td height="30"><%=rs("message")%> <%=rs("time")%></td>
</tr>
<%rs.movenext
loop%>
<tr>
<td width="150" height="30"> <div align="center">昵称</div></td>
<td><input name="username" type="text" id="username"></td>
</tr>
<tr>
<td height="30"><div align="center">内容</div></td>
<td><textarea name="message" cols="30" rows="5" id="message"></textarea></td>
</tr>
<tr>
<td height="30"> </td>
<td><input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置"></td>
</tr>
</form>
</table>
</body>
</html>
【2】save.asp
<%
username=request.form("username")
message=request.form("message")
connstr="DBQ="+server.mappath("message.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.CreateObject("ADODB.Recordset")
rs.Open "select * from message",conn,3,3
rs.addnew
rs("name")=username
rs("message")=message
rs("time")=now()
rs.update
rs.close
response.Redirect("index.asp")
%>
【3】数据库名称： message.mdb
