date convert problem

[chand]

Hi
i am using sql server as database server.when user not enters datetime field value it's storing like 1/1/1900.i got code from net to correct it .
here is the code i got
Dim sqlStmt As String
Dim conString As String
Dim cn As SqlConnection
Dim cmd As SqlCommand
Dim sqldatenull As SqlDateTime
Try
sqlStmt = "insert into Emp (FirstName,LastName,Date) Values (@FirstName,@LastName,@Date) "
conString = "server=localhost;database=Northwind;uid=sa;pwd=;"
cn = New SqlConnection(conString)
cmd = New SqlCommand(sqlStmt, cn)

cmd.Parameters.Add(New SqlParameter("@FirstName", SqlDbType.NVarChar, 11))
cmd.Parameters.Add(New SqlParameter("@LastName", SqlDbType.NVarChar, 40))
cmd.Parameters.Add(New SqlParameter("@Date", SqlDbType.DateTime))

sqldatenull = SqlDateTime.Null

cmd.Parameters("@FirstName").Value = txtFirstName.Text
cmd.Parameters("@LastName").Value = txtLastName.Text
If (txtDate.Text = "") Then
cmd.Parameters("@Date").Value = sqldatenull
'cmd.Parameters("@Date").Value = DBNull.Value
Else
cmd.Parameters("@Date").Value = DateTime.Parse(txtDate.Text)
End If
cn.Open()
cmd.ExecuteNonQuery()
Label1.Text = "Record Inserted Succesfully"

Catch ex As Exception
Label1.Text = ex.Message
Finally
cn.Close()
End Try
-------------------
My code look like this
ssql="insert_aaa" txtactno "','" & _
txtdate.txt & "','" & _

how do i convert mycode to accept sqldatenull value

 

[Joe Mamma]

-------------------
My code look like this
ssql="insert_aaa" txtactno "','" & _
txtdate.txt & "','" & _

how do i convert mycode to accept sqldatenull value

Make your code look like the example!!!

The example uses parameterized SQL. . . you are trying to build a SQL string and execute that.

Number one novice mistake when working with dates!!!

Look at his code again. . . look up command parameters in help.