Search word in File

Question

User1109811461 posted

Hi all,

i'm using this following code to find specific key word in my notepad but it did not work, i only can find the first keyword, second and third cannot..my keyword is structure in sequence as follows:

test1

test2

test3

For Each line As String In File.ReadLines("D:\String.txt")
If line.Equals(Request.ServerVariables("QUERY_STRING")) Then
Response.Redirect("testpage.aspx")
Else

End If
Next line

 Thanks. need help.

Answer 1

User475983607 posted

i'm using this following code to find specific key word in my notepad but it did not work, i only can find the first keyword, second and third cannot..my keyword is structure in sequence as follows:

The code is designed to redirect when the first string is found.  Try the following approach.  

Dim count as Integer = 0
For Each line As String In File.ReadLines("D:\String.txt")
	If line.Equals(Request.ServerVariables("QUERY_STRING")) Then
		count = count + 1
	End If
Next line

If count > 0 Then
	Response.Redirect("testpage.aspx")
End If

Answer 2

User1109811461 posted

Hi  mgebhard

Thanks you so much for your help. The code work for me.

Thanks again.