2011-07-26 24 views
1

我遇到了一个问题,在我的数据库中,我有一列是0或1,指定用户是管理员还是帐户被暂停或不是。而在我的VB代码中,我试图找回那一点。示例代码:在VB NET中从SQL数据库检索一个位列

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,如果这样的存在我找不到它。因此,我希望能够做出快速反应。

回答

1

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

+0

谢谢你,我希望它会被指定的地方:) – Angie

0

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

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

谢谢你的建议,但是这不是我的问题:) – Angie

2

使用GetBoolean

虽然没有 “布尔” SQL数据类型,位映射到.NET布尔

2

你想

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"))