problema con xmlhttp

[michela85cancro]

Buongiorno a tutti!

devo inviare un file xml ricorrendo all'oggetto xmlhttp.

Il pezzo di codice che inserisco è:

.....
	if Rs.Eof then

            %>
	<%@LANGUAGE = JScript%>
          <%
             'Istanzio l'oggetto XMLHTTP
             var richiesta = new ActiveXObject("Microsoft.XMLHTTP");
             ' Apro l'oggetto ed invio la richiesta
	richiesta.Open("POST", indirizzo_web, false)
	richiesta.Send(stringa)
	response.Write(stringa)

dove:
- anzichè indirizzo_web ho messo l'indirizzo del web_service
- stringa contiene le mie righe xml

Eseguendo il codice ottengo questo errore:


Errore di compilazione di Microsoft VBScript error '800a0400'

Prevista istruzione

riga 8444

<%@LANGUAGE = JScript



ho provato di tutto, ma non riesco a capire come far funzionare l'xmlhttp

Grazie in anticipo

[optime]

a cosa serve

<%@LANGUAGE = JScript

se poi scrivi in vbs?

[michela85cancro]

ho copiato il codice da una pagina che ho trovato in rete....
In realtà nella prima delle mie innumerevoli prove non avevo messo la dicitura del linguaggio, ma mi dava errore comunque....

[agenti]

function send_request(url,docs)
Dim objXMLHTTP, xml ,risposta
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "POST", url, False
xml.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xml.Send(docs)
if xml.status = 200 then
send_request = xml.responseText
' oppure in formato xml
' send_request = xml.responseXml
else
send_request = false
Response.write "Si è creato un errore interno."
end if

Set xml = Nothing
end function

usa Vb script.

[michela85cancro]

grazie mille!!