Hej! Hejsan! Läsa från textfil?
Ska ta ut en del data från en textfil och undrar hur jag går till väga.
Använder mig av filesystemobject och öppnar filen och läser igenom den, så långt är jag med.
Sen vill jag bara plocka ut vissa delar från filen, exempelvis det som är innanför <header></header>.
Hur gör jag då.
Tacksam för svar
/MariaSv: Läsa från textfil?
Det här är en liten quick-n'-dirty-funktion som jag skrev ihop nyss...
<code>
Function GetValueFromTag(m_strData, m_strTag)
strRetValue = ""
' initiera regexpobjektet
Set objRE = New RegExp
objRE.IgnoreCase = True
objRE.Pattern = "\<" & m_strTag & "\>((.|\n)*)?\<\/" & m_strTag & "\>"
If objRE.Test(m_strData) Then
' Den matchar
' plocka ut värdet
Set objMatches = objRE.Execute(m_strData)
Set colMatch = objMatches(0)
strRetValue = colMatch.SubMatches(0)
Set objMatches = Nothing
End If
Set objRE = Nothing
' returnera värdet
GetValueFromTag = strRetValue
End Function
</code>
Och du anropar den på det här viset:
<code>
Response.Write GetValueFromTag(strData, "header")
' där strData är textfilens innehåll och "header" är själva taggen.
</code>
Om datorn skulle hänga sig när du kör funktionen, kan det bero på
1) alltför konstig data (funktionen slängde jag bara ihop snabbt nu för att du skulle ha något att utgå från) eller
2) den versionen av skriptmotorn inte är så haj på icke-glupska uttryck (non-greedy).
Hoppas det var till någon hjälp.
Lycka till och lev väl,
Tom S.