各位老师：

我做了个LoadUserSetting中的用户验证，用户通过SQL数据库验证用户是否存在，代码如下

    Dim cmd As New SQLCommand
    Dim dt As DataTable
    \'Dim dr As DataRow = e.DataRow
    cmd.C
    cmd.CommandText = "SELECT * From {员工信息库} Where [姓名] =  \'" & User.Name & "\'"
    dt = cmd.ExecuteReader
    If dt.DataRows.Count > 0 Then    
Else
messagebox.show("此账户已停用!")
Syscmd.Project.Exit()
End If

不知为何有错误 提示，我看了下 和菜单有关，请问各位老师，这是啥错误 ？

未定义外部数据源

哦，这样啊，不过我原来做的不用外部数据源比对用户，是将外部表加载到项目中，然后比对user.name就可以，使用了连接外部数据源后就出错了，估计是这个冲突，那狐爸，我想比对当前user.name 是否有SQL表中存在，在哪个事件中比较好呢？

感谢回复，代码贴上来好像数据源指向没了，在我项目中的代码还存在，我估计是狐爸说的差不多。 loadusersetting和关闭项目的冲突

建议用ACCESS作为外部数据源，大家也可以帮你调试。

一楼的这种判断似乎用ExecuteScalar直接返回值更合理些，如：

Dim cmd As New SQLCommand
cmd.CommandText = "Select Count(姓名) From {员工信息库} Where [姓名] = \'" & User.Name & "\'"
If cmd.ExecuteScalar() = 0 Then
    MessageBox.show("此账户已停用!")
End If

感谢lihe60老师，等我做个例子请各位老师帮研究下。

感谢CZY老师，好像教过我 ExecuteScalar的使用方法，问过一个id单号SQL后台判断不存在问题，再次谢谢老师！