<% user_chk_yn = "N" %> <% Call dbConnect '// 2020 ~ sql = "SELECT hs_seq, hs_ymd, hs_content, hs_img_url, hs_link_url FROM tb_history_company " & _ "WHERE hs_status = 1 AND SUBSTRING(hs_ymd,0,5) >= '2020' ORDER BY hs_ymd DESC, hs_seq DESC" Set rs = db.Execute(sql,,adCmdText) If rs.Eof or rs.Bof Then num2016 = -1 '// 대상글이 없음 Else arr2016 = rs.GetRows num2016 = Ubound(arr2016,2) End If Call rsClose '// 2010 ~ 2019 sql = "SELECT hs_seq, hs_ymd, hs_content, hs_img_url, hs_link_url FROM tb_history_company " & _ "WHERE hs_status = 1 AND SUBSTRING(hs_ymd,0,5) IN ('2010','2011','2012','2013','2014','2015','2016','2017','2018','2019') ORDER BY hs_ymd DESC, hs_seq DESC" Set rs = db.Execute(sql,,adCmdText) If rs.Eof or rs.Bof Then num2011 = -1 '// 대상글이 없음 Else arr2011 = rs.GetRows num2011 = Ubound(arr2011,2) End If Call rsClose '// 1972 ~ 2009 sql = "SELECT hs_seq, hs_ymd, hs_content, hs_img_url, hs_link_url FROM tb_history_company " & _ "WHERE hs_status = 1 AND (SUBSTRING(hs_ymd,0,5) BETWEEN '1972' AND '2009') ORDER BY hs_ymd DESC, hs_seq DESC" Set rs = db.Execute(sql,,adCmdText) If rs.Eof or rs.Bof Then num1972 = -1 '// 대상글이 없음 Else arr1972 = rs.GetRows num1972 = Ubound(arr1972,2) End If Call rsClose Call dbClose %> 토이트론

히스토리

완구 문화를 만들어 온 발자취 토이트론의 제품 히스토리를 한 눈에 보실 수 있습니다.

2020 ~

    <% For i = 0 to num2016 l_seq = arr2016(0,i) l_ymd = arr2016(1,i) l_content = gShowHTML(arr2016(2,i)) l_img = arr2016(3,i) l_link = arr2016(4,i) If gIsNull(l_link) Then l_link_html = "" Else l_link_html = "브랜드가기" End If %>
  • > <%= l_ymd %> <%= l_content %> <%= l_link_html %>
  • <% Next %>

2010 ~ 2019

    <% For i = 0 to num2011 l_seq = arr2011(0,i) l_ymd = arr2011(1,i) l_content = gShowHTML(arr2011(2,i)) l_img = arr2011(3,i) l_link = arr2011(4,i) If gIsNull(l_link) Then l_link_html = "" Else l_link_html = "브랜드가기" End If %>
  • > <%= l_ymd %> <%= l_content %> <%= l_link_html %>
  • <% Next %>

1999 ~ 2008

    <% For i = 0 to num1972 l_seq = arr1972(0,i) l_ymd = arr1972(1,i) l_content = gShowHTML(arr1972(2,i)) l_img = arr1972(3,i) l_link = arr1972(4,i) If gIsNull(l_link) Then l_link_html = "" Else l_link_html = "브랜드가기" End If %>
  • > <%= l_ymd %> <%= l_content %> <%= l_link_html %>
  • <% Next %>