表中已有记录为什么还能删除？

fxcxg · 发表于 2006-2-19 21:30:00

在设置中，表中已有记录为什么还能删除？

先谢！！！

fan0217 · 发表于 2006-2-19 21:43:00

不太明白你的问题，删除是指删除什么呢？

fxcxg · 发表于 2006-2-19 22:16:00

〔科室设置〕中删除按钮事件，如果jkzb表已有记录不能删除。可还是能删除，我的意思jkzb表已有记录，提示不能删除。

谢谢！！

fxcxg · 发表于 2006-2-19 22:25:00

〔科室设置〕中删除按钮事件，如果jkzb表已有记录不能删除。可还是能删除，我的意思jkzb表已有记录，提示不能删除。

谢谢！！

一点通 · 发表于 2006-2-20 00:31:00

更改一下试试

If MsgBox("请确定是否删除该科室？", 4 + 32, "证件发放管理") = 6 Then
If Not IsNull(DLookup("[科室代码]", "jkzb", "[科室代码] = Forms!科室设置!dm")) Then
MsgBox "该科室已经使用不能删除！", vbInformation, "证件发放管理"
Else
DoCmd.RunSQL "DELETE 科室.* from 科室 WHERE 代码 = forms!科室设置!dm;"
kssz.RowSource = "SELECT [科室].[代码], [科室].[科室] FROM 科室; "
Me!dm = ""
Me!ks = ""
save.Enabled = False
End If
Else
End If

fxcxg · 发表于 2006-2-20 22:10:00

谢谢一点通版主！！！

成功！！

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] 表中已有记录为什么还能删除？

本帖子中包含更多资源

在问

群介绍
主题无相 (随机显示版	同地区群块其他地区)