[VB6] Finne tekst i nettside

[Kramer2k]

Hallo!

 

Jeg tenkte da jeg ville lage meg en liten hendig spiller til å spille av NRK MP3 nett kanalen

 

Men når jeg skulle legge til Spilles Nå og Neste støtte jeg på et problem:

(kildekoden fra NRK MP3):

			<div class="divProginfoInnerDivTittel" id="divTittel"></div>
		<div class="divProginfoInnerDivBilde" id="iill"></div> <!-- Bilde til program/programleder-->
		<span class="divProginfoInnerDivText" id="inf"></span> <!-- info -->
		<div class="divProginfoInnerDivNaaNeste" id="tl1"></div> <!-- spilles nå overskrift-->
		<div class="divProginfoInnerDivText" id="itl"></div> <!-- innslagstittel -->
		<div class="divProginfoInnerDivText" id="iart"></div><!-- innslagsartist -->
		<div class="divProginfoInnerDivText" id="ialbt"></div><!-- innslag albumstittel -->
	</div>
	<div class="divProginfoInnerDiv" style="margin-top: 5px">
		<div class="divProginfoInnerDivBilde" id="nill"></div><!-- Neste illustrasjon: -->
		<div class="divProginfoInnerDivNaaNeste" id="tl2"></div><!-- Neste: overskrift-->
		<div class="divProginfoInnerDivText" id="nitl"></div><!-- Neste innsalgstittel: -->
		<span class="divProginfoInnerDivTittel" id="ntl"></span><!-- Neste låt / neste program: -->
		<div class="divProginfoInnerDivText" id="nart"></div><!-- Neste artist: -->
		<div class="divProginfoInnerDivText" id="nalbt"></div><!-- Neste albumtittel: -->
	</div>
</div>
<div class="proginfoLayer2" id="proginfoLayer2">
	<div class="divProginfoLogo"><img src="/images/logo/nrkp1.gif" name="proglogo2" alt="" /></div>
	<div class="divProginfoInnerDiv" id="omslutterSpillesNaa">
		<div class="divProginfoInnerDivTittel" id="divTittel"></div>
		<div class="divProginfoInnerDivBilde" id="iill"></div> <!-- Bilde -->
		<span class="divProginfoInnerDivText" id="inf"></span> <!-- info -->
		<div class="divProginfoInnerDivNaaNeste" id="tl1"></div> <!-- spilles nå -->
		<div class="divProginfoInnerDivText" id="itl"></div> <!-- innslagstittel -->
		<div class="divProginfoInnerDivText" id="iart"></div><!-- innslagsartist -->
		<div class="divProginfoInnerDivText" id="ialbt"></div><!-- innslag albumstittel -->
	</div>
	<div class="divProginfoInnerDiv" style="margin-top: 5px">
		<div class="divProginfoInnerDivBilde" id="nill"></div><!-- Neste illustrasjon: -->
		<div class="divProginfoInnerDivNaaNeste" id="tl2"></div><!-- Neste: -->
		<div class="divProginfoInnerDivText" id="nitl"></div><!-- Neste innsalgstittel: -->
		<span class="divProginfoInnerDivTittel" id="ntl"></span><!-- Neste låt / neste program: -->
		<div class="divProginfoInnerDivText" id="nart"></div><!-- Neste artist: -->
		<div class="divProginfoInnerDivText" id="nalbt"></div><!-- Neste albumtittel: -->
	</div>
</div></div>

 

Når jeg ser på nettet får jeg fram hvem som spiller og navnet på sangen.

Har prøvd med(i programmet):

If InStr(web.Document.body.parentelement.innertext, "Akkurat nå:") > 0 Then

men uten hell :/

Ser for meg at innerhtml ikke vil gjøre noen forskjell da teksten ikke er inkludert i kildekoden.

Det er da vel en måte å få en label fra

		<div class="divProginfoInnerDivNaaNeste" id="tl1"></div> <!-- spilles nå -->

i browseren til VB6

 

Håper på svar og at noen skjønte problemstillinga

 

- Kramer2k