Fechas con SQL 2k y VB6

la tabla prueba la cree en la misma BD donde tengo este
problema.
uno de los casos en que tengo este problema es desde VB
cuando trato de insertar en una tabla usando como valor de
una columna smalldatetime el valor de Date de VB

ahi va la linea

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & "," & Date & "," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

lo unico previo que hice al command fue setear la
activeconnection

luego cuando consulto dicha tabla ventas el valor devuelto
en la consulta para la fecha devuelve

1900-01-01 00:00:00.000

gracias por su ayuda

es correcto eso!! entonces como es q no te funciona ?

porque no posteas la

instruccion q estas usando !!

La tabla de ej la creaste sobre la misma BDD donde esta

la tabla q no te

funciona?

si nos pasas esto te podemos ayudar!!

un abrazo

ACCOTTO MAXIMILIANO DAMIAN
GERENTE DE SISTEMAS
UN SALUDO MUY CORDIAL
"Scafe" escribió en

el mensaje

news:08d201c3a40c$028c5560$

de acuerdo, ahi va

2003-11-05 23:12:36.523

ese es resultado de la consulta

select * from prueba

>Con permiso de nuestro amigo ACCOTTO
>
>Postea el resultado para ver como esta guardando la

fecha

>SQL.
>
>
>.
>

.

ahi tienes el problema!!

prueba en lugar de Date hacer esto:

Format(date,"mm/dd/yyyy hh:mm:ss") y dime como te ha ido!!

tu ej seria entonces asi:

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & ",'" & Format(date,"mm/dd/yyyy
hh:mm:ss") & "'," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

fijate q ademas de usar la funcion format puse unas comillas simples!!

Prueba con ellas y sin ellas!!

Un abrazo!!

pd: espero q me digas el resultado de como te ha ido!!

ACCOTTO MAXIMILIANO DAMIAN
GERENTE DE SISTEMAS
UN SALUDO MUY CORDIAL
"Scafe" escribió en el mensaje
news:05e301c3a40e$82cf7fc0$
la tabla prueba la cree en la misma BD donde tengo este
problema.
uno de los casos en que tengo este problema es desde VB
cuando trato de insertar en una tabla usando como valor de
una columna smalldatetime el valor de Date de VB

ahi va la linea

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & "," & Date & "," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

lo unico previo que hice al command fue setear la
activeconnection

luego cuando consulto dicha tabla ventas el valor devuelto
en la consulta para la fecha devuelve

1900-01-01 00:00:00.000

gracias por su ayuda

es correcto eso!! entonces como es q no te funciona ?

porque no posteas la

instruccion q estas usando !!

La tabla de ej la creaste sobre la misma BDD donde esta

la tabla q no te

funciona?

si nos pasas esto te podemos ayudar!!

un abrazo

ACCOTTO MAXIMILIANO DAMIAN
GERENTE DE SISTEMAS
UN SALUDO MUY CORDIAL
"Scafe" escribió en

el mensaje

news:08d201c3a40c$028c5560$

de acuerdo, ahi va

2003-11-05 23:12:36.523

ese es resultado de la consulta

select * from prueba

>Con permiso de nuestro amigo ACCOTTO
>
>Postea el resultado para ver como esta guardando la

fecha

>SQL.
>
>
>.
>

.

Yo esta parte no la tengo muy clara, pero las fechas siempre las paso entre
apostrófes (') como si fueran cadenas.
Además intenta ingresar el siguiente formato, que es el natural de SQL
Server : yyyymmdd hhnn
A veces da problemas y tienes que colocar un guión o un slash, pero respeta
la secuencia.

pez altar hendido ala sequedad dadivosa

"Scafe" escribió en el mensaje
news:05e301c3a40e$82cf7fc0$
la tabla prueba la cree en la misma BD donde tengo este
problema.
uno de los casos en que tengo este problema es desde VB
cuando trato de insertar en una tabla usando como valor de
una columna smalldatetime el valor de Date de VB

ahi va la linea

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & "," & Date & "," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

Solo como aclaración, este no es el formato natural de SQL Server (que no
almacena las fechas con ningún tipo de formato literal), sino el formato
canónico de ODBC, el cual SQL Server entiende a la perfección.

Saludos

Fernando G. Guerrero
SQL Server MVP
CEO & Principal Mentor
Solid Quality Learning
www.solidqualitylearning.com

"Comparte lo que sabes, aprende lo que no sepas"

"Mauricio Sthandier R." <mauricio@@sthandier.net> wrote in message
news:uhfHE%

Yo esta parte no la tengo muy clara, pero las fechas siempre las paso

entre

apostrófes (') como si fueran cadenas.
Además intenta ingresar el siguiente formato, que es el natural de SQL
Server : yyyymmdd hhnn
A veces da problemas y tienes que colocar un guión o un slash, pero

respeta

la secuencia.

pez altar hendido ala sequedad dadivosa

"Scafe" escribió en el mensaje
news:05e301c3a40e$82cf7fc0$
la tabla prueba la cree en la misma BD donde tengo este
problema.
uno de los casos en que tengo este problema es desde VB
cuando trato de insertar en una tabla usando como valor de
una columna smalldatetime el valor de Date de VB

ahi va la linea

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & "," & Date & "," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

funciono a la perfeccion, MUCHAS GRACIAS A TODOS!!!
funciono con comillas y todo
perdon la demora pero ayer tuve que irme y recien ahora
retome el trabajo.

ahi tienes el problema!!

prueba en lugar de Date hacer esto:

Format(date,"mm/dd/yyyy hh:mm:ss") y dime como te ha ido!!

tu ej seria entonces asi:

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & ",'" & Format

(date,"mm/dd/yyyy

hh:mm:ss") & "'," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

fijate q ademas de usar la funcion format puse unas

comillas simples!!

Prueba con ellas y sin ellas!!

Un abrazo!!

pd: espero q me digas el resultado de como te ha ido!!

ACCOTTO MAXIMILIANO DAMIAN
GERENTE DE SISTEMAS
UN SALUDO MUY CORDIAL
"Scafe" escribió en

el mensaje

news:05e301c3a40e$82cf7fc0$
la tabla prueba la cree en la misma BD donde tengo este
problema.
uno de los casos en que tengo este problema es desde VB
cuando trato de insertar en una tabla usando como valor de
una columna smalldatetime el valor de Date de VB

ahi va la linea

sSQL = "insert into Ventas values(" & MaxV & "," &
cbItem.ItemData(cbItem.ListIndex) _
& "," & cbSubItem.ItemData
(cbSubItem.ListIndex) & "," & txtCant & "," & Date & "," _
& Importe & "," & Turno & ")"
Cmd.CommandText = sSQL
Cmd.Execute

lo unico previo que hice al command fue setear la
activeconnection

luego cuando consulto dicha tabla ventas el valor devuelto
en la consulta para la fecha devuelve

1900-01-01 00:00:00.000

gracias por su ayuda

es correcto eso!! entonces como es q no te funciona ?

porque no posteas la

instruccion q estas usando !!

La tabla de ej la creaste sobre la misma BDD donde esta

la tabla q no te

funciona?

si nos pasas esto te podemos ayudar!!

un abrazo

ACCOTTO MAXIMILIANO DAMIAN
GERENTE DE SISTEMAS
UN SALUDO MUY CORDIAL
"Scafe" escribió en

el mensaje

news:08d201c3a40c$028c5560$

de acuerdo, ahi va

2003-11-05 23:12:36.523

ese es resultado de la consulta

select * from prueba

>Con permiso de nuestro amigo ACCOTTO
>
>Postea el resultado para ver como esta guardando la

fecha

>SQL.
>
>
>.
>

.

.