Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

HttpWebRequest - Form Felder ausfüllen

Frage Entwicklung VB for Applications

Mitglied: Pinkywesen

Pinkywesen (Level 1) - Jetzt verbinden

31.12.2012, aktualisiert 04:55 Uhr, 4681 Aufrufe, 2 Kommentare

Guten Tag liebe Administrator.de Mitglieder,

ich habe folgendes Problem, ich möchte gerne in Visual Basic 2010 einen Tool programmieren, was mir auf einer Website 2 Eingabefelder ausfüllt und anschließend einen Button klickt. Allerdings geht es hierbei nicht um einen Login!

Bisher bin ich mit etlichen Tutorials, zu diesem Punkt gelangt:

01.
Imports System.IO, System.Net, System.Text 
02.
 
03.
Public Class Form1 
04.
 
05.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
06.
    Dim User = "igoe", Pwd = "" 
07.
    Dim Request As HttpWebRequest = CType(WebRequest.Create("http://www.vb-community.eu/index.php?form=UserLogin"), HttpWebRequest) 
08.
    Request.Method = "POST" 
09.
    Request.ContentType = "application/x-www-form-urlencoded" 
10.
    Dim Post As String = "loginUsername=" & User & "&loginPassword=" & Pwd & "&useCookies=1&url=" 
11.
    Dim byteArray() As Byte = Encoding.UTF8.GetBytes(Post) 
12.
    Request.ContentLength = byteArray.Length 
13.
    Dim DataStream As Stream = Request.GetRequestStream() 
14.
    DataStream.Write(byteArray, 0, byteArray.Length) 
15.
    DataStream.Close() 
16.
 
17.
    Dim Response As HttpWebResponse = Request.GetResponse() 
18.
    DataStream = Response.GetResponseStream() 
19.
    Dim reader As New StreamReader(DataStream) 
20.
    Dim ServerResponse As String = reader.ReadToEnd() 
21.
    reader.Close() 
22.
    DataStream.Close() 
23.
    Response.Close() 
24.
 
25.
    If InStr(ServerResponse, "Sie wurden erfolgreich angemeldet.") Then 
26.
        MessageBox.Show("Login OK") 
27.
    Else 
28.
        MessageBox.Show("Login nicht OK") 
29.
    End If 
30.
 
31.
End Sub 
32.
End Class
--> vb-paradise.de - HttpWebRequest Tutorial für Anfänger

Hier wird aber nur ein Cookie gesendet, oder sehe ich das falsch? Wo kann ich die Formfelder deklarieren?

Der Mitgeschnittene Verkehr sieht aber folgendermaßen aus:

01.
Request URL:http://EXAMPLE.de/EXAMPLE/ 
02.
Request Method:POST 
03.
Status Code:302 Moved Temporarily 
04.
Accept:text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 
05.
Accept-Charset:ISO-8859-1,utf-8;q=0.7,*;q=0.3 
06.
Accept-Encoding:gzip,deflate,sdch 
07.
Accept-Language:de-DE,de;q=0.8,en-US;q=0.6,en;q=0.4 
08.
Cache-Control:max-age=0 
09.
Connection:keep-alive 
10.
Content-Length:141 
11.
Content-Type:application/x-www-form-urlencoded 
12.
Cookie:__utma=125742856.972654229.1355525495.1356719121.1356725189.5; __utmb=125742856.3.10.1356725189; __utmc=125742856; __utmz=125742856.1356725189.5.5.utmcsr=smsfriend.de|utmccn=(referral)|utmcmd=referral|utmcct=/ 
13.
Host:EXAMPLE.de 
14.
User-Agent:Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.11 (KHTML, like Gecko) Chrome/23.0.1271.97 Safari/537.11 
15.
 
16.
**Form Data** 
17.
txtRecipient:**Form 1** 
18.
txtCommand:**Form 2** 
19.
chars:121 
20.
SendButton:Send me! 
21.
action:go 
22.
remote:93.222.124.248 
23.
Connection:close 
24.
Content-Type:text/html; charset=UTF-8 
25.
Location:/danke 
26.
Server:Apache 
27.
Transfer-Encoding:chunked 
28.
X-Pingback:http://EXAMPLE.de/xmlrpc.php
Mit freundlichen Grüßen

Pinkywesen
Mitglied: dog
31.12.2012 um 15:08 Uhr
Hier wird aber nur ein Cookie gesendet, oder sehe ich das falsch?

Ja

Wo kann ich die Formfelder deklarieren?

01.
Request.Method = "POST" 
02.
Request.ContentType = "application/x-www-form-urlencoded" 
03.
 
04.
Dim Post As String = "loginUsername=" & User & "&loginPassword=" & Pwd & "&useCookies=1&url=" 
05.
 
06.
Dim byteArray() As Byte = Encoding.UTF8.GetBytes(Post) 
07.
Request.ContentLength = byteArray.Length 
08.
Dim DataStream As Stream = Request.GetRequestStream() 
09.
DataStream.Write(byteArray, 0, byteArray.Length) 
10.
DataStream.Close()
Bitte warten ..
Mitglied: Pinkywesen
02.01.2013 um 06:48 Uhr
Danke, erstmal für deine schnelle Antwort!

Ich glaube ich bin auch auch dem richtigen Weg, allerdings bekomme ich beim Versuch den Response auszulesen, immmer folgenden Fehler:
"Der Remoteserver hat einen Fehler zurückgegeben: (417) Expectation Failed."

Woran könnte das liegen?
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Zusammenführen mehrere Felder, Datei auswählen (3)

Frage von GeoSem zum Thema Batch & Shell ...

C und C++
gelöst C-sharp Form buggt (2)

Frage von Yanmai zum Thema C und C ...

Datenbanken
Informix SE Tabelle alle Felder auf NULL prüfen (4)

Frage von RalfHackmann zum Thema Datenbanken ...

Visual Studio
gelöst VB: Batchprogramm: Resultat zurückgeben an VB Form (Textfeld) (7)

Frage von PixL86 zum Thema Visual Studio ...

Neue Wissensbeiträge
Rechtliche Fragen

Heiseshow, live ab 12 Uhr: Steht die Vorratsdatenspeicherung vor dem Aus?

Tipp von sabines zum Thema Rechtliche Fragen ...

Outlook & Mail

Outlook Probleme nach Juni Updates - KB3203467 ist Schuld

(1)

Information von Deepsys zum Thema Outlook & Mail ...

Microsoft Office

Windows 7, Office 2016 RTM und Updates ohne WSUS

Tipp von chgorges zum Thema Microsoft Office ...

E-Mail

Thunderbird 52 hat Druckprobleme

(3)

Tipp von magicteddy zum Thema E-Mail ...

Heiß diskutierte Inhalte
Server-Hardware
Einem Stromausfall entgegen wirken (28)

Frage von OIOOIOOIOIIOOOIIOIIOIOOO zum Thema Server-Hardware ...

Humor (lol)
Aktuell keine IT Probleme (22)

Frage von lordofremixes zum Thema Humor (lol) ...

Festplatten, SSD, Raid
PC stellt nach dem Bios ab (20)

Frage von uridium69 zum Thema Festplatten, SSD, Raid ...