Download, Edit and Post HTTP Request? - Page 2

Question

thines01 401 Postaholic

12 Years Ago

The Regex needs to be removed.
It is filtering out stuff from YOUR page.
I used it in MY example because it was necessary.

What do you see in the debugger?

thines01 401 Postaholic

12 Years Ago

A 404 would mean you are point to the wrong URL.
Check your query string in the debugger before you do the OpenRead()

thines01 401 Postaholic

12 Years Ago

The URI has to be incorrect (something we missed).
It could have a different root -- meaning: when it is called, the root page is something different even though the part it appends is very visible.

Reply to this topic

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.

daydie 12 Junior Poster in Training · Answer 1 · 2012-02-01T06:04:04+00:00

Your code without edits does not work fella. no response when opening the program, opens fine but no notifications. Also no errors

daydie 12 Junior Poster in Training · Answer 2 · 2012-02-01T08:11:09+00:00

Got your code working now.

Ive tryed mine and i get 404 error on line:

Dim fileWebIn As New StreamReader(wc.OpenRead(strUri))

daydie 12 Junior Poster in Training · Answer 3 · 2012-02-01T14:48:47+00:00

thr url is the action url which you told me to enter fella. (/uk/jforum.page)

Function pmMe(ByVal strsubject As String, ByVal strmessage As String, ByVal UserID As Char) As String
        Dim strRetVal As String = ""
        Dim strUri As String =
           "http://forum.ea.com/uk/jforum.page?" &
           "&toUserId=" & UserID &
           "&subject=" & strsubject &
           "&message=" & strmessage
        Dim wc As New WebClient
        Dim fileWebIn As New StreamReader(wc.OpenRead(strUri))
        Dim rxGangsterName As New Regex("<Title>.**</Title>")
        Dim strData As String
        While Not fileWebIn.EndOfStream
            strData = fileWebIn.ReadLine()
            If (rxGangsterName.IsMatch(strData)) Then
                strRetVal = rxGangsterName.Match(strData).Groups(1).Value
            End If
        End While
        fileWebIn.Close()
        Return strRetVal
    End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox(pmMe("hiiiiiiiiiiiiiiiii", "this is my message to you!", "300000"(0)))
    End Sub

I have also tryed to enter an extra field call action like:

Module Module1
    Function pmMe(ByVal strsubject As String, ByVal strmessage As String, ByVal action As String, ByVal UserID As Char) As String
        Dim strRetVal As String = ""
        Dim strUri As String =
           "http://forum.ea.com/uk/pm/sendTo/" & UserID & ".page?" &
           "action=" & action &
           "&toUserId=" & UserID &
           "&subject=" & strsubject &
           "&message=" & strmessage
        Dim wc As New WebClient
        Dim fileWebIn As New StreamReader(wc.OpenRead(strUri))
        Dim rxGangsterName As New Regex("<Title>.**</Title>")
        Dim strData As String
        While Not fileWebIn.EndOfStream
            strData = fileWebIn.ReadLine()
            If (rxGangsterName.IsMatch(strData)) Then
                strRetVal = rxGangsterName.Match(strData).Groups(1).Value
            End If
        End While
        fileWebIn.Close()
        Return strRetVal
    End Function
End Module

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox(pmMe("hiiiiiiiiiiiiiiiii", "this is my message to you!", "http://forum.ea.com/uk/jforum.page", "300000"(0)))
    End Sub

and i added extra field to button (http://forum.ea.com/uk/jforum.page) and changed the URI to the PM page. No luck.

Update:

I have tryed also removing most fields. EXCEPT subject and message, this brings bak the box with title. But no action is applied. i dont know how to do this and the action page brings back a 404 error when browsing.

daydie 12 Junior Poster in Training · Answer 4 · 2012-02-06T08:15:53+00:00

daydie 12 Junior Poster in Training

12 Years Ago

>.< .................

daydie 12 Junior Poster in Training · Answer 5 · 2012-02-13T14:56:17+00:00

Heres the real code, ive now got it working to login. But still 404 not found page for the POST request.

Hello guys, i need a little help with this httpwebrequest please...

Here is my VB code:

Function pmMe(ByVal strsubject As String, ByVal strmessage As String, ByVal UserID As Char) As String
        Dim strRetVal As String = ""
        Dim strUri As String =
           "http://forum.ea.com/uk/jforum.page?" &
           "&toUserId=" & UserID &
           "&subject=" & strsubject &
           "&message=" & strmessage
        Dim wc As New WebClient
        Dim fileWebIn As New StreamReader(wc.OpenRead(strUri))
        Dim rxGangsterName As New Regex("<Title>.*</Title>")
        Dim strData As String
        While Not fileWebIn.EndOfStream
            strData = fileWebIn.ReadLine()
            If (rxGangsterName.IsMatch(strData)) Then
                strRetVal = rxGangsterName.Match(strData).Groups(1).Value
            End If
        End While
        fileWebIn.Close()
        Return strRetVal
    End Function


    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        MsgBox(pmMe("hiiiiiiiiiiiiiiiii", "this is my message to you!", "300000"(0)))
    End Sub

And here is the page post request.

http://forum.ea.com/uk/jforum.page
 
POST /uk/jforum.page HTTP/1.1
Host: forum.ea.com
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:10.0.1) Gecko/20100101 Firefox/10.0.1
Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
Accept-Language: en-us,en;q=0.5
Accept-Encoding: gzip, deflate
Connection: keep-alive
Referer: http://forum.ea.com/uk/pm/sendTo/159628.page
Cookie: JSESSIONID=AD79E2D143FDB484CE663614CE5F61B4; __utma=197456312.1861519533.1326928794.1329101451.1329121686.37; __utmz=197456312.1326928794.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); _chartbeat2=8l3znty9iv1hfpjv.1326928793992; jforumUserId=1; __utma=103303007.1776102592.1327365065.1328704384.1328821924.3; __utmz=103303007.1327365065.1.1.utmcsr=forum.ea.com|utmccn=(referral)|utmcmd=referral|utmcct=/uk/pm/sentbox.page; FUTWebPhishing1799755051=338925976983986415; CEM-Rememberlogin=mRLLf4Ua9QJAz1J1va8yrhwlh9jFEaLsccY1Q3Ja7wQcFxfjzMy82dppsflyFzwgMi7cOO5BPLynRocqbFmxVjgrE74BOBWsuKBwaqtOG0ByN1iv9UWuOiTKPhChWnzYkSHyNYckzkaMNRK2qLEPF4cWnhAPAYDfXLcxQ8NYRB8zaHxeWdJndmGm4hFHZL2lNTSD1aKnZ1-RL77U_4_i8FfX9vdQg1e5saR7mOHjEdpmW7ojBQV_AiUnKfNJNYoV; cem-default-profile=I1aFxg7sTyT5Cr%2FlXWMOTr0Nji9ma%2F3DZKhQyMn4fAufdpt8pOJ0%2FGoWTAN4vi262bNrYGDClBLg%0AGwcZRvMnbJkYFNCuSMsR8eZOcHw%2FWKrMrCzyxEOovC46pL%2FlS8f72WbsVzC3tjRpx%2BJQeYDcpGYJ%0APSplr2iKOUbl%2FdjIzt2xuRury6x%2BgK8kVXRDP8hlIz3DepixkqjTOi1sm%2Fe2QcuFnoSvcQ58pIU3%0AdCQGaq2p8p2mca7dG61NV9I3CZeg; CEM-profile=2ABHqMt94BUrHEZJmebg3HJZzAGT%2FGN4Zr7tvMdo7UoxyJ3O7aiwy24Qn23%2FSzbqlT%2BZl8DjjcBL%0ASME6HSU7S5Are3wkimoVR%2BuWyEeqeNcDJK6sl55zWwKRxGr0ehA58R3WId8j%2Fi1T8DN0iqniez0W%0AwqtVTYRSxYOG9Na2k62w2DUZWBnzr6GP91aKIcAzyMrxpnk3TQ4OxvBkzTN9xSJtjwZXgb0r0vfC%0AshH5Fn3AKxVFsUEFkonPgTampCniT0vwimiwrmhO1zDs6QD%2FkULBMVKHwVZfpAALlVK72FKgWsrr%0AR4ipj8bIMX%2BlvYQf; BIGipServerPROD-FORUMS-POOL-UK=1685591050.20480.0000; CEM-session=5ah6spoidj7n15suuhfkcug980; __utmc=197456312; s_sivo=GB%3AFORUM%3ANONE; s_cc=true; s_ria=flash%2011%7Csilverlight%20not%20detected; s_ppv=61; s_sq=eaeacom%2Ceaeacomeu%2Ceaproducteaforumuk%3D%2526pid%253DEMEA%25253AGB%25253AEA%25253ANONE%25253AFORUM%25253ANONE%25253AFORUM%25253ANONE%25253APRIVATEMESSAGES%2526pidt%253D1%2526oid%253DSubmit%2526oidt%253D3%2526ot%253DSUBMIT; s_pv=EMEA%3AGB%3AEA%3ANONE%3AFORUM%3ANONE%3AFORUM%3ANONE%3APRIVATEMESSAGES; __utmb=197456312.22.10.1329121686
Content-Type: multipart/form-data; boundary=---------------------------114782935826962
Content-Length: 1683
-----------------------------114782935826962
Content-Disposition: form-data; name="action"
 
sendSave
-----------------------------114782935826962
Content-Disposition: form-data; name="module"
 
pm
-----------------------------114782935826962
Content-Disposition: form-data; name="preview"
 
0
-----------------------------114782935826962
Content-Disposition: form-data; name="bunker"
 
 
-----------------------------114782935826962
Content-Disposition: form-data; name="request_hash"
 
 
-----------------------------114782935826962
Content-Disposition: form-data; name="start"
 
 
-----------------------------114782935826962
Content-Disposition: form-data; name="toUserId"
 
159628
-----------------------------114782935826962
Content-Disposition: form-data; name="subject"
 
yooooooooooooooooooooooo
-----------------------------114782935826962
Content-Disposition: form-data; name="addbbcode24"
 
#444444
-----------------------------114782935826962
Content-Disposition: form-data; name="addbbcode26"
 
12
-----------------------------114782935826962
Content-Disposition: form-data; name="helpbox"
 
Quote: <div> <div class="quote"> <div class="quote_header">   Quote ...   </div> <blockquote class="quote_body"> Text </blockquote> </div> </div>  (alt+q)
-----------------------------114782935826962
Content-Disposition: form-data; name="message"
 
heeeeellllllllllllooooooooooooooooooooooooooooooooooooo
-----------------------------114782935826962
Content-Disposition: form-data; name="disable_html"
 
on
-----------------------------114782935826962
Content-Disposition: form-data; name="attach_sig"
 
on
-----------------------------114782935826962
Content-Disposition: form-data; name="topic_type"
 
0
-----------------------------114782935826962--
 
HTTP/1.1 200 OK
Date: Mon, 13 Feb 2012 08:53:00 GMT
Server: Apache-Coyote/1.1
Content-Type: text/html;charset=UTF-8
Via: 1.1 forum.ea.com
Vary: Accept-Encoding
Content-Encoding: gzip
Keep-Alive: timeout=15, max=100
Connection: Keep-Alive
Transfer-Encoding: chunked