Herzlich Willkommen, lieber Gast!
  Sie befinden sich hier:

  Forum » Visual Basic 6.0 / VBA » List?

Forum | Hilfe | Team | Links | Impressum | > Suche < | Mitglieder | Registrieren | Einloggen
  Quicklinks: MSDN-Online || STL || clib Reference Grundlagen || Literatur || E-Books || Zubehör || > F.A.Q. < || Downloads   

Autor Thread - Seiten: [ 1 ] > 2 <
010
13.10.2004, 19:16 Uhr
FloSoft
Medialer Over-Flow
(Administrator)


jo und wenn du "drin hast" funzt es dann?
--
class God : public ChuckNorris { };
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
011
13.10.2004, 21:23 Uhr
FlAsH
keine Ahnung


Ne passiert gar nichts
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
012
16.10.2004, 18:02 Uhr
FlAsH
keine Ahnung


Also vollständiger text sieht so aus:

Visual Basic:
Dim URL As String
Dim ItemCounter
Dim STC
Dim I As Integer

Private Sub Timer1_Timer()
URL = IE1.getLoactionURLfromIEId(1)
ItemCounter = 0
For I = 1 To (xpList1.ItemsCount - 1)
STC = InStr(1, URL, xpList1.ItemText(I))
If STC > 0 Then
IE1.Navigate 1, "www.bluewin.ch"
End If
Next I
End Sub

Private Sub xpButton1_Click()
xpList1.ItemsAdd xpText1.Text
xpText1.Text = ""
End Sub

Private Sub xpText2_Change()
If xpText2.Text = "Doom-123" Then
xpList1.Enabled = True
xpText1.Enabled = True
xpButton1.Enabled = True
Else
xpList1.Enabled = False
xpText1.Enabled = False
xpButton1.Enabled = False
End If
End Sub


Hoffentlich kannst du mir Helfen!
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
013
18.10.2004, 10:01 Uhr
Audron-AT-www
http://www.sXene.de Audron@sxene.de
(Operator)


naja ich kapier zum beispiel nich was du machen willst.. Du hast ne liste in die versuchste irgendwelche URLs einzutragen, dann hast du tausende xP steuerelemente mit denen du versuchst du arbeiten...

Sagma genau WAS du machen willst, vielleicht kannich dir dann helfen
--
Mit freundlichen Grüßen
Audron, audron@sxene.de
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
014
18.10.2004, 10:16 Uhr
Audron-AT-www
http://www.sXene.de Audron@sxene.de
(Operator)



Zitat von FlAsH:
Sorry die linie...

Visual Basic:
STC = InStr(1, xpList1.ItemText(I), URL)






Kannich dir sagen warum die nich klappt...
der inStr kann nich mit index arbeiten...

STC = InStr(1, xpList1.ItemText(I), URL)
rchtig wäre es so:
STC = InStr(1, xpList1.ItemText, URL)

dann würde es klappen... und flo soft, wenn du das eine weg machst is die zeile nichmehr vollständig dann weißer nich wasser suchen soll zum beispiel... deshalb ist das argument nich ganz richtig....

ciaao ihr
--
Mit freundlichen Grüßen
Audron, audron@sxene.de
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
015
22.10.2004, 15:50 Uhr
FlAsH
keine Ahnung


Also ich will folgendes:
Man kann in eine Liste ein Iteam einfügen z.B ein wort und wenn dieses Wort irgendwann einmal in einer URL beim IE vorkommt das es zu der Bluewin seite zurücksteuert!
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
Seiten: [ 1 ] > 2 <     [ Visual Basic 6.0 / VBA ]  


ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: