该连接不能用于执行此操作。在这种情况下它是关闭的或无效的

Question

您好，我需要此代码的帮助，它说：“该连接无法用于执行此操作。在这种情况下，该连接已关闭或无效。”但我已将其连接到数据库

可能是问题

    If rs.State = 1 Then rs.Close()
    rs.Open("SELECT * FROM `message`", Db, 2, 3)
    rs.AddNew()

    rs.Fields("Name").Value = txtfname.Text
    rs.Fields("section").Value = sctn.Text
    rs.Fields("instructor").Value = ins.Text
    rs.Fields("msg").Value = msg.Text



    rs.Update()
    rs.Requery()
    MsgBox("Successfully Added")
    txtfname.Clear()
    sctn.Clear()
    ins.Clear()
    msg.Clear()

    Me.Hide()
    frmmember.Show()

我希望它会被添加到数据库中，并将出现在sql enter image description here

中