<%
Dim oXMLHTTP
Set oXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP.3.0")
oXMLHTTP.Open "GET", "http://net1.global-trade.com.tw/apns/WebService1.asmx/iOSAPNS?content=QWER&DeviceTokenlistString=64d73e7b0815f7c22d7a412dbde7c4f4477ada6fdc4ee8d57db8ee536706dea6", False
oXMLHTTP.Send
If oXMLHTTP.Status = 200 Then
response.write oXMLHTTP.responseText
End If
%>
Dim oXMLHTTP
Set oXMLHTTP = CreateObject("MSXML2.ServerXMLHTTP.3.0")
oXMLHTTP.Open "GET", "http://net1.global-trade.com.tw/apns/WebService1.asmx/iOSAPNS?content=QWER&DeviceTokenlistString=64d73e7b0815f7c22d7a412dbde7c4f4477ada6fdc4ee8d57db8ee536706dea6", False
oXMLHTTP.Send
If oXMLHTTP.Status = 200 Then
response.write oXMLHTTP.responseText
End If
%>
全站熱搜
留言列表