InStr and non-case sensitive

Snitz™ Forums 2000
https://forum.snitz.com/forumTopic/Posts/68915?pagenum=1
05 November 2025, 07:06

Topic


bobby131313
InStr and non-case sensitive
11 September 2009, 21:25


I need to find any instance of Yandex regardless of case in "AffAgent" which is the user agent. Did some Googling and came up with the following but I don't think it's working.
Code:

Dim AffAgent : AffAgent = Request.ServerVariables("HTTP_USER_AGENT") 
If InStr(1, AffAgent, "Yandex", VBTextCompare) > 0 Then
Do something End If

Does it look like it should or did I google some bum info?

 

Replies ...


AnonJr
11 September 2009, 22:49


It looks like it should... are you sure its not working? I ask only because I spent an hour today troubleshooting "missing" records that were missing because I mis-typed the date range...
As a side note, I tend to use <> 0 instead of > 0 - not that it should matter.
bobby131313
11 September 2009, 23:16


are you sure its not working?

No, not positive. Just figured I'd check that first. This code is to intercept ignorant bots that follow affiliate links and send them through a non-affiliate link so my stats don't get skewed. One of my sites that usually get about 400 clicks a day to this particular affiliate is now at over 1,100 for today with about 4 hours left.
Guess I'll be going through some log files tomorrow. dead I may just have a new ignorant bot on my hands.
Thanks for your help!
Doug G
13 September 2009, 23:48


You can control whether instr does a case-sensitive comparison or not

http://msdn.microsoft.com/en-us/library/wybb344c(VS.85).aspx
Doug G
13 September 2009, 23:49


Originally posted by Doug G
You can control whether instr does a case-sensitive comparison or not

http://msdn.microsoft.com/en-us/library/wybb344c(VS.85).aspx

EDIT: Hmm, snitz here doesn't seem to like the above URL, textually it's
Code:
http://msdn.microsoft.com/en-us/library/wybb344c(VS.85).aspx
copied from my firefox address bar while viewing the page.
EDIT2: Sheesh! Even inside CODE tags the url tries to become a broken link.
AnonJr
14 September 2009, 15:42


Originally posted by Doug G
You can control whether instr does a case-sensitive comparison or not
Looks like he already is since he's using vbTextCompare...
Carefree
15 September 2009, 01:59


An alternate approach is to do a forced lower-case comparison like this:
Code:
	if inStr(lcase(AffAgent),"yandex") then
AnonJr
15 September 2009, 11:39


Originally posted by Carefree
An alternate approach is to do a forced lower-case comparison like this:
Code:
	if inStr(lcase(AffAgent),"yandex") then
Using vbTextCompare makes it a case-insensitive comparison... If you don't have some test data that has known positives and known negatives, it doesn't matter what you try as you will never know if its working.
bobby131313
15 September 2009, 13:07


Thanks everyone. It appears my code is working. The clicks were due to IE5 downloading for "off-line" viewing. Got that addressed now after trudging through the logs.
© 2000-2021 Snitz™ Communications