Office中国论坛/Access中国论坛

标题: [已解决]条件表达式 [打印本页]

作者: yexiangzi 时间: 2009-4-1 20:36
标题: [已解决]条件表达式
本帖最后由 yexiangzi 于 2009-4-1 22:14 编辑

请问各位大大, 当table1存在,执行query1的宏的条件表达式该怎么写? query1 sql= drop table1

作者: Henry D. Sy 时间: 2009-4-1 20:40
是不是当库中存在着table1表就删除掉他？？

作者: yexiangzi 时间: 2009-4-1 20:57
是呀, 就是这样

作者: Henry D. Sy 时间: 2009-4-1 21:02
那就先判断后删除

作者: Henry D. Sy 时间: 2009-4-1 21:07
Dim tbl As DAO.TableDef
For Each tbl In CurrentDb.TableDefs
      If tbl.Name = "table1" Then
         CurrentDb.Execute "DROP TABLE table1"
         Exit For
      End If
Next

作者: yexiangzi 时间: 2009-4-1 21:08
...... 就是想问一下那个判断的表达式该怎么写? =.=

作者: Henry D. Sy 时间: 2009-4-1 21:14

...... 就是想问一下那个判断的表达式该怎么写? =.=
yexiangzi 发表于 2009-4-1 21:08

作者: ACMAIN_CHM 时间: 2009-4-1 21:19

ACCESS中无法通过jet-sql来实现这个判断。VBA中可以如下。

if not isnull(dlookup("id","msysobjects","name='table1'")) then
currentproject.execute "drop talbe table1"

******************
* 一切皆有可能 *
******************
.
ACMAIN - Access论坛回贴准则（个人）.
.
同一贴子不回复第二次

作者: yexiangzi 时间: 2009-4-1 21:29
本帖最后由 yexiangzi 于 2009-4-1 22:12 编辑

谢谢各位大大的帮忙

作者: 阿六爱狗 时间: 2009-4-3 11:04
学习下

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)