高雄巴黎香舍商務飯店

<% Set conn = Server.CreateObject("ADODB.Connection") conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="& SERVER.MapPath("shop.asp") %> <% sqlnews = "select * from activemain where online=true order by AddDate desc" set rsnews=Server.CreateObject("ADODB.RecordSet") rsnews.open sqlnews,conn,1,1 %>

<% if rsnews.eof and rsnews.bof then response.write "" else Do while Not rsnews.eof %> <% rsnews.movenext loop end if set rsnews=nothing '****************************** %>


最近沒有新聞公告
	2008/9/6	<%=rsnews("Prodname")%>巴黎香舍_專屬新網站正式上線	人氣值：<%=rsnews("ClickTimes")%>3574
	<%=datevalue(rsnews("AddDate"))%>2008/9/6	巴黎香舍_專屬新網站正式上線 <%=rsnews("Prodname")%>	人氣值：<%=rsnews("ClickTimes")%>4574
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	<%=rsnews("Prodname")%>巴黎香舍_專屬新網站正式上線	人氣值：5574
	<%=datevalue(rsnews("AddDate"))%>2008/9/6	巴黎香舍_專屬新網站正式上線 <%=rsnews("Prodname")%>	人氣值：<%=rsnews("ClickTimes")%>6574
	<%=datevalue(rsnews("AddDate"))%>2008/9/6	<%=rsnews("Prodname")%>巴黎香舍_專屬新網站正式上線	人氣值：7574
	<%=datevalue(rsnews("AddDate"))%>2008/9/6	巴黎香舍_專屬新網站正式上線 <%=rsnews("Prodname")%>	人氣值：8574
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	<%=rsnews("Prodname")%>巴黎香舍_專屬新網站正式上線	人氣值：9574<%=rsnews("ClickTimes")%>
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	巴黎香舍_專屬新網站正式上線 <%=rsnews("Prodname")%>	人氣值：9574
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	<%=rsnews("Prodname")%>巴黎香舍_專屬新網站正式上線	人氣值：<%=rsnews("ClickTimes")%>9574
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	<%=rsnews("Prodname")%>巴黎香舍_專屬新網站正式上線	人氣值：9774
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	巴黎香舍_專屬新網站正式上線 <%=rsnews("Prodname")%>	人氣值：<%=rsnews("ClickTimes")%>9874
	2008/9/6 <%=datevalue(rsnews("AddDate"))%>	巴黎香舍_專屬新網站正式上線 <%=rsnews("Prodname")%>	人氣值：<%=rsnews("ClickTimes")%>9974