如何解决vb6.0中运行时错误3704？

就像yugal一样，当对象关闭时，我得到了错误3704操作不允许。 请帮我解决我的系统的这个问题。。 这是我的代码：

Private Sub cmdLog_Click()
txtUser.SetFocus
frmChange.txtusern = txtUser
If txtUser <> "" And txtpass <> "" Then
    **Set rsenrol = cnenrol.Execute("Select * from tblUsers where username = '" & txtUser & "'and password='" & txtpass & "'")**[this is where the error occur]
    If csenrol.EOF = False Then
    MsgBox "Welcome " & txtUser & "!!", vbInformation, "Welcome User"
            txtUser = ""
            txtpass = ""
            Unload Me
            MDIfrm.Show
         Else
         MDIfrm.Visible = False
            MsgBox "Incorrect Username and/or Password. Please verify and Click Retry.", vbRetryCancel, "Log in Error"
            txtpass = ""
            txtUser.SetFocus
            Exit Sub
        End If
Else
    MsgBox "Sorry, I cannot identify you.", vbExclamation, "Intruder Alert"
    MDIfrm.Visible = False
    Exit Sub
End If
End Sub

Private Sub cmdLog\u Click（）
txtUser.SetFocus
frmChange.txtsern=txtser
如果TXTSER“”和txtpass“”，则
**设置rsenrol=cnenrol.Execute（“从tblUsers中选择*，其中username='”&txtser&“'和password='”&txtpass&“”）**[这就是发生错误的地方]
如果csenrol.EOF=False，则
MsgBox“欢迎”和txtUser&“！！”，vbInformation，“欢迎用户”
txtUser=“”
txtpass=“”
卸下我
MDIfrm.Show
其他的
MDIfrm.Visible=False
MsgBox“用户名和/或密码不正确。请验证并单击“重试”。、vbRetryCancel、“登录错误”
txtpass=“”
txtUser.SetFocus
出口接头
如果结束
其他的
MsgBox“对不起，我无法识别您的身份”，VBE感叹词，“入侵者警报”
MDIfrm.Visible=False
出口接头
如果结束
端接头

谢谢，

---

alex。

发生错误是因为您试图用execute命令打开一个“SELECT”记录集，这用于“INSERT，UPDATE”等操作查询。在这种情况下，您需要用ADO记录集使用.open命令。

发生错误是因为您试图打开一个“SELECT”带有execute命令的记录集，用于诸如“INSERT，UPDATE”等操作查询。在这种情况下，您需要在ADO记录集中使用.open命令。

欢迎使用StackOverflow。你的问题很令人困惑。首先，您在问题标题中提到VB6，并发布VB代码，但您的标签上写着“android”。因为VB6和Android没有混合，所以没有意义。第二，你说“就像尤戈尔一样”，但你所指的东西没有任何联系，所以我们知道它是什么。第三，您不会发布一个实际的问题，而只是一堆代码和一个错误的引用。请编辑它并包含更多信息，并使用与所问问题相关的适当标记对其进行标记。谢谢。你能告诉我们错误是在哪一行引起的吗？Unload.Me在我看来很可疑。所以这个错误与stars有关**？我还担心使用这种代码的SQL注入。使用参数查询会更安全。。。但这只是一个离题的建议。欢迎来到StackOverflow。你的问题很令人困惑。首先，您在问题标题中提到VB6，并发布VB代码，但您的标签上写着“android”。因为VB6和Android没有混合，所以没有意义。第二，你说“就像尤戈尔一样”，但你所指的东西没有任何联系，所以我们知道它是什么。第三，您不会发布一个实际的问题，而只是一堆代码和一个错误的引用。请编辑它并包含更多信息，并使用与所问问题相关的适当标记对其进行标记。谢谢。你能告诉我们错误是在哪一行引起的吗？Unload.Me在我看来很可疑。所以这个错误与stars有关**？我还担心使用这种代码的SQL注入。使用参数查询会更安全。。。但这只是一个离题的建议。