[Erel]

You will need something like:

Sub Globals
Dim buffer(0) As byte
End Sub
Sub App_Start
    bit.New1 'bit is a Bitwise object
    postdate
End Sub
Sub PostDate
    Response.New1
    Request.New1("http://www...")
    request.ContentType = "application/x-www-form-urlencoded"
    request.Method = "POST"
    writer.New1(request.GetStream,false)
    s = "a=value1&b=23"
    buffer() = bit.StringToBytes(s,0,StrLength(s))
    writer.WriteBytes(buffer())
    response.Value = request.GetResponse
    Msgbox(response.GetString)
    response.Close
End Sub