MyCity » Visual Studio -> Visual Basic » Izdvajanje iz html koda

Izdvajanje iz html koda

Napisano na dan: 6.5.2005
2

Izdvajanje iz html koda
Pagination Prethodna strana

Idi na vrh

Poslao: 09 Maj 2005 22:40
Idi na vrh
offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

Ja sam pokusao sa ovim i radi, ali kada ima mnogo html koda onda zablokira.


Moze li se to popraviti?

  3. Dim a As String, b As String
  4. Private Sub cmd1_Click()
  6. b = 1
  7. For i = b To Len(txt1.Text)
  8. a = 1
  9. If Mid(txt1.Text, i, 8) = "<a href=" Or Mid(txt1.Text, i, 8) = "<A HREF=" Then
  10. For e = i To Len(txt1.Text)
  11.  
  13. If Mid(txt1.Text, e, 1) = ">" Then
  14. If a = 1 Then
  15.  lst1.AddItem Mid(txt1.Text, i + 9, e - i - 10)
  16.  a = 0
  17. End If
  18. End If
  21. b = e
  22. Next e
  24. End If
  26. Next i
  27. End Sub






P.S. Hvala na codeu. Ali radim u VB6 pa kada promenim neke stavke...



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 09 Maj 2005 22:52
Idi na vrh
offline
  • Pridružio: 18 Apr 2003
  • Poruke: 5001
  • Gde živiš: Beograd

Mozda ti samo izgleda da zablokira a ustvari mu samo treba vremena da osvezi grafiku... jesi probao da sacekas malo duze?



Poslao: 10 Maj 2005 17:43
Idi na vrh
offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

Pa cekao sam jedno 2-4 minuta i procesor je bio na 100% celo vreme. A i pise Not Responding.

Poslao: 10 Maj 2005 21:23
Idi na vrh
offline
  • Pridružio: 18 Apr 2003
  • Poruke: 5001
  • Gde živiš: Beograd

pa da, tako to izgleda kada se grafika ne osvezava, evo ubaci DoEvents() negde u petlju npr. na samom kraju petlje bi ja to ubacio

  1. Else
  2.   nasao = False
  3. End If
  4. DoEvents() ' ovo ubaci u petlju
  5.       End While
  6.    End Sub


NOTE: za VB.NET treba staviti "System.Windows.Forms.Application.DoEvents()"

MyCity » Visual Studio -> Visual Basic » Izdvajanje iz html koda

Ko je trenutno na forumu
 

Ukupno su 892 korisnika na forumu :: 37 registrovanih, 4 sakrivenih i 851 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: acov34, Ba4e, bavar357, bobomicek, chitach, Clouseau, Demi87, Dorcolac, esx66, ikan, IQ116, JankoS, JosipRi, Kvazar, Marko1238, metallac777, mile.ilic75, Mićko, Najax, Panter, Papadubi, Polifon, Prečanin30, PrincipL, rokokoko, S2M, tomigun, Trilepb, Trivo, vaci, vensla, Vlad000, VladaKG1980, x011, zlaya011, Čivi, Đurđevdan