ich bin grad ein Programm am schreiben welches bei sich bei Uploaded.net einloggen soll und dann soll es eine URL in ein Textfeld eingeben und absenden.
Mein bisheriger Code(einloggen funktioniert):
PHP Code:
With New Http
Dim html As String = String.Empty
html = .GetResponse("http://uploaded.net/io/login", "id=id&pw=pw")
html = .GetResponse("http://uploaded.net/me")
If html.Contains("logout") Then
html = .GetResponse("http://uploaded.net/io/import", "urls=http%3A%2F%2Fuploaded.net%2Ffile%2F3bi8aykb")
Else
MsgBox("grgJO")
End If
End With
PHP Code:
http://uploaded.net/io/import
POST /io/import HTTP/1.1
Host: uploaded.net
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:33.0) Gecko/20100101 Firefox/33.0
Accept: text/javascript, text/html, application/xml, text/xml, */*
Accept-Language: de,en-US;q=0.7,en;q=0.3
Accept-Encoding: gzip, deflate
X-Requested-With: XMLHttpRequest
X-Prototype-Version: 1.6.1
Content-Type: application/x-www-form-urlencoded; charset=UTF-8
Referer: http://uploaded.net/upload
Content-Length: 48
Cookie: PHPSESSID=0ed844bbb22c616ef24c644d98ac479c; __utma=91125214.1768282295.1426603447.1426603447.1426603447.1; __utmb=91125214.23.10.1426603447; __utmc=91125214; __utmz=91125214.1426603447.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); login=%26id%3D12769343%26pw%3Dd46eff13b9390353b3dcf0ef32b214e422aee934%26cks%3D4fdd0fb78d98; auth=1276934306bcd19fc5c0704cd04d776fdc5d8952; CSUUID_EC=fe2ace36-339b-ddf8-d928-901ea91fbbb2; ulmanagemax=100; ref=ref_user=2980519&date=1426604826; ulDlAd1=seen; __utmt=1; __ctxpop=0
Connection: keep-alive
Pragma: no-cache
Cache-Control: no-cache
urls=http%3A%2F%2Fuploaded.net%2Ffile%2F3bi8aykb
HTTP/1.1 200 OK
Server: nginx
Date: Tue, 17 Mar 2015 15:07:39 GMT
Content-Type: application/javascript; charset=ISO-8859-1
Transfer-Encoding: chunked
Connection: keep-alive
Expires: Thu, 19 Nov 1981 08:52:00 GMT
Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0
Pragma: no-cache
Vary: Accept-Encoding
Content-Encoding: gzip
hier noch die http klasse:
PHP Code:
Option Strict On
Option Explicit On
Imports System.IO
Imports System.Net
Imports System.Text
Public Class Http
Dim cookieCon As New CookieContainer
Dim request As HttpWebRequest
Dim response As HttpWebResponse
Public Function GetResponse(ByVal url As String) As String
request = CType(HttpWebRequest.Create(url), HttpWebRequest)
request.CookieContainer = cookieCon
response = CType(request.GetResponse(), HttpWebResponse)
Return New StreamReader(response.GetResponseStream()).ReadToEnd()
End Function
Public Function GetResponse(ByVal url As String, ByVal post As String) As String
request = CType(HttpWebRequest.Create(url), HttpWebRequest)
request.Method = "POST"
request.CookieContainer = cookieCon
request.UserAgent = "Mozilla/5.0 (Windows NT 6.1; rv:8.0) Gecko/20100101 Firefox/8.0"
request.ContentType = "application/x-www-form-urlencoded"
Dim byteArr() As Byte = Encoding.Default.GetBytes(post)
request.ContentLength = byteArr.Length
Dim dataStream As Stream = request.GetRequestStream()
dataStream.Write(byteArr, 0, byteArr.Length)
response = CType(request.GetResponse(), HttpWebResponse)
Return New StreamReader(response.GetResponseStream()).ReadToEnd()
End Function
End Class






