Søg i en *.txt fil

Prøv om dette kan bruges.
Husk at rette /dinfolder/test.txt
------------------------------------
<html>
<body>
<%
Dim fso, f, filespec
Set fso = CreateObject(\"Scripting.FileSystemObject\")
filespec = Server.Mappath(\"/dinfolder/test.txt\")
Set f = fso.OpenTextFile(filespec,1)

\' Spring de 2 første linier over
For intLine = 1 to 2
  f.SkipLine
Next

\' Læs den 3. linie og dan array ved split efter komma
arrM = Split(f.ReadLine,\",\")

\' Gennemløb array
For t = LBound(arrM) to UBound(arrM)
  v_tekst = arrM(t)
  v_pos  = instr(v_tekst,\'sv_contact\')
  if v_pos > 0 then
    response.write arrM(t)
  end if
Next

f.Close
%>
</body>
</html>

Ups, lidt småfejl. Men her er en tilrettet version:

<html>
<body>
<%
Dim fso, f, filespec
Set fso = CreateObject(\"Scripting.FileSystemObject\")
filespec = Server.Mappath(\"test.txt\")
Set f = fso.OpenTextFile(filespec,1)

\' Spring de 2 første linier over
For intLine = 1 to 2
  f.SkipLine
Next

\' Læs den 3. linie og dan array ved split efter komma
arrM = Split(f.ReadLine,\",\")

\' Gennemløb array
For t = LBound(arrM) to UBound(arrM)
  v_tekst = arrM(t)
  v_pos  = instr(v_tekst,\"sv_contact\")
  if v_pos > 0 then
    response.write arrM(t)
  end if
Next


f.Close
%>
</body>
</html>

det ser rigtig godt ud, men lige nu skriver den sv_contact=blabla

kan man ikke få den til bare at skrive blabla ?

<html>
<body>
<%
Dim fso, f, filespec
Set fso = CreateObject(\"Scripting.FileSystemObject\")
filespec = Server.Mappath(\"test.txt\")
Set f = fso.OpenTextFile(filespec,1)

\' Spring de 2 første linier over
For intLine = 1 to 2
  f.SkipLine
Next

\' Læs den 3. linie og dan array ved split efter komma
arrM = Split(f.ReadLine,\",\")

\' Gennemløb array
For t = LBound(arrM) to UBound(arrM)
  v_tekst = arrM(t)
  v_pos  = instr(v_tekst,\"sv_contact=\")
  if v_pos > 0 then
    v_len = len(v_tekst)
    response.write mid(v_tekst,12,v_len-11)
  end if
Next

f.Close
%>
</body>
</html>

Kan du bruge det?

//Claus

Sorry jeg har fuldstændig glemt spørgsmålet.... jo det var helt fint

Det er bare OK. Tak for pointne ;o)

//Claus