MenuBar

ASP(Active Server Pages)メモ

'Memo/ASP/' には、下位層のページがありません。

他のサイトのコンテンツを取得する

<%
'指定urlにGETでパラメータを送信するサンプル

Dim oXmlHttp, url
url = "http://hoge/phpinfo.php"
url = url & "?ua=" & Request.ServerVariables("HTTP_USER_AGENT")

'以下、どれかが使えるはず(システムdll依存)
Set oXmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP")
'Set oXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
'Set oXmlHttp = Server.CreateObject("MSXML2.XMLHTTP")
'Set oXmlHttp = Server.CreateObject("MSXML2.XMLHTTP.2.6")
'Set oXmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")
'Set oXmlHttp = Server.CreateObject("MSXML2.XMLHTTP.3.0")
'Set oXmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")
'Set oXmlHttp = Server.CreateObject("MSXML2.XMLHTTP.4.0")

'http get 非同期モードで取得
Call oXmlHttp.open("GET", url, False)
Call oXmlHttp.send()

' httpステータス 200なら成功
Response.Write(oXmlHttp.status)

' httpレスポンス
Response.Write(oXmlHttp.responseText)

%>

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2018-09-15 (土) 07:31:37