gpt4 book ai didi

mysql - 从数据库中检索空日期到 vb.net

转载 作者:行者123 更新时间:2023-11-28 23:59:08 30 4
gpt4 key购买 nike

我在将空日期从我的数据库恢复到 vb.net 中的日期选择器时遇到问题。

我能够在 mysql 中保存一个空值的日期,但无法将其检索到日期选择器。

我试过这段代码,但它不起作用。

  If reader.IsDBNull(0) Then
Return
Else
refdate.Text = reader.GetString("refdate")
End If

我的检索代码是

 Try

If e.RowIndex >= 0 Then

Dim row As DataGridViewRow
row = Me.DataGridView1.Rows(e.RowIndex)
forid.Text = row.Cells("id").Value.ToString

Try
connection.Open()
Dim sel As String

sel = "select * from recordtracker where id ='" & forid.Text & "'"
com = New MySqlCommand(sel, connection)
reader = com.ExecuteReader

While reader.Read

Cancel.Show()
Clear.Hide()
rdate.Enabled = False
rfromtbx.Enabled = False

doctype.DropDownStyle = ComboBoxStyle.DropDown


ID.Text = reader.GetInt32("id")
doctype.Text = reader.GetString("Type_of_Document")
itemtbx.Text = reader.GetString("Items")
rfromtbx.Text = reader.GetString("Received_From")
rdate.Text = reader.GetString("Received_Date")
remarks.Text = reader.GetString("Remarks")
margnote.Text = reader.GetString("Marginal_Note")
reftotbx.Text = reader.GetString("Referred_To")
acttaken.Text = reader.GetString("Action_Taken")

'refdate.Text = reader.GetString("refdate")

'If reader.Read() Then
If reader.IsDBNull(0) Then
Return
Else
refdate.Text = reader.GetString("refdate")
End If
Delete.Show()
' End If
End While

Catch ex As Exception
MsgBox(ex.Message)
End Try

感谢任何帮助。

最佳答案

为了将来使用,这是提问者需要的答案。

reader.IsDBNull(0) 获取索引零的值,我认为 refdate 不在第一个索引中。

使用reader.GetString("refdate")获取String值;因此,当检索 null 值时,它会返回错误,因此最好使用 isDbNull(reader("refdate")) 检查字段是否为 null。要获取字符串值,您可以简单地使用 reader("refdate").toString

关于mysql - 从数据库中检索空日期到 vb.net,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/30565836/

30 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com