Puoi usare msxml.
Attraverso questo oggetto puoi inviare form a diversi url.
Prima dovrai costruire un buffer del tutto uguale a quello che vedi nella querystring. Quindi se devi inviare le variabili
Nome = Pippo
Cognome = Pluto
id=112
Il tuo buffer sarà Nome=Pippo&cogmome=Pluto&id=112
Questa funzione invierà il tuo buffer all'url specificato in modalità POST:
codice:
Function SendFormTo(Url,Buffer)
Dim Http
Set Http = Server.CreateObject("Microsoft.XMLHTTP")
Http.Open "POST",Url,False
Http.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
Http.Send(Buffer)
SendFormTo = Http.ResponseText
Set Http = Nothing
End Function
Esempio:
codice:
Buffer = "Nome=Pippo&cogmome=Pluto&id=112"
SendFormTo "http://www.sito.it/pagina.asp?id=1",Buffer
SendFormTo "http://www.sito2.it/pagina.asp?id=45",Buffer
SendFormTo "http://www.sito3.it/pagina.asp",Buffer
SendFormTo è una funzione ed in output ti restituisce il contenuto della pagina....
Naturalmente ti convine costruire una classe.