【调度系统】广东民航医疗快线调度系统源代码
wanglizhong
2025-05-05 8a7dab004bc3eca7808d0cc196a329464402bbc9
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Session.CodePage=65001%>  
<!--#include virtual="/inc/odbc.asp"-->
<!--#include file="JsonPost.gds"-->
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<%
imeis="868120135069851"
begin_time="2016-3-20 00:00:00"
end_time="2016-3-21 00:00:00"
'【历史轨迹】history
appUrl="http://api.gpsoo.net/1/devices/history"
 
args1="access_token="&access_token
args1=args1&"&account="&account&"&imei="&imeis&"&time="&ToUnixTime(now(),0)
args1=args1&"&begin_time="&ToUnixTime(begin_time,0)
args1=args1&"&end_time="&ToUnixTime(end_time,0)
args1=args1&"&map_type=BAIDU"        '如果要显示在百度地图上,map_type=BAIDU此时返回的经纬度将经过baidu校准方式校准,如果要显示在google地图上,map_type=GOOGLE,此时返回的经纬度将经过google校准方式校准,map_type如果不填,则返回原始经纬度
 
 
HTMLCODE= GetBody(appUrl,args1)
'Response.Write args1&"<br><br>"
'HTMLCODE= PostBody(appUrl,args1)
Response.Write HTMLCODE &"<br>"
%>