Problema con el formato de fecha al insertar en SQL

[Monimo]

Hola que tal, bueno mi problema es el siguiente:

my query para insertar datos es el siguiente:

Código:

dim fecha as date
fecha = Today



valores = Integer.Parse(id) & "," & monto1 & "," & monto2 & ",'" & fecha & "," & TextBox7.Text

query = "insert into factura(ID_CLIENTE,MONTO, MONTO2, FECHA, factura) values (" & valores & ")"

esto inserta bien el prblema es que la fecha la inserta de esta manera:

YYYY-dd-MM lo cual me complica las cosas al querer hacer una consulta por dia

Código:

SELECT RFC, DIRECCION, NOMBRE,  FROM cliente, factura  WHERE  day(fecha)=day(getdate()) and month(fecha)=month(getdate()) and year(fecha)=year(getdate())

.

ya que el formato de sql es YYYY-MM-dd asi que compara el dia de hoy, pero como se insertó: YYYY-dd-mm compara el MM con el DD y pues nunca me saca lo correcto.

Ojala puedan ayudarme, intenté lo siguiente:

fecha= Date.Now.ToString("dd/MMM/yyyy hh:mm:ss")

pero me saca un error de sintaxis que no se puede convertir de string a datetime :S

bueno muchas gracais por su atencion y de antemano :) utilizo vb . net 2003

[redpos]

Lo que puedes hacer es introducir la fecha como un string:

dim fecha as string
fecha = day(Today) & "/" & month(Today) & "/" & year(Today)

de esta manera se introducira como tu quieres.

valores = Integer.Parse(id) & "," & monto1 & "," & monto2 & ",'" & fecha & "," & TextBox7.Text

query = "insert into factura(ID_CLIENTE,MONTO, MONTO2, FECHA, factura) values (" & valores & ")"