BTT: Evtl. wäre ein "zwischenspeicher" nützlich, sodass man wählen kann,
welches geschossene Foto gespeichert werden soll, und was nicht.
Ich denke er kennst sich mit HttpWebRequest (POST Method) genug aus.
Quote:
Originally Posted by Daarmy
Einen direkten upload in den warz pic thread hinzufügen. Dazu aber noch hinzufügen Das falls schon ein Post vorhanden ist, das Bild in den Post editiert wird anstatt einen neuen zu kreieren.
Wird (zu) schwer es zu realisieren ,denn das Posten benötigt einen Security Token (von vBulletin aus) und an diesen kann man mit HTTPWebRequest nicht ran kommen.
BTT: Evtl. wäre ein "zwischenspeicher" nützlich, sodass man wählen kann,
welches geschossene Foto gespeichert werden soll, und was nicht.
Das Programm an sich macht keine Screenshots sondern lädt einfach nur die Screenshots aus dem WarZ Ordner.
Quote:
Originally Posted by kRAYNE :x
Ich denke er kennst sich mit HttpWebRequest (POST Method) genug aus.
Ich glaube ihr redet aneinander vorbei.
Quote:
Originally Posted by kRAYNE :x
Wird (zu) schwer es zu realisieren ,denn das Posten benötigt einen Security Token (von vBulletin aus) und an diesen kann man mit HTTPWebRequest nicht ran kommen.
Imports System
Imports System.IO
Imports System.Net
Imports System.Text
Private Cookies_Container As Cookiecontainer = New Cookiecontainer
Public Sub Login(ByVal Username As String, ByVal Password As String)
Dim Login_post as HttpwebRequest = HttpWebRequest.Create("http://www.*.net/")
Login_post.Method = "POST"
Login_post.ContentType = "application/x-www-form-urlencoded"
postData = "loginuser=" & Username & "&loginpasswort=" & Password"
byteArray = Encoding.UTF8.GetBytes(postData)
Login_post.ContentLength = byteArray.Length
dataStream = Login_post.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
dataStream.Close()
Login_resp = Login_post.GetResponse()
dataStream = Login_resp.GetResponseStream()
Dim reader As New StreamReader(dataStream)
responseFromServer = reader.ReadToEnd()
reader.Close()
dataStream.Close()
Login_resp.Close()
End Sub
Public Sub GetCookies()
Dim Cookie_Request as HttpwebRequest = HttpWebRequest.Create("http://www.*.net/")
Dim response As HttpWebResponse = Cookie_Request.GetResponse()
' Cookies ausgeben
Dim cookx As Cookie
For Each cookx In response.Cookies
Console.WriteLine("Cookie:")
Console.WriteLine("{0} = {1}", cookx.Name, cookx.Value)
Console.WriteLine("Domain: {0}", cookx.Domain)
Console.WriteLine("Path: {0}", cookx.Path)
Console.WriteLine("Port: {0}", cookx.Port)
Console.WriteLine("Secure: {0}", cookx.Secure)
Console.WriteLine("When issued: {0}", cookx.TimeStamp)
Console.WriteLine("Expires: {0} (expired? {1})", cookx.Expires, cookx.Expired)
Console.WriteLine("Don't save: {0}", cookx.Discard)
Console.WriteLine("Comment: {0}", cookx.Comment)
Console.WriteLine("Uri for comments: {0}", cookx.CommentUri)
Console.WriteLine("Version: RFC {0}", IIf(cookx.Version = 1, "2109", "2965"))
Console.WriteLine(cookx.ToString())
'Lesen den String vom Cookie
NewCookies(0) = cookx.Name '<-Public deklarierter string array ()
NewCookies(1) = cookx.Value
Next cookx
Console.ReadLine()
End Sub
Public Sub Send_Pic(ByVal Nachricht As String)
GetCookies()
Dim WebReq As String = "http://www.*.net/newreply.php?do=newreply&p=20978227"
Login_post = HttpWebRequest.Create(WebReq)
Dim u As New Uri("http://www.*.de")
Dim col As New Net.CookieContainer
col.Add(u, New Cookie(NewCookies(0).ToString, NewCookies(1).ToString))
Login_post.Method = "POST"
Login_post.ContentType = "application/x-www-form-urlencoded"
postData = "securitytoken=" & Cookie.SecurityTOken & "&msg=" & Nachricht
Login_post.CookieContainer = col
byteArray = Encoding.UTF8.GetBytes(postData)
Login_post.ContentLength = byteArray.Length
dataStream = Login_post.GetRequestStream()
dataStream.Write(byteArray, 0, byteArray.Length)
dataStream.Close()
Login_resp = Login_post.GetResponse()
dataStream = Login_resp.GetResponseStream()
Dim reader As New StreamReader(dataStream)
responseFromServer = reader.ReadToEnd()
reader.Close()
dataStream.Close()
Login_resp.Close()
End Sub
Mh okay das mit dem Security Token ist ein bisschen beschisse n>.<
[Release] WarZ Screenshot Manager 12/31/2012 - Infestation - 5 Replies http://grabilla.com/02b11-d58fe07f-14f6-4b86-804c- faeab28a7bee.png
Features
- Anzeige aller Screenshots in einer Liste.
- Kopieren von Screenshots per Rechtsklick auf das anzeige Bild.
- Löschen von Screenshots per Rechtsklick auf das anzeige Bild.
- Öffnen von Screenshots per Rechtsklick auf das anzeige Bild oder per Doppelklick auf das Anzeige Bild.
Credits
- FapMax