J'ai un script qui fonctionne très bien sur windows 2000, mais sous windows
2003, j'ai un problème.
Voici le script
Function getInfoFile(name)
Dim GetConnection
Set GetConnection = CreateObject("MSXML2.XMLHTTP")
Dim url
url = "http://www.siteweb.com/getsonginfo.asp?idc=" & name
writelog "connexion à l'url : " & url , Info
GetConnection.Open "get", url, False
GetConnection.Send
writelog "getInfoFile for " & name & ":" & GetConnection.statusText ,
Info
getInfoFile = GetConnection.responseText
End Function
Voici l'erreur générée
Erreur Système : -1072896748
code : C00CE514
source : msxml3.dll
L'erreur est générée à cause de : GetConnection.responseText
J'ai la même erreur quand je fais un GetConnection.responseXML et aussi
quand j'utilise Microsoft.XMLHTTP
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
jbongran
Creezeer wrote:
Bonjour à tous,
J'ai un script qui fonctionne très bien sur windows 2000, mais sous windows 2003, j'ai un problème.
Voici le script
Function getInfoFile(name) Dim GetConnection Set GetConnection = CreateObject("MSXML2.XMLHTTP") Dim url url = "http://www.siteweb.com/getsonginfo.asp?idc=" & name writelog "connexion à l'url : " & url , Info GetConnection.Open "get", url, False GetConnection.Send writelog "getInfoFile for " & name & ":" & GetConnection.statusText , Info getInfoFile = GetConnection.responseText End Function
Voici l'erreur générée
Erreur Système : -1072896748 code : C00CE514 source : msxml3.dll
L'erreur est générée à cause de : GetConnection.responseText J'ai la même erreur quand je fais un GetConnection.responseXML et aussi quand j'utilise Microsoft.XMLHTTP
merci de votre attention
Il y a quoi dans le log généré par writelog en ajoutant le bout de code ci-dessous ? Function getInfoFile(name) On Error Resume Next ' --- code ici ---- If Err.Number <> 0 Then writelog "Erreur xmlhttp: " & xmlhttp.parseError.URL & _ "<br>" & xmlhttp.parseError.Reason writelog "Erreur N°: " & Err.Number & _ "Description: " & Err.Description End If
Creezeer wrote:
Bonjour à tous,
J'ai un script qui fonctionne très bien sur windows 2000, mais sous
windows 2003, j'ai un problème.
Voici le script
Function getInfoFile(name)
Dim GetConnection
Set GetConnection = CreateObject("MSXML2.XMLHTTP")
Dim url
url = "http://www.siteweb.com/getsonginfo.asp?idc=" & name
writelog "connexion à l'url : " & url , Info
GetConnection.Open "get", url, False
GetConnection.Send
writelog "getInfoFile for " & name & ":" &
GetConnection.statusText , Info
getInfoFile = GetConnection.responseText
End Function
Voici l'erreur générée
Erreur Système : -1072896748
code : C00CE514
source : msxml3.dll
L'erreur est générée à cause de : GetConnection.responseText
J'ai la même erreur quand je fais un GetConnection.responseXML et
aussi quand j'utilise Microsoft.XMLHTTP
merci de votre attention
Il y a quoi dans le log généré par writelog en ajoutant le bout de code
ci-dessous ?
Function getInfoFile(name)
On Error Resume Next
' --- code ici ----
If Err.Number <> 0 Then
writelog "Erreur xmlhttp: " & xmlhttp.parseError.URL & _
"<br>" & xmlhttp.parseError.Reason
writelog "Erreur N°: " & Err.Number & _
"Description: " & Err.Description
End If
J'ai un script qui fonctionne très bien sur windows 2000, mais sous windows 2003, j'ai un problème.
Voici le script
Function getInfoFile(name) Dim GetConnection Set GetConnection = CreateObject("MSXML2.XMLHTTP") Dim url url = "http://www.siteweb.com/getsonginfo.asp?idc=" & name writelog "connexion à l'url : " & url , Info GetConnection.Open "get", url, False GetConnection.Send writelog "getInfoFile for " & name & ":" & GetConnection.statusText , Info getInfoFile = GetConnection.responseText End Function
Voici l'erreur générée
Erreur Système : -1072896748 code : C00CE514 source : msxml3.dll
L'erreur est générée à cause de : GetConnection.responseText J'ai la même erreur quand je fais un GetConnection.responseXML et aussi quand j'utilise Microsoft.XMLHTTP
merci de votre attention
Il y a quoi dans le log généré par writelog en ajoutant le bout de code ci-dessous ? Function getInfoFile(name) On Error Resume Next ' --- code ici ---- If Err.Number <> 0 Then writelog "Erreur xmlhttp: " & xmlhttp.parseError.URL & _ "<br>" & xmlhttp.parseError.Reason writelog "Erreur N°: " & Err.Number & _ "Description: " & Err.Description End If
