Visual Basic.NET - Grabar campo Fecha en SQL Server 2K

Mi problema es el siguiente: estoy trabajando en una Aplicación VB .Net con SQL Server 2K. Estoy tratando de almacenar datos de un Formulario creado en VB .Net a una Tabal de SQL Server, el problema se presenta cuando va a almacenar un Campo Fecha.
El código es el siguiente:
Fecha_Hoy = Date.Now
On Error GoTo Error
Dim MiDataRow As Data.DataRow
MiDataRow = DataSet1.Tables("T_MovimientosLegajos").NewRow()
MiDataRow("Numero") = Me.nrolegajo
MiDataRow("Observaciones") = "Pase de Departamento"
MiDataRow("Usuario") = "Pepe"
MiDataRow("Fecha") = "'" & Fecha_Hoy & "'"
DataSet1.Tables("T_MovimientosLegajos").Rows.Add(MiDataRow)
If DataSet1.HasChanges Then
SqlCommand1.CommandText = "INSERT INTO T_MovimientosLegajos(Numero, Observaciones, Usuario, Fecha) VALUES(@Numero, @Observaciones, @Usuario, @Fecha)"
SqlCommand1.Connection = SqlConnection1
SqlDataAdapter1.InsertCommand = SqlCommand1
SqlCommand1.Parameters.Add("@Numero", Data.SqlDbType.NChar, 14, "Numero")
SqlCommand1.Parameters.Add("@Observaciones", Data.SqlDbType.NText, 50, "Observaciones")
SqlCommand1.Parameters.Add("@Usuario", Data.SqlDbType.NVarChar, 50, "Usuario")
SqlCommand1.Parameters.Add("@Fecha", Data.SqlDbType.DateTime, 8, "Fecha")

El mensaje de Error es el siguiente:
Se ha producido un Error (5). String was not recognized as a Valid DateTime. Couldn't store <'12/06/2007 12:01:05'> in Fecha column. Expected type is DateTime.

Desde ya muchas gracias.

En la tabla de SQL tienes el campo fechacon la propiedad datetime¿?

El problema lo tienes en esta linea:

MiDataRow("Fecha") = "'" & Fecha_Hoy & "'"

corregida es así:

MiDataRow("Fecha") = Now.Date

o igualala a Fecha_Hoy pero pasale el Now.Date a la variable.

Se supone que el capo Fecha del datarow ya es del tipo datetime, por lo que tienes que pasarle un valor fecha, y no necesita de comillas, porque sino lo tomará como string.

Un saludo.