如何通过vb.net代码在SQL Server 2008的DATETIME字段中插入NULL值 [英] How to insert a NULL value in a DATETIME field in SQL server 2008 via vb.net code

问题描述

这是我用来保存id和日期的代码。

如果我没有给出datetextbox的值，它将作为系统的默认日期时间。

我想要如果我没有为datetextbox提供任何值，它会在sql中存储一个空值。请给出编码

 SaveID（IDTextbox.text，DateTextbox.text）
私人函数SaveID（ByVal ID As < span class =code-sdkkeyword> String ，ByVal Date As DateTime）
 SaveID = False 
尝试
 Me.MySqlConnect（My.Settings.AAConnectionString）
 Dim MySqlCmd As SqlClient.SqlCommand 
 MySqlCmd = New SqlCommand（  INSERT INTO [AA]。[dbo]。 [tbl_ID]（[ID]，[Date]）VALUES（@ ID ,, @ Date），Me.Connection）
 MySqlCmd.Parameters.Add（New SqlParameter（  @ ID，SqlDbType.NVarChar， 10 ））
 MySqlCmd.Parameters（  @ ID）。Value = ID 
 MySqlCmd.Parameters .Add（New SqlParameter（  @ Date，SqlDbType.DateTime））
 MySqlCmd.Parameters（  @ Date）。Value = Convert.ToDateTime（Date）
 MySqlCmd.CommandType = CommandType.Text 
 MySqlCmd.ExecuteNonQuery（）
 Me.Connection.Close（）
 SaveID = True 
 Catch e As Exception 
 MsgBox（e。消息）
结束尝试
 END函数

解决方案

为什么不使用 Nullable（Of DateTime） [ ^ ]？

使用这个代码它在SQL中存储空白





SaveID（IDTextbox.text，DateTextbox.text）

私有函数SaveID（ByVal ID为字符串，ByVal日期为DateTime）

SaveID = False

尝试

Me.MySqlConnect（My.Settings） .AAConnectio nString）

Dim MySqlCmd作为SqlClient.SqlCommand

MySqlCmd =新SqlCommand（INSERT INTO [AA]。[dbo]。[tbl_ID]（[ID]，[Date] ]）VALUES（@ ID ,, @ Date），Me.Connection）

MySqlCmd.Parameters.Add（New SqlParameter（@ ID，SqlDbType.NVarChar，10））

MySqlCmd.Parameters（@ ID）。值= ID

如果日期<>什么都没有

MySqlCmd.Parameters.Add（新的SqlParameter（@ Date，SqlDbType.DateTime））

MySqlCmd.Parameters（@ Date）。Value = Convert .ToDateTime（Date）

Else

Dim getDate As SqlDateTime

getDate = SqlDateTime.Null

MySqlCmd.Parameters .Add（New SqlParameter（@ Date，SqlDbType.NVarChar，100））

MySqlCmd.Parameters（@ Date）。Value = getDate

end if

MySqlCmd.CommandType = CommandType.Text

MySqlCmd.ExecuteNonQuery（）

Me.Connection.Close（）

SaveID = True

Catch e As Exception

MsgBox（e.Message）

结束尝试

END功能

This is the code i used to save id and date.
If I did not give the value for datetextbox it takes as the default datetime of a system.
I want that If i did not give any value for datetextbox it stores a null value in sql. Please give the codings

SaveID(IDTextbox.text,DateTextbox.text)
Private Function SaveID(ByVal ID As String,ByVal Date As DateTime)
SaveID = False
     Try
       Me.MySqlConnect(My.Settings.AAConnectionString)
       Dim MySqlCmd As SqlClient.SqlCommand
       MySqlCmd = New SqlCommand("INSERT INTO [AA].[dbo].[tbl_ID]([ID],[Date]) VALUES (@ID,,@Date)", Me.Connection)
       MySqlCmd.Parameters.Add(New SqlParameter("@ID", SqlDbType.NVarChar, 10))
       MySqlCmd.Parameters("@ID").Value = ID
       MySqlCmd.Parameters.Add(New SqlParameter("@Date", SqlDbType.DateTime))
       MySqlCmd.Parameters("@Date").Value = Convert.ToDateTime(Date)
       MySqlCmd.CommandType = CommandType.Text
       MySqlCmd.ExecuteNonQuery()
       Me.Connection.Close()
       SaveID = True
     Catch e As Exception
       MsgBox(e.Message)
     End Try
END Function

解决方案

Why don't you use a Nullable (Of DateTime)[^]?

USE THIS CODE IT DOES STORE NULL IN SQL


SaveID(IDTextbox.text,DateTextbox.text)
Private Function SaveID(ByVal ID As String,ByVal Date As DateTime)
SaveID = False
Try
Me.MySqlConnect(My.Settings.AAConnectionString)
Dim MySqlCmd As SqlClient.SqlCommand
MySqlCmd = New SqlCommand("INSERT INTO [AA].[dbo].[tbl_ID]([ID],[Date]) VALUES (@ID,,@Date)", Me.Connection)
MySqlCmd.Parameters.Add(New SqlParameter("@ID", SqlDbType.NVarChar, 10))
MySqlCmd.Parameters("@ID").Value = ID
If Date<> Nothing Then
MySqlCmd.Parameters.Add(New SqlParameter("@Date", SqlDbType.DateTime))
MySqlCmd.Parameters("@Date").Value = Convert.ToDateTime(Date)
Else
Dim getDate As SqlDateTime
getDate = SqlDateTime.Null
MySqlCmd.Parameters.Add(New SqlParameter("@Date", SqlDbType.NVarChar, 100))
MySqlCmd.Parameters("@Date").Value = getDate
end if
MySqlCmd.CommandType = CommandType.Text
MySqlCmd.ExecuteNonQuery()
Me.Connection.Close()
SaveID = True
Catch e As Exception
MsgBox(e.Message)
End Try
END Function

这篇关于如何通过vb.net代码在SQL Server 2008的DATETIME字段中插入NULL值的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！