Hej Gert!
Det var jo forholdsvis simpelt!
det var en helt kanon beskrivelse, og med lidt snilde vil den også virke i
mit tilfælde!
Tusind tak for den hurtige og gode hjælp! ( IGEN IGEN )
Mvh kim
"Gert Krabsen" <fjernkrabsen@fjernkrabsenfjern.dk> skrev i en meddelelse
news:46c3238a$0$90267$14726298@news.sunsite.dk...
> Kim wrote:
>> Hej Gert!
>>
>> Nej tænkte nok det ikke var så let, men vil nu gerne lære det
>> Jeg har fundet Microsoft internet Transfer Kontrollen
>> men er lidt lost derfra.
>>
>> Mvh kim
>
> Som sagt er det lidt kringlet. Mit kode er indpakket i en masse andet, som
> jeg helst ikke vil give fra mig, men meget kort skal du interessere dig
> for 'Url' og 'OpenUrl'
>
> Lidt pluk og renset for errorhandling m.v.:
>
> "
> Dim minUrl as string
> Dim hentetHtml as string
>
> minUrl="
http://www.dr.dk/P1/Esmann/Udsendelser/2006/10/12101801.htm"
> form1.Inet1.URL = minUrl
> hentetHtml = form1.Inet1.OpenUrl(form1.Inet1.URL)
> "
>
> Og så er det bare at parse indholdet af hentetHtml
>
>
> Du kan f.eks. lave en lille rutine, der automatisk slår en adresseliste op
> på de gule sider og returnerer telefonnumrene..
>
> mvh
> Krabsen