Hallo,
ich habe bereits eine Funktion um die Cookies des Webbrowser-Elements in einem HttpWebRequest zu verwenden. Nun benötige ich das Ganze auch umgekehrt.
Habe zwar schon gegooglet und eine scheinbar gute Antwort gefunden, verstehe den Code aber nicht ganz und weiß nicht, wie ich das in VB umsetze.
Quelle: social.msdn.microsoft.com/Foru…14-43ec-ac50-223b022ec2ea
Bei mir sieht das jetzt so aus:
Wenn ich aber nachschaue, ist der Wert nach wie vor Nothing.
Ich hoffe mir kann jemand helfen. Danke.
Grüße =)
ich habe bereits eine Funktion um die Cookies des Webbrowser-Elements in einem HttpWebRequest zu verwenden. Nun benötige ich das Ganze auch umgekehrt.
Habe zwar schon gegooglet und eine scheinbar gute Antwort gefunden, verstehe den Code aber nicht ganz und weiß nicht, wie ich das in VB umsetze.
Quellcode
- public partial class WebBrowserControl : Form
- {
- private String url;
- [DllImport("wininet.dll", CharSet = CharSet.Auto, SetLastError = true)]
- public static extern bool InternetSetCookie(string lpszUrlName, string lbszCookieName, string lpszCookieData);
- public WebBrowserControl(String path)
- {
- this.url = path;
- InitializeComponent();
- // set cookie
- InternetSetCookie(url, "JSESSIONID", Globals.ThisDocument.sessionID);
- // navigate
- webBrowser.Navigate(url);
- }
- ...
- }
Quelle: social.msdn.microsoft.com/Foru…14-43ec-ac50-223b022ec2ea
Bei mir sieht das jetzt so aus:
VB.NET-Quellcode
- Private Sub main()
- Dim sessCookie as String = "123456789"
- WebBrowser.Navigate("about:blank")
- SetWinINETCookieString("http://www.seite.de/", "loginCookie", sessCookie)
- End Sub
- Private Function SetWinINETCookieString(ByVal url As String, ByVal name As String, ByVal data As String) As Boolean
- Return InternetSetCookie(url, name, data)
- End Function
- <DllImport("wininet.dll", CharSet:=CharSet.Auto, SetLastError:=True)> _
- Public Shared Function InternetSetCookie(lpszUrl As String, _
- lpszCookieName As String, lpszCookieData As String) As Boolean
- End Function
Wenn ich aber nachschaue, ist der Wert nach wie vor Nothing.
Ich hoffe mir kann jemand helfen. Danke.
Grüße =)
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „/dev/null“ ()