<%@ language=vbscript  codepage="65001" %>
<!--#include file="conn.asp"-->
<%
	Response.Charset = "UTF-8"
	
	csql = "SP_GET_INDEX_HOT_CIRCUITRY"
	set rs=conn.execute(csql)
	c_rtn = "{""code"":""0"",""info"":""""," & vbcrlf
	c_rtn = c_rtn & "	""product_list"":[" & vbcrlf
	c_rtn1 = ""
	do until rs.eof 
		c_rtn1 = c_rtn1 & "		{" & vbcrlf
		c_rtn1 = c_rtn1 & "			""prod_code"":""" & rs("prod_code") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""prod_name"":""" & rs("prod_name") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""price"":""" & rs("price") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""start_area"":""" & rs("start_area") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""end_area"":""" & rs("end_area") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""run_info"":""" & rs("go_run_info") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""back_run_info"":""" & rs("back_run_info") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""run_count"":""" & rs("run_count") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""direction"":""" & rs("direction") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""if_bus"":""" & rs("if_bus") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""if_hotel"":""" & rs("if_hotel") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""if_sightspot"":""" & rs("if_sightspot") & """," & vbcrlf
		c_rtn1 = c_rtn1 & "			""run_days"":""" & rs("run_days") & """" & vbcrlf
		c_rtn1 = c_rtn1 & "		},"
		rs.movenext
	loop
	rs.close
	if right(c_rtn1,1)="," then c_rtn1 = left(c_rtn1,len(c_rtn1)-1)
	c_rtn = c_rtn & c_rtn1
	c_rtn = c_rtn & "	]" & vbcrlf
	c_rtn = c_rtn & "}" & vbcrlf

	response.write c_rtn
	
%>