我正在嘗試使用 GROUP BY 陳述句獲取資料:
SELECT nama_penerbit
FROM DigitalBook.digitalbook.ebook
ORDER BY nama_penerbit
并存盤此值。
使用 navicat

但是當我嘗試在 VB.NET 中進入控制器時沒有得到值:
<Route("api/Ebooks/GetAllPenerbit")>
<HttpGet>
Function GetAllPenerbit() As Results.JsonResult(Of List(Of ebook))
Dim kategoriEbookRepository As New EbookReposity
Dim d = kategoriEbookRepository.PenerbitEbookRepository()
Return Json(d)
End Function
這是我的模型課:
Public Function PenerbitEbookRepository() As List(Of ebook)
Dim sql = "Select nama_penerbit From Digitalbook.digitalbook.ebook Group by nama_penerbit"
Dim datas As New List(Of ebook)
Try
datas = db.Database.SqlQuery(Of ebook)(sql).ToList
Catch ex As Exception
End Try
Return datas
End Function

這是我的課
<Table("digitalbook.ebook")>
Partial Public Class ebook
<Key>
<StringLength(50)>
Public Property id_ebook As String
<StringLength(500)>
Public Property judul As String
Public Property id_kategori_ebook As Guid?
<StringLength(255)>
Public Property pengarang As String
<StringLength(255)>
Public Property nama_penerbit As String
End Class
uj5u.com熱心網友回復:
我創建了一個具有相同屬性的新類,然后我在控制器和模型上使用它,它作業正常
這是我的新課
Partial Public Class getebook
Public Property id_ebook As String
Public Property judul As String
Public Property id_kategori_ebook As Guid?
Public Property pengarang As String
Public Property nama_penerbit As String
End Class
我的控制器
<Route("api/Ebooks/GetAllPenerbit")>
<HttpGet>
Function GetAllPenerbit() As Results.JsonResult(Of List(Of getebook))
Dim kategoriEbookRepository As New EbookReposity
Dim d = kategoriEbookRepository.PenerbitEbookRepository()
Return Json(d)
End Function
我的模特
Public Function PenerbitEbookRepository() As List(Of getebook)
Dim sql = "Select Distinct nama_penerbit From Digitalbook.digitalbook.ebook"
Dim datas As New List(Of getebook)
Try
datas = db.Database.SqlQuery(Of getebook)(sql).ToList
Catch ex As Exception
End Try
Return datas
End Function
轉載請註明出處,本文鏈接:https://www.uj5u.com/net/491794.html
