高手解答 用个判断删除日志分类

用vb判断删除日志分类 就是在删除日志分类的时候 判断一下当前分类下如果有日志和评论不能删除 如果没有可以删
附上 删除日志分类的相关：
Sub GetNewsClass()
'删除分类
if GetQueryString("action")="dele" then
strsql="delete from web_news_class where id="&GetQueryString("id")
conn.execute strsql

那你删除之前通过GetQueryString("id")
就去你有关的表里查询数据

先检查一下此分类下有没有日志
"select count(*) as newscount from 表名 where id =" & GetQueryString("id")
if rs("newscount") <> 0 then
  删除日志和评论
end if
删除分类