[thelist] VBScript InStr type mismatch

[Canfield, Joel]

Using InStr and getting a type mismatch from the first line of this bit:

If (InStr(strKaiserPlanIDs,strPlanNumberString,1)) Then
	bitKaiserPlan = bitKaiserPlan + 1
End If

The variable values giving the error are

strKaiserPlanIDs = 011|012|510|515|520|
strPlanNumberString = B02

InStr isn't particularly mysterious; in this case, obviously it'll
return zero 'cause it's not found, but I don't understand the 'type
mismatch'

These return the same error:

response.write(InStr(strKaiserPlanIDs,strPlanNumberString,1) & "<br />")

If (InStr(strKaiserPlanIDs,strPlanNumberString,1) > 0) Then
	bitKaiserPlan = bitKaiserPlan + 1
End If

thanks

joel