判断表是否存在-----------------------------在线等!

akxiang 发布于 2008-05-16 16:49， 561 次点击

请指教:
功能是这样的,输入一个"表单名称",然后通过这个名称,在指定的数据库里去查询,如果有以输入"表单名称"的表,就打开这个表,如果没有就提示,没有找到.

请帮忙,先谢谢啦!

5 回复

tianyu1232008-05-16 18:26

<%
dim str
str="admin"
On Error Resume Next '打开错误处理功能
set rs=server.createobject("adodb.recordset")
sql="select * from "& str
rs.open sql,conn,1,1
if err.number<>0 then
   response.write"表不存在!"
On Error GoTo 0 '关闭错误处理功能
else
  response.write"表存在!"
  '输出表中的内容
  On Error GoTo 0 '关闭错误处理功能
end if
%>

akxiang2008-05-16 19:34

先谢谢了.我去试一下.!

akxiang2008-05-16 20:01

谢谢了,我改了一下,OK了.太感谢了!

jankerli2008-05-17 13:47

我也来学习一下了,呵呵

lxn3485672482008-05-17 18:01

问个问题了.

是不是不加on error resume next 程序就不能运行了(我只针对这个程序了.).能解释一下为什么吗?