vbscript 数据库执行标量

Posted 2021-05-21

Public Shared Function GetCountByStatusID(_statusID As Integer) As Integer
    Dim count As Integer = 0

    Using con As New MySqlConnection(DHO.ConnectionString_Main)
        Using cmd As New MySqlCommand("Master_CountByStatusID", con)
            cmd.CommandType = CommandType.StoredProcedure
            cmd.Parameters.AddWithValue("@_statusID", _statusID)
            con.Open()
            count = Convert.ToInt32(cmd.ExecuteScalar())
        End Using
    End Using

    Return count
End Function