Question

我遇到了一个问题，我的数据库中有一个列为0或1的列，指定用户是管理员还是帐户被暂停。在我的VB代码中，我试图检索那一点。示例代码：

    Dim dtRequests As DataTable
    dtRequests = New DataTable("Users")
    dtRequests.Columns.Add("SESLoginID", System.Type.GetType("System.Int32"))
    dtRequests.Columns.Add("fullname", System.Type.GetType("System.String"))
    dtRequests.Columns.Add("SESSuspended", System.Type.GetType("System.Byte"))
    dtRequests.Columns.Add("SESAdmin", System.Type.GetType("System.Byte"))
    dtRequests.Columns.Add("OfficeName", System.Type.GetType("System.String"))

    cmdoledb = New SqlCommand("SELECT SESLoginID, SESFirstName + ' ' + SESLastName As fullname , SESSuspended, SESAdmin, OfficeID from SESLogin where (SESEmail Like '%" & keyword & "%' or SESFirstName + ' ' + SESLastName like '%" & keyword & "%' or SESLastName like '%" & keyword & "%') order by SESFirstName;", objConnect)
    cmdoledb.Parameters.AddWithValue("@pid", pid)
    objConnect.Open()

    Dim rdr As SqlDataReader
    Dim myItem As ListItem = New ListItem()
    rdr = cmdoledb.ExecuteReader()

    While rdr.Read()
        Dim newrow As DataRow
        newrow = dtRequests.NewRow
        newrow.Item("SESLoginID") = rdr.GetInt32(0)
        newrow.Item("fullname") = rdr.GetString(1)
        newrow.Item("SESSuspended") = rdr.GetByte(2)  // Specified cast is not valid.
        newrow.Item("SESAdmin") = rdr.GetByte(3) // Specified cast is not valid.

        Dim officeid As Integer = rdr.GetInt32(4)
        Dim officename As String = ""

        cmdldb = New SqlCommand("SELECT OfficeName from Office where OfficeID = @offid", objConnected)
        cmdldb.Parameters.AddWithValue("@offid", officeid)
        objConnected.Open()

        officename = cmdldb.ExecuteScalar()
        newrow.Item("OfficeName") = officeid
        objConnected.Close()
        dtRequests.Rows.Add(newrow)
    End While

我试过得到rdr.GetByte（3），这告诉我演员无效，但是没有任何函数会说GetBit，如果存在，我找不到它。因此我希望快速回应。

Answer 1

尝试使用rdr.GetBoolean(3)获取位值。 SQL Server中的一点与VB中的布尔值相同，除了它使用1和0而不是true和false。

Answer 2

使用GetBoolean

虽然没有“布尔”SQL数据类型，但是位映射到.net boolean

Answer 3

你想要

  newrow.Item("SESSuspended") = rdr.GetBoolean(2)
  newrow.Item("SESAdmin") = rdr.GetBoolean(3)

您还应该更改这些行

  dtRequests.Columns.Add("SESSuspended", System.Type.GetType("System.Byte"))
  dtRequests.Columns.Add("SESAdmin", System.Type.GetType("System.Byte"))

到

dtRequests.Columns.Add("SESSuspended", System.Type.GetType("System.Boolean"))
dtRequests.Columns.Add("SESAdmin", System.Type.GetType("System.Boolean"))

Answer 4

您可以指定数据项的名称而不是索引。如：

newrow.Item("SESSuspended") = rdr("SESSuspended")

从VB NET中的sql数据库中检索位列

4 个答案: