S i X h E a D { ? }

 
<%
Dim colParameter As New System.Collections.Specialized.NameValueCollection
colParameter.Add("a", "aaaaaaaaa")
colParameter.Add("b", "bbbbbbbbb")
 
Dim objClient As Net.WebClient = New System.Net.WebClient
Dim bytReponse As Byte() = objClient.UploadValues("http://domain.com/path/to/script", "POST",colParameter)
Dim strWebPage As String = Encoding.ASCII.GetChars(bytReponse)
 
Response.Write(strWebPage)
%>