ภาษาไทย   <% Set Query = CreateObject("ADODB.Recordset") QueryStr = "select * from tb_private where private_type = 'th' order by private_id" Query.Open QueryStr, Conn, adOpenStatic, adLockReadOnly If Not Query.EOF Then Do While Not Query.EOF %> <% Query.MoveNext Loop End If %> หลักสูตรส่วนตัว วัน/เวลา ชั่วโมง ค่าลงทะเบียน อ.ชาวไทย ค่าลงทะเบียน อ.ชาวต่างประเทศ <%=Query("private_subject")%> <%=Query("private_day")%> <%=Query("private_amount")%> <%=Query("private_fee_th")%> <%=Query("private_fee_inter")%>     English   <% Set Query = CreateObject("ADODB.Recordset") QueryStr = "select * from tb_private where private_type = 'en' order by private_id" Query.Open QueryStr, Conn, adOpenStatic, adLockReadOnly If Not Query.EOF Then Do While Not Query.EOF %> <% Query.MoveNext Loop End If %> หลักสูตรส่วนตัว วัน/เวลา ชั่วโมง ค่าลงทะเบียน อ.ชาวไทย ค่าลงทะเบียน อ.ชาวต่างประเทศ <%=Query("private_subject")%> <%=Query("private_day")%> <%=Query("private_amount")%> <%=Query("private_fee_th")%> <%=Query("private_fee_inter")%>