webForumDet fria alternativet

Problem med delning

ASP

3 svar · 248 visningar · startad av lbrink

Medlem sedan aug. 200160 inlägg
Frågan#1

Hejsan!
Sitter här och jobbar med ett "nyhetsscript" som hämtar nyheter från andra sajter och behöver nu lite hjälp med en.
Såhär ser min kod ut.

<%
Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objHTTP.Open "GET","http://www.idg.se/100senaste.asp", False

objHTTP.Send
strHTML=objHTTP.responseText
Set objHTTP = Nothing

Set objRegExp = New regexp
objRegExp.Global = true
objRegExp.IgnoreCase = true
objRegExp.Pattern = "<a href=""/ArticlePages/.*</a>"
Set hittade = objRegExp.Execute(strhtml)

For each item in hittade
Response.Write item.value & "<br>"
Next
%>

Nu till problemet, jag får ut ett sträng som ser ut exempelvis såhär:
<a href="/ArticlePages/200309/19/20030919170323_PFA/20030919170323_PFA.dbp.asp" class="UTopp2Rubr">Microsft blir stämda igen</a>

Nu vill jag kunna dela upp denna sträng, så att
/ArticlePages/200309/19/20030919170323_PFA/20030919170323_PFA.dbp.asp
blir en egen variabel jag kan skriva in i databasen och
"Microsft blir stämda igen" likaså.

Några förslag på hur jag ska lösa detta?

Medlem sedan juni 200032 967 inlägg
#2

Tja, om strängen ser ut precis så där kan du ju alltid prova att splitta på citationstecken.

strURL = Split(item.Value, """")(1)

Mvh

Medlem sedan aug. 200160 inlägg
#3

@nders:
Tackar, det där funkade helt utmärkt.

Medlem sedan juni 200032 967 inlägg
#4

Trevligt att vara till hjälp. :)

Mvh

254 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
118 ms — ändringar (db)