Problème avec objXMLHTTP.Open
A l'aide :roll: Je vous remercie par avance.
Je souhaite récupérer sur un autre site web (programmé en PHP) le contenu d'un champ (le champ ID) pour lequel ID = x_metbullcode, x_metbullcode étant un champ contenu dans ma base Access (mon site est en ASP). Je récupère auparavant la valeur x_metbullcode par un rs("x_metbullcode") bien entendu. La valeur retournée est un entier.
J'ai toujours la même erreur et je n'arrive pas à trouver la solution. Voici l'erreur :
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/T_Meteoriteview.asp, line 236 ---> objXMLHTTP.Open "GET", "http://tin.er.usgs.gov/meteor/mbwr.php?id=" =" & x_metbullcode, False
Voici la partie de mon code source qui plante :
<%
dim strResponse
objXMLHTTP.Open "GET", "http://tin.er.usgs.gov/meteor/mbwr.php?id=" & x_metbullcode, False
objXMLHTTP.Send
strResponse = objXMLHTTP.responseText
On Error Resume Next
If strResponse= "" Then %>
<p>Currently undergoing maintenance. We apologize for any inconvenience.</p>
<% Else %>
<%=strResponse%>
<% End If
objXMLHTTP.Close
Set objXMLHTTP = Nothing
%>