<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
QQMap_key="D56BZ-BFAHR-34GWH-WOM7M-H76VO-H6F4M"
|
|
keyword=trim(Request("keyword"))
|
from_lat_lng=trim(Request("from_lat_lng"))
|
to_lat_lng=trim(Request("to_lat_lng"))
|
|
i=0
|
'Set rs = Server.CreateObject("ADODB.Recordset")
|
If from_lat_lng<>"" And to_lat_lng<>"" Then
|
appUrl="https://api.966120.com.cn/qqmap/direction/v1/driving/"
|
args1="key="&QQMap_key&"&from="&from_lat_lng&"&to="&to_lat_lng&"&output=json"
|
HTMLCODE= GetBody(appUrl,args1)
|
|
webJson=HTMLCODE
|
End If
|
|
Response.Write webJson
|
Response.End%>
|
