木子屋 Dnawo's BLOG

怎么判断一个对象是否已被释放

👤 dnawo 📅 2007-11-01 👁 4649 👍 0 💬 0 🔄 本站原创
<%
Dim conn'声明
Set conn = Server.CreateObject("ADODB.Connection")'创建
'使用
Set conn = Nothing'释放
%>

我们通常用如上的形式来创建一个对象,并使用和释放它,问题是我们怎么去判断一个对象是否已被释放了呢?用isObject可以吗?我们来试下:

<%
Dim conn
Response.Write(isObject(conn)) '结果为False
Set conn = Server.CreateObject("ADODB.Connection")
Response.Write(isObject(conn)) '结果为True
Set conn = Nothing
Response.Write(isObject(conn)) '结果为True
%>

可见并不能使用isObject来判断一个对象是否已被释放,那我们用varType或typeName函数来试试看:

<%
Dim conn
Response.Write(typeName(conn)) '结果Empty
Set conn = Server.CreateObject("ADODB.Connection")
Response.Write(typeName(conn)) '结果Connection
Set conn = Nothing
Response.Write(typeName(conn)) '结果Nothing
%>

所以,判断一个对象是否被释放我们应用:typeName(conn)="Nothing"(一定要用Nothing不能用nothing)

评论(0)

暂无评论。

计算题
评论需审核通过后显示
← 上一篇 初学者来认识OLEDB和ODBC的区别 下一篇 → 解决DLL组件注册成功但无法使用的问题