Avatar billede syntax_hh Nybegynder
30. maj 2006 - 15:49 Der er 4 kommentarer og
1 løsning

Script til aflæsning af kildekode

Er det muligt at lave et script til aflæsning af kildekoden til en side på nettet, og derefter aflæse et bestemt punkt der i, og laver en variabel til dette?

Et eksempel på hvad det er jeg søger:

<%
Find kildekode("http://www.hjemmeside.dk/dokument.htm")
%>

Hvor kildekoden så fx er:

<html>
<head>
blabla
</head>
<body>
Tekst tekst tekst tekst
tekst tekst <a href="http://blabla.dk?id=543634"> tekst tekst </a> tekst tekst
tekst tekst
</body>
</html>

Hvor den så gik ind og kopiede "543634" i denne kildekode (Bemærk at dette tal ikke nødvendigvis forekommer hver gang, og kan være lige fra 0 til 100000000), og oprettede en variabel for denne, fx:

var_id = den varierende talkode
Avatar billede fennec Nybegynder
30. maj 2006 - 16:02 #1
Denne metode er godt nok rette mod XML, men virker fint til almindelig brug også:

Set xmlDoc = Server.CreateObject("Msxml2.ServerXMLHTTP")
xmlDoc.open "GET", "http://www.google.dk", False
xmlDoc.Send

Response.write xmlDoc.responseText

Det er endag muligt at sende POST og GET data med på forspøglsen...
Avatar billede syntax_hh Nybegynder
30. maj 2006 - 16:53 #2
Mange tak fennec.
Så mangler jeg blot funktionen til at aflæse og sætte en variabel for en bestemt del af kildekoden, nogen der kan hjælpe der?
Avatar billede fennec Nybegynder
30. maj 2006 - 17:10 #3
Du kan sikkert bruge inStr() til det. Dette er ikke test, og kræver nok lidt tilretning:

tmp = xmlDoc.responseText
findTxt = "<a href="http://blabla.dk?id="
resultat = ""
if inStr(tmp, findTxt) then
  'Slet alt indtil efter den fundne kode.
  tmp = mid(tmp,inStr(tmp,findTxt)+len(findTxt))
  'Hent tallet ud (alt indtil næste ")
  resultat = left(tmp,inStr(tmp,""""))
end if
Avatar billede syntax_hh Nybegynder
30. maj 2006 - 17:28 #4
Tak, det virkede efter få tilrettelser. Husk:
resultat = Replace(resultat,"""","")

Lige efter:
resultat = left(tmp,inStr(tmp,""""))

Aflæg venligst et svar :-)
Avatar billede fennec Nybegynder
31. maj 2006 - 09:07 #5
.o) <-- One Eyed Jack
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester