如何将Instagram图像集成到经典的asp网站中

时间:2014-11-05 12:36:21

标签: instagram

我有一个经典ASP网站,我想显示由我的客户设置的最新两个Instagram图像。我该怎么办呢?我找到了一个PHP的例子,但没有经典ASP的例子。感谢

1 个答案:

答案 0 :(得分:1)

您必须为此使用Instagram API。您必须在Instagram中注册并生成您需要在代码中使用的API访问令牌(如下所示)。用户ID也必须更改为您的用户ID(这是一个数值)

API将返回结果为JSON,您必须使用标准JSON2.asp进行解析。你可以在这里得到它: https://github.com/nagaozen/asp-xtreme-evolution/blob/master/lib/axe/classes/Parsers/json2.asp

以下是代码:

<!--#include file="JSON2.asp"-->
<%

    Const MaxNum = 2

    Set xmlHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
    xmlHTTP.open "GET", "https://api.instagram.com/v1/users/<userID>/media/recent/?access_token=<your Instagram access token>", false
    xmlHTTP.send()
    RawFeed = xmlHTTP.ResponseText

    Set RawResults = JSON.parse(join(array(RawFeed)))

    iCt = 0
    For Each Feed In RawResults.Get("data")

     if Feed.Get("type") = "image" then
        iCt = iCt + 1
        sURL = Feed.Get("images").Get("thumbnail").Get("url")       ' Can use "low_resolution" or "standard_resolution" instead of "thumbnail" for images in other resolutions
        sLink = Feed.Get("link")
        response.write "<a href=""" & sLink & """><img src=""" & sURL & """></a>"

        if iCt = MaxNum then exit for
     End If

    Next
%>