Das liegt daran dass du erst nach 5sec zur Hauptseite weitergeleitet wirst :|
1. Man kann den Code wiederverwenden.Quote:
So ich habe mich jetzt mal mit Httpwebrequest beschäftigt,
Und das ist der volle code um sich auf epvp einzuloggen:
Ergebnis: Das Programm braucht 5 sekunden um mir ein loggin ergebnis zu geben. die methode über den browser gibt mir nach einer sekunde ein ergebnis. So ein langer code um 2 Felder auszufüllen und einen button zu drücken`? Ich persönlich halte nichts von httpwebrequest
for each element in wb.document.getelementsbytagname("button")
if element.innerhtml.contains("subscribe")
element.invokemember("click")
end if
next
if A = "1" then
for each element in wb.document.getelementsbytagname("button")
if element.innerhtml.contains("subscribe")
element.invokemember("click")
end if
A = "2"
next
end if
Dann lern erstmal die Sprache, und nicht nur Copy und Paste aus anderen Threads! Du hast dich damit beschäftigt? Solange rumkopiert bis es funktioniert hat? Du bist ja schon richtig peinlich...Quote:
Ich arbeite nun mit HttpwebRequest, weiß aber höchstens wie mann sich iwio einloggt, Aber nicht wie man einen button drückt, oder noch weniger wie man ein textfeld damit ausfüllt
http://www.youtube.com/subscription_ajax?action_create_subscription_to_channel=1&feature=channels3 POST /subscription_ajax?action_create_subscription_to_channel=1&feature=channels3 HTTP/1.1 Host: www.youtube.com User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:10.0) Gecko/20100101 Firefox/10.0 Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 Accept-Language: en-us,en;q=0.5 Accept-Encoding: gzip, deflate Connection: keep-alive Content-Type: application/x-www-form-urlencoded; charset=UTF-8 Referer: http://www.youtube.com/user/FalschesSignal?feature=watch Content-Length: 97 Cookie: VISITOR_INFO1_LIVE=GE8fwDJ-soU; PREF=f1=50000000&hl=de&fv=11.4.402; use_hitbox=d5c5516c3379125f43aa0d495d100d6ddAEAAAAw; demographics=ad1bbbe07aee069ccb9c71a6e0fb34e7e3QGAAAAZ2VuZGVydAEAAABtdAMAAABhZ2VpEwAAADA=; SID=DQAAAK8AAACP4_fVtcQqRvTnjsyotPz9uzIfFxT3wrQORlT_cVu32T27TD50zpi8yvtiDMlhwDo42cqiDSvOmRo-ATCTvXtmhGd3Ul7g-sdvSzMqoyEJQoKvnLkACBxJnRbeEE99KLBEPE8bsq0TBhyvAJYvJUpDRLhLgnfRSZCoCkcbfyjAof9x1beS3cirayzTTEXK6bi2Ip8AIbtEg34BULAdApx0vrwMTfk4km38--gysm4nxw; HSID=A2sJ0WbHtmXEcwweQ; APISID=iX3sLBp7wt0Rrv1X/Aq061V3PkbSp3W-7s; LOGIN_INFO=48b72074948c56eddb59acf6ec8491aac40AAAB7IjEiOiAxLCAiMyI6IDUyNDk5MTMwMCwgIjIiOiAiTGh0VVZJT1V4TkY3a1M0dWV0M1dCUT09IiwgIjUiOiA1MjA3Mjg5MjA4MjQ2NTI3LCAiNCI6ICJHQUlBIiwgIjciOiAxMzUwMzczODk5LCAiNiI6IGZhbHNlLCAiOCI6IDY2ODg0MjQwMzkzOX0=; ACTIVITY=1350373923949; s_tempdata-2188989189=ei=COHuw_GGhbMCFZKRIQodGHGLCQ%3D%3D&feature=channels3 Pragma: no-cache Cache-Control: no-cache session_token=LdIZq-_ojfDhPwaeLoFD_KJJyDJ8MTM1MDQ2MDMyN0AxMzUwMzczOTI3&c=UCkeVxNfgIIKBg3ZUFPsDjKg HTTP/1.1 200 OK Date: Tue, 16 Oct 2012 07:52:16 GMT Server: Apache Content-Disposition: attachment X-Content-Type-Options: nosniff Content-Encoding: gzip Set-Cookie: s_tempdata-2188989189=; path=/; domain=.youtube.com; expires=Thu, 01-Jan-1970 00:00:00 GMT Expires: Tue, 27 Apr 1971 19:44:06 EST Cache-Control: no-cache P3P: CP="This is not a P3P policy! See //support.google.com/accounts/bin/answer.py?answer=151657&hl=de-DE for more info." X-Frame-Options: SAMEORIGIN Content-Length: 475 Content-Type: application/json; charset=UTF-8 ----------------------------------------------------------
session_token=LdIZq-_ojfDhPwaeLoFD_KJJyDJ8MTM1MDQ2MDMyN0AxMzUwMzczOTI3&c=UCkeVxNfgIIKBg3ZUFPsDjKg
html = .GetResponse("http://www.youtube.com/user/gommehd")
html = .GetResponse("https://accounts.google.com/ServiceLogin?passive=true&continue=http%3A%2F%2Fwww.youtube.com%2Fsignin%3Faction_handle_signin%3Dtrue%26feature%3Dsign_in_button%26nomobiletemp%3D1%26hl%3Dde_DE%26next%3D%252F&uilel=3&hl=de_DE&service=youtube", "%3A224%3A1&checkedDomains=youtube&timeStmp=&secTok=&Email=" & Nick & "&Passwd=" & Passwort & "&signIn=Anmelden&PersistentCookie=yes&rmShown=1")
html = .GetResponse("http://www.youtube.com/?gl=DE&hl=de")
If html.Contains("Video hochladen") Then
MsgBox("OK")
Else
MsgBox("NICHT OK")
End If