Caro Daniele, funziona tutto, tranne l'invio della stringa POST. La pagina a cui invio la richiesta contiene dei 'Request.Form("...") che non vengono soddisfatti. E' un difetto della procedura, oppure ne ho inteso male l'utilizzo???
Sabrinas

Io ho provato ma non riesco a farlo funzionare...
allora...
nel file1.htm su server1 ho un form, in file2.asp su server1 c'è il seguente codice:
<%
' stringa da inviare
strPost = request.form("email")
' la rendiamo URL-compatibile
'strPost = Server.URLEncode(strPost)
' pagina da richiamare
url = "http://www.idwszi.it/unsubactlog.asp"
' usiamo l'oggetto XMLHTTP
Set XMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
XMLHTTP.open "POST", url, false
' headers da impostare
' il metodo POST ha bisogno di questo content-type
XMLHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
' inviamo la richiesta
XMLHTTP.send (strPost)
' codice di risposta del server
status = CInt(XMLHTTP.status)
' Se lo stato è 200, è ok
if status = 200 then
Response.write (XMLHTTP.responseText)
else
Response.write "<P>Errore: " & status
end if
set XMLHTTP = Nothing
%>
e nel file3.asp su server2?
che codice devo inserire per recuperare quel request.form che ho passato nella pagina2?
Help me please!

Grazie
Alessandro

Scusami ma sto impazzendo!!!

Ti posto i 3 codici:

pag1 server1

<form action="javascript:windowOpener('pag2.asp')" method="post" name="form">
<input type="text" name="txt" size="40">
<input type="submit" value="Spedisci!" name="submit">
<input type="reset" value="Cambia!" name="reset">
</form>

pag2 server1

<%
' stringa da inviare
strPost ="txt=" & Request.form("txt")
' la rendiamo URL-compatibile
strPost = Server.URLEncode(strPost)
' pagina da richiamare
url = "http://www.server2.it/pag3.asp"
' usiamo l'oggetto XMLHTTP
Set XMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
XMLHTTP.open "POST", url, false
' headers da impostare
' il metodo POST ha bisogno di questo content-type
XMLHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
' inviamo la richiesta
XMLHTTP.send (strPost)
' codice di risposta del server
status = CInt(XMLHTTP.status)
' Se lo stato è 200, è ok
if status = 200 then
Response.write (XMLHTTP.responseText)
else
Response.write "<P>Errore: " & status
end if
set XMLHTTP = Nothing
%>

pag3 server2

<%
if request.form("txt") <> "" THEN
response.write request.form("txt")
else
response.write("niente!")
end if
%>

Ovviamente il risultato è NIENTE!

Vedi per caso qualche errore che a me sfugge?

Grazie
Alessandro

Era proprio quel javascript!

Grazie mille
Alessandro