'********************************************************************
'*
'* Function IsString
'*
'* Author: NetworkAdminKB.com
'* Created: 2004-06-30
'* Modified: 2004-06-30
'*
'* Purpose: Checks if a variable is a string.
'*
'* Input: anyVar Any variable type.
'*
'* Output: True or False
'* True = The variable is a string
'* False = The variable is not a string
'*
'********************************************************************
Function IsString(anyVar)
'Version 1.0 2004-06-30
If VarType(anyVar) = 8 Then
IsString = True
Else
IsString = False
End If 'VarType(anyVar) = 8
End Function 'IsString
Article ID: 401, Created On: 9/25/2011, Modified: 9/25/2011