VBScript - søgning efter tekst streng

Mener du filer på serveren ??? i så fald skal der bruges server-side scripting... (ex ASP)

Michael

Det skal bruges på et lokal net, hvor html siden ligger på maskinen og filerne på et netværks drev.

ASP-script er helt klart den bedste løsning. Prøv at tjekke www.netcoders.dk og
www.activeserverpages.dk for at læse lidt om det.

Jeg kender godt ASP, men har ikke mulighed for at bruge det i denne situation.

Hvis du har adgang til netværksdrev kan du bruge Files-objektet i VBScript. Det burde man kende fra ASP:

Function TextStreamTest
  Const ForReading = 1, ForWriting = 2, ForAppending = 3
  Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
  Dim fso, f, ts
  Set fso = CreateObject("Scripting.FileSystemObject")
  fso.CreateTextFile "test1.txt"            'Create a file
  Set f = fso.GetFile("test1.txt")
  Set ts = f.OpenAsTextStream(ForReading, TristateUseDefault)
  TextStreamTest = ts.ReadLine
  ts.Close
End Function

Denne funktion kan du bruge til at åbne filen. Derefter kan du bruge InStr funktionen til at søge i strengen.

Lukket