<%'Option explicit%>
<%
dim Rs
dim conn
dim sSQL
dim sTitle,sContent
sSQL="select top 1 * from notice order by mdate desc"
call check_conn()'in Open_db.asp
set conn=session("conn")
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open sSQL, conn,3 'neway
Rs.MoveFirst
sTitle=Rs.Fields("title")
sContent=rs.Fields("content")
Rs.Close
%>
JessicaHouse_歡迎光臨潔西卡部屋
