如题，在下面红色字上边纠结了好一会...
IsObject 函数 返回 Boolean 值，指出标识符是否表示对象变量。语法IsObject(identifier)必要的 identifier 参数是一个变量名。说明IsObject 只用于确定 Variant 是否属于 VarType vbObject。如果 Variant 实际引用（或曾经引用过）一个对象，或者如果 Variant 包含 Nothing，则可能出现这种情况。如果 identifier 是 Object类型或任何有效的类类型，或者，如果 identifier 是 VarType vbObject 的 Variant 或用户自定义的对象，则 IsObject 返回 True；否则返回 False。即使变量已设置成 Nothing，IsObject 也仍返回 True。使用错误捕获方法可以确认对象引用是否有效。
示例: IsObject 函数决定标识符是否代表对象变量： Dim MyInt, MyCheck, MyObject Set MyObject = Me MyCheck = IsObject(MyObject) ' 返回 True。MyCheck = IsObject(MyInt) ' 返回 False。
附两判断对象是否关闭和释放的方法：
1、是否关闭
如果 conn.state=1 未关闭，否则为关闭
2、是否释放
Response.Write(typeName(conn)) '结果Nothing
如果 typeName(conn) = “Nothing” 为释放，否则未释放 这里不能用nothing，因为是判断字符串
用IsObject的话释放了，还是返回True 原因见上
发表评论