VBScript / ASP String Validate

Check if string contains a value (not Null and not empty)

Function StringVal(strval)
    If Not(IsNull(strval)) And Trim(strval) <> "" Then
        StringVal = True
    End If
End Function