Вы можете сделать все это в Classic ASP без использования каких-либо других языков или страниц. Вам понадобится одна вещь - есть библиотека JSON2.ASP, которая вам понадобится для анализа результатов. Вы можете узнать больше об этом здесь:
http://zend.lojcomm.com.br/entries/classic-asp-json-revisited/
https://github.com/nagaozen/asp-xtreme-evolution/blob/master/lib/axe/classes/Parsers/json2.asp
Получив эти данные, вы можете получить результаты Yelp и легко их проанализировать в Classic ASP. Я делаю это с API 1.0, так как это немного проще, но вы можете использовать это в качестве отправной точки, чтобы сделать это в API 2.0, если хотите быть уверенным.
Ниже приведен код, который будет возвращать результаты поиска ресторана. Вы, конечно, должны заполнить свой код API, где YWSID указан в URL ниже. Я передаю результаты в массив, а затем строю таблицу из массива для отображения на странице, но как только у вас есть данные, вы можете делать с ними все, что захотите.
<!--#include file="JSON2.asp"-->
<%
set xmlHTTP = server.createobject("MSXML2.ServerXMLHTTP.6.0")
xmlHTTP.open "GET", "http://api.yelp.com/business_review_search?location=Clare%20Ireland&ywsid=XXXXXXXXXX&category=restaurants", false
xmlHTTP.send()
RawFeed = xmlHTTP.ResponseText
Set RawResults = JSON.parse(join(array(RawFeed)))
For Each YelpFeed In RawResults.Get("businesses")
If YelpFeed.Get("is_closed") = "False" Then
Response.write YelpFeed.Get("name") & "<br>" & vbNewLine
Response.write YelpFeed.Get("rating_img_url") & "<br>" & vbNewLine
Response.write YelpFeed.Get("address1") & "<br>" & vbNewLine
Response.write YelpFeed.Get("phone") & "<br>" & vbNewLine
Response.write YelpFeed.Get("photo_url") & "<br>" & vbNewLine
Response.write YelpFeed.Get("review_count") & "<br>" & vbNewLine
End If
Next
Set RawResults = nothing
%>