XMWXC/core/order_detail.asp

<%@ language=vbscript  codepage="65001" %>
<!--#include file="conn.asp"-->
<!--#include file="function.asp"-->
<%
	Response.Charset = "UTF-8"
	
	c_orderid = deal_num_beforesql(request("orderno"))
	
	csql="SP_GET_ORDER_DETAIL " & c_orderid
	set rs=conn.execute(csql)
	c_rtn = "{"
	if not rs.eof then
		c_errcode = rs("errcode")
		if c_errcode -0 = 0 then 
			c_rtn = c_rtn & """code"":""0""," & vbcrlf
			c_rtn = c_rtn & """info"":""""," & vbcrlf
			c_rtn = c_rtn & """order_no"":""" & rs("main_id") & """," & vbcrlf
			c_rtn = c_rtn & """order_time"":""" & rs("order_time") & """," & vbcrlf
			c_rtn = c_rtn & """order_status"":""" & rs("order_status") & """," & vbcrlf
			c_rtn = c_rtn & """prod_code"":""" & rs("prod_code") & """," & vbcrlf
			c_rtn = c_rtn & """prod_name"":""" & rs("prod_name") & """," & vbcrlf
			c_rtn = c_rtn & """price"":""" & rs("price") & """," & vbcrlf
			c_rtn = c_rtn & """start_area"":""" & rs("start_area") & """," & vbcrlf
			c_rtn = c_rtn & """end_area"":""" & rs("end_area") & """," & vbcrlf
			c_rtn = c_rtn & """go_info"":""" & rs("go_info") & """," & vbcrlf
			c_rtn = c_rtn & """back_info"":""" & rs("back_info") & """," & vbcrlf
			c_rtn = c_rtn & """direction"":""" & rs("direction") & """," & vbcrlf
			c_rtn = c_rtn & """run_days"":""" & rs("run_days") & """," & vbcrlf
			c_rtn = c_rtn & """need_pay"":""" & rs("need_pay") & """," & vbcrlf
			c_rtn = c_rtn & """pay_second"":""" & rs("pay_second") & """," & vbcrlf
			c_rtn = c_rtn & """if_bus"":""" & rs("if_bus") & """," & vbcrlf
			c_rtn = c_rtn & """if_hotel"":""" & rs("if_hotel") & """," & vbcrlf
			c_rtn = c_rtn & """if_sightspot"":""" & rs("if_sightspot") & """," & vbcrlf
			c_rtn = c_rtn & """direction"":""" & rs("direction") & """," & vbcrlf
			c_rtn = c_rtn & """customer_name"":""" & rs("customer_name") & """," & vbcrlf
			c_rtn = c_rtn & """customer_mobile"":""" & rs("customer_mobile") & """," & vbcrlf
			c_rtn = c_rtn & """customer_id"":""" & rs("customer_idno") & """," & vbcrlf
			c_rtn = c_rtn & """get_ticket"":[" & rs("TICKET_INFO_1") & "]," & vbcrlf
			c_rtn = c_rtn & """ticket_list"":[" & rs("TICKET_INFO_2") & "]" & vbcrlf
		else
			c_rtn = c_rtn & """code"":""" & c_errcode & ""","
			c_rtn = c_rtn & """info"":""" & rs("errinfo") & """"
		end if
	end if
	rs.close
	c_rtn = c_rtn & "}"
	
	response.write c_rtn
%>