<% SET CONN = Server.CreateObject("ADODB.Connection") conn.Open xDb_Conn_Str %> มูลนิธิโตโยต้าประเทศไทย
TTF Menu
<% sql="select * from ttf_news where news_active=1 and news_section=1 and datediff(day,'" & year(now) & "/" & month(now) & "/" & day(now) & " ',news_end_date) >=0 and datediff(day,'" & year(now) & "/" & month(now) & "/" & day(now) & " ',news_start_date) <=0" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 1, 2 while not rs.eof %>
" >
"><%= formatdatetime(rs("news_date"),1)%>
<%= rs("news_headline")%>

<% rs.movenext wend rs.close set rs=nothing conn.close set conn=nothing %>
TTF icon