Okej, hur ser din kod ut nu? Har du tillgång till sidans källkod? Annars kommer du inte få med alla poster eftersom det är paging på den sidan.
Frågan#1
vill bara ha en lång lista ingen layout
lär mej xml
24 svar · 595 visningar · startad av voigtann1
Okey, inte för att jag fattar så mycket (:)), men nu är alla poster med: http://us.games-workshop.com/warhammerworld/warhammer/skirmish/scenarios/scenarioslist_sort.asp?perpage=1000&other=&page=1&army=skaven&sort=Alpha
eftersom jag inte kan det så har jag ingen kod. Men jag vill ha rubriken, texten och länken på paging sidan.. om ni förstår...
denna topicen dog visst :(
Vill gärna veta hur man får ut "datan" från en sida och gör om det som man själv vill.
Detta kanske inte är XML man ska använda eller?
Så här hämtar du ut all htmlkod och sparar den i strHtml.
Sen kan du använda regexp eller instr och mid för att få ut det just du vill ;) Lycka till ;)
Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objHTTP.Open "GET","http://us.games-workshop.com/warhammerworld/warhammer/skirmish/scenarios/scenarioslist_sort.asp?perpage=1000&other=&page=1&army=skaven&sort=Alpha", False
objHTTP.Send
strHTML=objHTTP.responseText
Set objHTTP = Nothing
/ Mikul
hmmm lite mer typ en typ av reg.exp sak.. typ for each eller? kan inte riktigt 100% av det :e
om htmlkoden ser ut så här:
<html>
<body>
bubidibubba
</body>
</html>
så gör du så här för att få ut "<body>bubidibubba</body>"
intStart = instr(strHtml, "<body>")
intStop = instrRev(strHtml, "</body>")
strHtml = Mid(strHtml,intStart,intStop)
Response.write strHtml
/ Mikul
bör man inte kunna det med "riktiga" regulära utryck?
Detta borde dock funka ;)
intStart = instr(strHtml, "<table width=""63%"" border=""0"" cellspacing=""0"" cellpadding=""0"">")
intStop = instrRev(strHtml, "</table>")
strHtml = Mid(strHtml,intStart,intStop)
Response.write strHtml
mm denna kod fungera :e fast lite väl effektivt.. jaja får försöka gå ner och lära mej detta :e men om man vill dela upp den mer än bara <table>TEXT<table> hur gör man då?
typ på <a href="länk.html"> jag vill dela upp där vid <a href="
och sen lägga till http://games-workshop.com/ där och sen kommer länken..
detta kör jag nu:
<%
Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objHTTP.Open "GET","http://us.games-workshop.com/warhammerworld/warhammer/skirmish/scenarios/scenarioslist_sort.asp?perpage=1000&other=&page=1&army=skaven&sort=Alpha", False
objHTTP.Send
strHTML=objHTTP.responseText
intStart = instr(strHtml, "<TABLE width=565><TR><td><P><FONT FACE=Arial SIZE=3>")
intStop = instrRev(strHtml, "</table>")
strHtml = Mid(strHtml,intStart,intStop)
Response.write strHtml
Set objHTTP = Nothing
%>
Testa att lägga en replace...
Replace(strHtml, "href=""/", "href=""http://games-workshop.com/")
Borde nog funka ;) :e
Funkade det? :l :q
hehe jepp.. och jag tror jag kan få reg.exp att fungera med nu :e
ska testa lite ikväll har inte tid just nu :e återkommer
mikul skrev:
Gött ;)
I så fall vill jag se hur ;) Måste ju lära mig nån gång ;)/ Mikul
Regular Expressions lär man sig inte. Eller njae, man lär sig liksom grunderna på ett ungefär, och sedan tar man dessa stora Regular Expressions-referensverk och kollar på dem. Eller?