在asp.net（VB.net）的下拉列表中选择后加载数据

我正在从mysql数据库表中读取数据。 我已经用相关的选项填充了一个下拉列表，我希望表单的其余部分在我选择车牌号后加载数据

数据在同一个表中

Sub getdata()
    Dim ds_vehicles As DataSet = GetDataSet("select * from tbl_vehicles where fld_ownerSNO='" & Session("logID") & "'", "tbl_v")
    DTPageData = ds_vehicles.Tables("tbl_v")
    ddl_plate.DataSource = ds_vehicles.Tables("tbl_v")
    ddl_plate.DataTextField = "fld_plate"
    ddl_plate.DataValueField = "fld_vno"
    ddl_plate.DataBind()

End Sub

Protected Sub ddl_plate_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddl_plate.SelectedIndexChanged

    'Dim ds_vehicles2 As DataSet = GetDataSet("select * from tbl_vehicles where fld_ownerSNO='" & Session("logID") & "' and fld_vin=" & sel_vno & "", "tbl_v2")
    'lbl_vin.Text = ds_vehicles2.Tables("tbl_v2").Rows(0).Item("fld_vin")

End Sub

Public Shared Function GetDataSet(ByVal cmdStr As String, ByVal tblName As String) As Data.DataSet
    OpenRemoteDataConnection()
    GetDataSet = New Data.DataSet
    Dim sqlcmd As New MySqlCommand(cmdStr, RConn)
    Dim sqladp As New MySqlDataAdapter
    sqladp.SelectCommand = sqlcmd
    sqladp.Fill(GetDataSet, tblName)
    CloseRemoteConnection()
End Function


Public Shared Sub OpenRemoteDataConnection()
    If RConn.State = Data.ConnectionState.Open Or RConn.State = Data.ConnectionState.Connecting Then RConn.Close()
    RConn = New MySqlConnection(dataFilePath)
    RConn.Open()
End Sub


Public Shared Sub CloseRemoteConnection()
    If RConn.State = Data.ConnectionState.Open Then RConn.Close()
End Sub

我正在使用ablove类来连接数据源

已存在与此连接关联的打开的DataReader，必须先关闭该连接

---

我正在通过我编写的一个类向dbase读/写，该类100%工作。

错误清楚地表明，您试图同时使用相同的连接做两件事

---

根据数据库类的问题，请不要共享连接或关闭数据读取器。

否；这不是100%有效。您有SQL注入漏洞。我正在类中使用函数GetDataSet打开和关闭数据库，以便在选择下拉列表时不会连接数据库。不要使用共享连接。那是你的问题。我正在关闭那个被破坏的连接。。。Public Shared Sub CloseRemoteConnection（）请参阅我在上面添加的代码…@user1264748:是的，但如果您同时收到两个请求，您的代码将严重失败。不要使用共享连接。