Insert DateTimePicker

[chicharroni]

hola, espero me puedan ayudar ya que estoy metido en un problema estoy tratando de insertar datos a un archivo de access .mbd lo qe pasa esqe si funciona pero tengo 2 objetos DateTimePicker y pues en uno de ellos quiero qe guarde la fecha y en otro quiero que guarde la hora, hasta ahorita pues inserta pero al insertar inserta toda la fecha aqui un ej. 01/01/1900 12:00:00 a. m. y al tratar de modificar la conexion para qe guarde solo los valores qe yo kiero no lo hace!! aqui pongo el codigo

Código:

Imports System.Data.OleDb
Public Class Form1
    Dim cn As OleDbConnection
    Dim cmd As OleDbCommand
    Dim dr As OleDbDataReader
    Dim str As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            cn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\bdlabcomp.mdb;User ID=Admin;Password=;")
            cn.Open()
            str = "insert into captura (fecha, matricula, pc, tipo_usuario, hr_entrada) values( " & "" & Format(DateTimePicker1.Value.Date, "dd-MM-yy") & "," & CInt(TextBox1.Text) & "," & ComboBox1.SelectedItem & "," & ComboBox2.SelectedItem & "," & "" & Format(DateTimePicker2.Value.Hour, "HH:mm") & ")"
            cmd = New OleDbCommand(str, cn)
            Catch ex As Exception
            MessageBox.Show(ex.Message & " - " & ex.Source)
            cn.Close()
        End Try

yo se que esta algo mal pues no soy experto :( jeje pero pues me la e pasado leyendo y vi qe tiene qe ir un format antes del datetimepicker para qe mande solo el valor qe uno escojio pero aun asi no se puede enviar, marca error!! les agradeceria mucho de su ayuda gracias de antemano.

[mankel]

Por aqui anda un tema donde expone este ejemplo:

Código:

Dim fecha As DateTime = DateTime.Now
Dim fec AsString
fec = Format(fecha, "yyyy-MM-dd hh:mm:ss")
 
'Aqui convierto el string a DateTime
fecha = Convert.ToDateTime(fec)

Prueba algo asi, y verás que tendras un mejor resultado. Consulta también la ayuda en línea de FORMAT() para mas detalles.

Saludos