Wozu? Ich kann perfekt html und php.
Css ist nicht so mein ding.
Ich weiß halt nurnicht wie ich das in vb verwenden soll.
Ich habe bisher alle elemente anhand der ids angesprochen,
You know?
Nunja... CSS ist das wohl wichtigste Ding beim Stylen einer Homepage. Ohne CSS würde eine Seite aussehen wie ein Haufen Sche*ße.
Selbst wenn du keine HPs machst, solltest du es kennen, wenn du mit HPs arbeitest, denn CSS wird vom Rest der Welt verwendet.
Wenn du minimales Wissen über CSS hättest ( was im Übrigen imo viel viel viel leichter zu lesen ist als HTML oder PHP ), dann wüsstest du, dass du mit Klassen ein großes Problem beim Ansprechen eines Elementes hast. Klassen sind nicht eindeutig. Es kann also sein, dass du beim Suchen nach Klassen mehrere Elemente erhälst. Dabei musst du das richtige raussuchen.
VB ist in meinen Augen ein grausamer Krüppel und deshalb musst du dir dafür jemand anderen suchen ;P
PS.: Du kannst HTML und PHP _nicht_ perfekt. Niemand kann das. Je eher du das einsiehst, umso schneller kannst du tatsächlich gut werden.
Wozu? Ich kann perfekt html und php.
Css ist nicht so mein ding.
Ich weiß halt nurnicht wie ich das in vb verwenden soll.
Ich habe bisher alle elemente anhand der ids angesprochen,
You know?
Perfekt HTML? Das glaube ich wohl eher nicht.
Am besten wäre es wohl das ganze über HttpRequest zu lösen. Dann brauchst auch keine ID / Klasse.
Ne andere Lösung wäre Javascript ins Webbrowser Control Element zu injektzieren welches dann das HTML Dokument parset und den bestimmten Button eine ID zuweißt. Zu empfehlen ist das aber nicht.
Also, ich nutze den dummen WebBrowser nicht und würde dir empfehlen ebenfalls auf WebRequests umzusteigen aber naja..anhand boxxiebabee's Post würde ich mal sowas in der Richtung versuchen (hab's nicht getestet):
PHP Code:
for each element in wb.document.getelementsbytagname("button")
if element.innerhtml.contains("subscribe")
element.invokemember("click")
end if
next
Wie gesagt, habs nicht getestet, von daher kann ich nicht garantieren, dass es funktionieren wird
Was ich jetzt ganz vergessen habe, am schönsten wäre es ja die Youtube API zu verwenden, aber das trau ich dem TE nicht zu :x
Naja die API wird wohl jeder bedienen können..da werden ja die ganzen Requests schon für einen übernommen, da muss man ja lediglich die Funktion aufrufen. Zudem gibt's ja auch ne Docu, wo C&P-Code ist^^
Naja die API wird wohl jeder bedienen können..da werden ja die ganzen Requests schon für einen übernommen, da muss man ja lediglich die Funktion aufrufen. Zudem gibt's ja auch ne Docu, wo C&P-Code ist^^
Weiß nicht wie es jetzt aussieht, aber am Anfang war es noch nicht so gut Dokumentiert.
Außerdem wer noch Bots mit dem Webbrowser erstellt, dem trau ich auch jetzt nicht so wirklich zu ne Library zu nutzen :<
Die wichtigsten wären wohl langsamer, Fehler anfälliger, weniger Freiheiten was z.B. POST Parameter angeht und das es länger dauert bis es funktioniert :>
Option Strict On
Option Explicit On
Imports System.IO
Imports System.Net
Imports System.Text
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
With New Http
'hier wird der Seitenquelltext gespeichert
Dim html As String = String.Empty
'Login ausführen
html = .GetResponse("http://www.elitepvpers.com/forum/login.php?do=login", "vb_login_username=CryLike&vb_login_password=passwortvonepvp&cookieuser=1&s=&securitytoken=guest&do=login&vb_login_md5password=&vb_login_md5password_utf=")
'Hauptseite aufrufen
html = .GetResponse("http://www.elitepvpers.com/forum/")
'prüfen, ob Login erfolgreich war
If html.Contains("Log Out") Then
MsgBox("OK")
Else
MsgBox("NICHT OK")
End If
End With
End Sub
End Class
Public Class Http
Dim cookieCon As New CookieContainer
Dim request As HttpWebRequest
Dim response As HttpWebResponse
Public Function GetResponse(ByVal url As String) As String
request = CType(HttpWebRequest.Create(url), HttpWebRequest)
request.CookieContainer = cookieCon
response = CType(request.GetResponse(), HttpWebResponse)
Return New StreamReader(response.GetResponseStream()).ReadToEnd()
End Function
Public Function GetResponse(ByVal url As String, ByVal post As String) As String
request = CType(HttpWebRequest.Create(url), HttpWebRequest)
request.Method = "POST"
request.CookieContainer = cookieCon
request.UserAgent = "Mozilla/5.0 (Windows NT 6.1; rv:8.0) Gecko/20100101 Firefox/8.0"
request.ContentType = "application/x-www-form-urlencoded"
Dim byteArr() As Byte = Encoding.UTF8.GetBytes(post)
request.ContentLength = byteArr.Length
Dim dataStream As Stream = request.GetRequestStream()
dataStream.Write(byteArr, 0, byteArr.Length)
response = CType(request.GetResponse(), HttpWebResponse)
Return New StreamReader(response.GetResponseStream()).ReadToEnd()
End Function
End Class
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
div element 07/11/2012 - Web Development - 2 Replies hey, ich hab wieder mal ein problem :DD
<div class="register form" style="display: table; #position: relative; overflow: hidden; margin:auto">
<div style=" #position: absolute; #top: 50%;display: table-cell; vertical-align: middle;">
<div class="reg one"><b>Ihre Email-Adresse</b><hr />
<div class="reg two">Email-Adresse</div>
<div class="reg two"><input type="text" name="email" /></div>
<div class="reg three">Email-Adresse wiederholen</div>
Item-Shop Lager Button Zum Normalen lager button machen? DE 01/12/2011 - Metin2 - 6 Replies Moin,
seid heute gib es ja im inventar den IS button wo man mit sein lager öffnen kann,könnte man den auch zu einem Normalen lager Button Machen?
WarRock statt KOREANISCHE BUTTON --> Englische BUTTON 02/26/2010 - WarRock - 6 Replies Bin mir nicht sicher ob es diesen Thread schon gibt
aber hab bis jetzt nichts gesehen hier.
Funktionen
Für WarRock Korea
Koreanische Schriften (Button) weg und englische Schriften (Button) hin
Anleitung
