Hejsa.
Jeg har følgene kode til at søge en textfil igennem for en
bestemt streng og derefter skriver alle de linjer i filen der
indeholder strengen.
<%
'Get querystring
relval = request.querystring("1h")
'Søg i fil
'Set F-objekt
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("/product.txt")
Set f = fso.OpenTextFile(filespec,1)
' Læs linie for linie indtil slutningen af filen
Do While not f.AtEndOfStream
arrayblop = split(f.readline,";")
stringex = arrayblop(6)
if instr(stringex, relval1) > 0 then
response.write(stringex)
response.write("<br>")
end if
Loop
f.Close
%>
Mit spørgsmål lyder så.
Er der nogen der kender en metode til at gøre InStr ligeglad med
at det er lowercase der står i querystringen?
Min navne i filen står starter med store bogstaver, og det nyttet
jo ikk nogen hvis den så ikke finder dem.
På forhånd tak!
--
Mvh Mads
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials