[thelist] VBScript InStr type mismatch

[Chris at globet.com]

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 "start" argument is required if you use the "compare" argument.
Thus, the following should solve your issue:

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

Regards

Chris Marsh