toyota main menu
_ <% rs.CursorLocation = 3 sql="select * from grades where grades_series_id = " & my_series_id & " order by grades_order" rs.Open sql,conn, 1, 2 old_spec_type="" count_loop=0 redim ar_grades(rs.recordcount-1) while not rs.eof ar_grades(count_loop)=rs("grades_id") if request("type_id") = "" then sql_grade="select * from series_spec ss join series s on ss.series_id=s.series_id join spec sp on ss.spec_id=sp.spec_id join spec_type st on sp.spec_type_id=st.spec_type_id left join grades_spec gs on sp.spec_id=gs.spec_id where s.series_id="& my_series_id &" and grades_id="& rs("grades_id") &" and spec_cat_id=1 order by spec_type_order,ss.spec_order" else sql_grade="select * from series_spec ss join series s on ss.series_id=s.series_id join spec sp on ss.spec_id=sp.spec_id join spec_type st on (sp.spec_type_id=st.spec_type_id and st.spec_type_id=" & request("type_id") &" ) left join grades_spec gs on sp.spec_id=gs.spec_id where s.series_id="& my_series_id &" and grades_id="& rs("grades_id") &" and spec_cat_id=1 order by spec_type_order,ss.spec_order" end if rs_grade.Open sql_grade,conn, 1, 2 %> <% count_loop=count_loop +1 rs.movenext rs_grade.close wend %>
toyota left main menu
  * บริษัท โตโยต้า มอเตอร์ ประเทศไทย จำกัด สงวนสิทธิ์ในการเปลี่ยนแปลงราคา รายละเอียด และส่วนประกอบต่างๆ โดยมิต้องบอกกล่าว
   อนึ่งรายละเอียดและส่วนประกอบอาจมีการเปลี่ยนแปลง เพื่อให้เหมาะสมกับนโยบายตามสภาพ และความต้องการภายในประเทศ

   โปรดสอบถามรายละเอียด และส่วนประกอบอุปกรณ์ต่างๆ ได้จากผู้แทนจำหน่ายโตโยต้าใกล้บ้านท่าน


   
<% my_series_id=17 Set conn = Server.CreateObject("ADODB.Connection") conn.Open xDb_Conn_Str %>
   
รุ่น
 
   
ระบบขับเคลื่อน:  
ราคา:  
   
<% Set rs = Server.CreateObject("ADODB.Recordset") Set rs_grade = Server.CreateObject("ADODB.Recordset") if request("type_id") = "" then sql="select * from series_spec ss join series s on ss.series_id=s.series_id join spec sp on ss.spec_id=sp.spec_id join spec_type st on sp.spec_type_id=st.spec_type_id where s.series_id=" & my_series_id &" and spec_cat_id=1 order by spec_type_order,ss.spec_order" else sql="select * from series_spec ss join series s on ss.series_id=s.series_id join spec sp on ss.spec_id=sp.spec_id join spec_type st on sp.spec_type_id=st.spec_type_id and st.spec_type_id=" & request("type_id") &" where s.series_id=" & my_series_id &" and spec_cat_id=1 order by spec_type_order,ss.spec_order" end if rs.Open sql,conn, 1, 2 old_spec_type="" count_loop=0 count_color=0 while not rs.eof if(rs("spec_type_id") <> old_spec_type) then count_color=1 if count_loop <> 0 then response.write "

" count_loop = count_loop + 1 %> <% end if old_spec_type=rs("spec_type_id") if count_color mod 2 = 1 then bg_color="#F0F0F0" else bg_color="#CCCCCC" end if count_color=count_color+1 %> <% rs.movenext wend rs.close %>
<%= rs("spec_type_name") %>  
<%= rs("spec_name") %>  
.slideit()">ซ่อน/แสดง
" style="width: 150px; background-color: #FFFFFF;">
" alt="" width="100" height="65"/>
รุ่น <%= rs("grades_name") %>
<%= rs("grades_gear") %>
<%= formatnumber(rs("grades_price"),0) %> บาท
 
<% counter=0 count_color=0 old_g_spec_type="" while not rs_grade.eof if(old_g_spec_type <> rs_grade("spec_type_id")) then count_color=1 if counter<>0 then response.write "

" end if response.write "" %> <% end if if count_color mod 2 = 1 then bg_color="#F0F0F0" else bg_color="#CCCCCC" end if counter=counter+1 %> <% old_g_spec_type =rs_grade("spec_type_id") rs_grade.movenext count_color=count_color+1 wend%>
 
<%= rs_grade("grades_spec_value") %>

 

toyota below main menu
<% conn.close set conn=nothing %>