PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [VB.Net] Kontaktformular ausfüllen?


Cl!ck
09.05.2009, 11:23
Ich möchte das Kontaktformular auf dieser Seite:
http://www.katalog-kiosk.de/data.asp?NR=1347&P=&BID=000000&O=J

mit einem VB.Net programm ausfüllen und dann den AbsendenButton klicken.

Soweit bin ich schon:


WebBrowser1.Navigate("http://www.katalog-kiosk.de/data.asp?NR=1347&P=&BID=000000&O=J")
WebBrowser1.Document.GetElementById("strNameFirst").InnerText = boxVorname.Text
WebBrowser1.Document.GetElementById("strName").InnerText = boxNachname.Text
WebBrowser1.Document.GetElementById("strStreet").InnerText = boxStraße.Text
WebBrowser1.Document.GetElementById("strNumber").InnerText = boxNummer.Text
WebBrowser1.Document.GetElementById("strZIP").InnerText = boxPostleitzahl.Text
WebBrowser1.Document.GetElementById("strCity").InnerText = boxOrt.Text
WebBrowser1.Document.GetElementById("strEmail").InnerText = boxEmail.Text

WebBrowser1.Document.Forms(1).InvokeMember("submit")


Ich muss jetzt nur noch wissen wie man einen Radiobutton aktiviert (also bei Anrede: Herr/Frau)

Danke für die Hilfe!
Sawyer
09.05.2009, 11:55
Dim Radio As HtmlElement
Radio = WebBrowser1.Document.GetElementById("radAH")
Radio.SetAttribute("checked", "false")

Müsste so gehen , Frau ist true und Herr ist false ;)

MfG
Sirect
09.05.2009, 12:11
Hey, die Website hab ich auch für meinen Katalog-Bomber benutzt xD
KP. ob meiner noch geht, hab das Projekt nicht mehr oO
Cl!ck
09.05.2009, 12:15
Dim Radio As HtmlElement
Radio = WebBrowser1.Document.GetElementById("radAH")
Radio.SetAttribute("checked", "false")Müsste so gehen , Frau ist true und Herr ist false ;)

MfG
Danke =)

Dann hätte ich noch eine Frage und zwar:

Wenn ich auf
http://www.katalog-kiosk.de/data.asp?NR=1347&P=&BID=000000&O=J
alles richtig ausfülle und absenden klicke kommt:

Ihre Katalog-Bestellung ist bereits unterwegs zu

Wie kontrolliere ich mit meinem Programm, dass das im Webbrowser1 angezeigt wird, so dass ich dann ein Erfolgreich anzeigen lassen kann?
Puiscel
13.05.2009, 20:13
das geht indem du :
webbrowser1.document.all(1).outerhtml
oder so ähnlich dann machst du ein if
if "Ihre Katalog-Bestellung ist bereits unterwegs zu" = webbrowser1.document.all(1).outerhtml then
lblanzeige1.text = "Erfolgreich"
else
lblanzeige1.text = "Fehler"
end if

es kann auch statt outerhtml innerhtml weiß nicht mehr genau
Cl!ck
14.05.2009, 13:54
das geht indem du :
webbrowser1.document.all(1).outerhtml
oder so ähnlich dann machst du ein if
if "Ihre Katalog-Bestellung ist bereits unterwegs zu" = webbrowser1.document.all(1).outerhtml then
lblanzeige1.text = "Erfolgreich"
else
lblanzeige1.text = "Fehler"
end if

es kann auch statt outerhtml innerhtml weiß nicht mehr genau
Thx =) funzt =)
Puiscel
17.05.2009, 16:04
was soll denn ein katalog bomber sein? was macht das fürn sinn?
Sirect
17.05.2009, 16:20
was soll denn ein katalog bomber sein? was macht das fürn sinn?

Das Tool bestellt aus dem Internet an die 300 kostenlose Kataloge die dann an die Zielperson geliefert werden =)
Shini
17.05.2009, 21:52
des is aber fies :D
Puiscel
19.05.2009, 17:21
cool^^ kann mir jemand mal die source geben von dem programm?
stadionfeger
20.05.2009, 09:05
das ist ne richti fiese aber irgendwie geile idee *gg*
Erkennt die Seite denn nicht wenn man mehrmals an die selbe Adresse bestellt? o_O
IRET
20.05.2009, 10:31
das ist ne richti fiese aber irgendwie geile idee *gg*
Erkennt die Seite denn nicht wenn man mehrmals an die selbe Adresse bestellt? o_O
Das is denn egal denk ich.
Natürlich is das möglich das zu checken ,aber die Frage is eher ob das der Anbierter macht.
Puiscel
20.05.2009, 16:04
bitte postet mal einer den quellcode plz
Chemical
20.05.2009, 16:08
Kann dir den Source in Vb6 geben, wenn du willst, habe früher auch mal einen gemacht.
Und ihr habt mir alle die Seiten geklaut :'(:'(.