Últimos mensajes - Powered by IBM

Palabras claves

Consulta: transformar Texto a Fecha

09/06/2004 - 18:07 por Martín | Informe spam

Tengo una Aplicación en VB 6.0 que trabaja con una BD de
Access, donde se debe importar un Archivo de texto que
contiene una campo Char(6) que debo transformarlo a Fecha,
hay alguna función de SQL que me permita transformar este
campo Texto a Fecha pero con la Sentencia en SQL.??????
El formato destino debería ser dd/mm/yy y el fromato
origen en el Archiv Texto es ddmmyy.
Desde ya muy agradecido por la ayuda de todos.

Martín.-

Siga el debate

12 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#11 Martín

14/06/2004 - 16:55 | Informe spam

Maxi: te lo agradecería mucho, evidentemente es un
problema conceptual el mío. Espero me envíes uno ejemplos
así logro entender mejor.

Muchas Gracias por tu ayuda.

Martín.-

PD: si quieres enviar los ejemplos a mi correo mejor.

Saludos.-

Te comento!! si usas JET este mismo no usara las

funciones de SQLServer,

para poder usarlas deberias usar una conexion ODBC u

OLEDB. Recorda que el

driver del JET es para Access y aca estas usando

SqlServer.

Deberias cambiar como haces la tarea, si quieres te paso

ejemplos del uso de

ODBC en VBA

Salu2
-

Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET
-

Nunca consideres el estudio como una obligación sino como
una oportunidad para penetrar en el bello y maravillosos
mundo del saber.
- Albert Einstein

"Martín" escribió en el

mensaje

news:1c1d001c4521a$f315b550$
Maxi: la conexión la estoy haciendo con Jet, por qué debo
hacerla con ODBC...?? Si es así voy a poder seguir
importando el Archivo Texto sin problemas con ODBC...??
Lo único que debería cambiar sería la Conexión ó debería
cambiar algo más???

Gracias.-

Hola, todo esto si lo estas haciendo desde VB debes

indicarle que use ODBC y

no JET.

Como estas iniciando la conexion?

Salu2

-

Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET

-

Nunca consideres el estudio como una obligación sino como
una oportunidad para penetrar en el bello y maravillosos
mundo del saber.
- Albert Einstein

"Martín" escribió en el

mensaje

news:1c20e01c45211$392fc490$
Adrián ó Maxi: ya corregí el paréntesis pero me sigue
dando Error y me dice que la función CONVERT no está
definida en la Expresión, con respecto a la otra Fecha
(F_PROCESO) es una Fecha que se ingresa por Pantalla no
tengo problemas con la función CDate ya que se ingresa
perfectamente.

Gracias.-

Martín.-

Con el permiso de Maxi,

Creo que el problema esta en la siguiente instruccion:

sSQL1 = "INSERT INTO Tabla2 (CAMPO1, CAMPO2, CAMPO3,
FECHA_D, F_PROCESO ) SELECT TABLA1.CAMPO1,

TABLA1.CAMPO2,

TABLA1.CAMPO3, CONVERT(DateTime, [TABLA1].[FECHA_D],

12)),

Cdate('" & MaskFecha1 & "') FROM TABLA1;"

Deberia se:

sSQL1 = "INSERT INTO Tabla2 (CAMPO1, CAMPO2, CAMPO3,
FECHA_D, F_PROCESO ) SELECT TABLA1.CAMPO1,

TABLA1.CAMPO2,

TABLA1.CAMPO3, CONVERT(DateTime, [TABLA1].[FECHA_D],

12), " &

Cdate(MaskFecha1) & " FROM TABLA1;"

En la primera tenias un ")" demas luego de cierre de la

funcion CONVERT.

Luego estabas llamando desde T-SQL la funcion CDATE que

es de VBasic.

Saludos
Adrian D. Garcia
MCSD
NDSoft Consultoria y Desarrollo

"Martín" wrote in message
news:1b38f01c44fc1$eb2772d0$
Maxi: aquí te copio el código que utilizo desde Visual
Basic 6.0 para importar un Archvio txt y luego

transformar

los campos Fecha que me vienen informados como Char(6)
Primero incorporo el Archivo a la Tabla1 con el diseño

que

viene, luego lo paso a Tabla2 y trato de convertir los
datos Fecha.

Dim cnn As ADODB.Connection
Dim TablaOrigen, sTablaOrigen As String
Dim sConnect As String
Dim sSQL, sSQL1 As String
sConnect = "[TEXT; HDR=Yes; DATABASE=" & Camino & "].

["

& TablaOrigen & "]"
sSQL = "INSERT INTO PlazoFijo SELECT * FROM " &

sConnect

sSQL1 = "INSERT INTO Tabla2 (CAMPO1, CAMPO2, CAMPO3,
FECHA_D, F_PROCESO ) SELECT TABLA1.CAMPO1,

TABLA1.CAMPO2,

TABLA1.CAMPO3, CONVERT(DateTime, [TABLA1].[FECHA_D],

12)),

Cdate('" & MaskFecha1 & "') FROM TABLA1;"
'--Conexión con la base de datos Accesss
Set cnn = New ADODB.Connection
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0;"
.ConnectionString="Data :\Sistemas\Base\BaseDeDat

s

..

mdb"
.Open
'--Añadimos los registros
.Execute sSQL, , adCmdText
.Execute sSQL1, , adCmdText
'-- Cerramos la conexión
.Close
End With

Espero tu respuesta. Muchas Gracias.-

como lo estas haciendo y de donde?

Salu2
-

-

-

-

Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET
-

-

-

-

Nunca consideres el estudio como una obligación sino

como

una oportunidad para penetrar en el bello y

maravillosos

mundo del saber.
- Albert Einstein

"Martín" escribió

en el mensaje

news:1a9fd01c44f07$820fdea0$
He probado con la función CONVERT pero me da un Error
diciendo que "La función CONVERT no está definida en la
Expresión"??? Sucede lo mismo con la Función CAST.
Alguna otra sugerencia por favor.

Muchas Gracias.-

Tengo una Aplicación en VB 6.0 que trabaja con una BD

de

Access, donde se debe importar un Archivo de texto que
contiene una campo Char(6) que debo transformarlo a

Fecha,

hay alguna función de SQL que me permita transformar

este

campo Texto a Fecha pero con la Sentencia en

SQL.??????

El formato destino debería ser dd/mm/yy y el fromato
origen en el Archiv Texto es ddmmyy.
Desde ya muy agradecido por la ayuda de todos.

Martín.-
.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system

(http://www.grisoft.com).

Version: 6.0.698 / Virus Database: 455 - Release Date:

02/06/2004

.

.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system

(http://www.grisoft.com).

Version: 6.0.698 / Virus Database: 455 - Release Date:

02/06/2004

.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.698 / Virus Database: 455 - Release Date:

02/06/2004

.

Responder a este mensaje

#12 Maxi

14/06/2004 - 17:05 | Informe spam

Hace una cosa, mandame un mail a:

Maxi_accotto[arroba]speedy.com.ar

con sujeto ODBC NEWGROUPS y yo a la noche te mando el codigo en VBA

Bye

Salu2
Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET
Nunca consideres el estudio como una obligación sino como
una oportunidad para penetrar en el bello y maravillosos
mundo del saber.
- Albert Einstein

"Martín" escribió en el mensaje
news:1bf4101c4521f$a0cc64b0$
Maxi: te lo agradecería mucho, evidentemente es un
problema conceptual el mío. Espero me envíes uno ejemplos
así logro entender mejor.

Muchas Gracias por tu ayuda.

Martín.-

PD: si quieres enviar los ejemplos a mi correo mejor.

Saludos.-

Te comento!! si usas JET este mismo no usara las

funciones de SQLServer,

para poder usarlas deberias usar una conexion ODBC u

OLEDB. Recorda que el

driver del JET es para Access y aca estas usando

SqlServer.

Deberias cambiar como haces la tarea, si quieres te paso

ejemplos del uso de

ODBC en VBA

Salu2
-

Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET
-

Nunca consideres el estudio como una obligación sino como
una oportunidad para penetrar en el bello y maravillosos
mundo del saber.
- Albert Einstein

"Martín" escribió en el

mensaje

news:1c1d001c4521a$f315b550$
Maxi: la conexión la estoy haciendo con Jet, por qué debo
hacerla con ODBC...?? Si es así voy a poder seguir
importando el Archivo Texto sin problemas con ODBC...??
Lo único que debería cambiar sería la Conexión ó debería
cambiar algo más???

Gracias.-

Hola, todo esto si lo estas haciendo desde VB debes

indicarle que use ODBC y

no JET.

Como estas iniciando la conexion?

Salu2

-

Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET

-

Nunca consideres el estudio como una obligación sino como
una oportunidad para penetrar en el bello y maravillosos
mundo del saber.
- Albert Einstein

"Martín" escribió en el

mensaje

news:1c20e01c45211$392fc490$
Adrián ó Maxi: ya corregí el paréntesis pero me sigue
dando Error y me dice que la función CONVERT no está
definida en la Expresión, con respecto a la otra Fecha
(F_PROCESO) es una Fecha que se ingresa por Pantalla no
tengo problemas con la función CDate ya que se ingresa
perfectamente.

Gracias.-

Martín.-

Con el permiso de Maxi,

Creo que el problema esta en la siguiente instruccion:

sSQL1 = "INSERT INTO Tabla2 (CAMPO1, CAMPO2, CAMPO3,
FECHA_D, F_PROCESO ) SELECT TABLA1.CAMPO1,

TABLA1.CAMPO2,

TABLA1.CAMPO3, CONVERT(DateTime, [TABLA1].[FECHA_D],

12)),

Cdate('" & MaskFecha1 & "') FROM TABLA1;"

Deberia se:

sSQL1 = "INSERT INTO Tabla2 (CAMPO1, CAMPO2, CAMPO3,
FECHA_D, F_PROCESO ) SELECT TABLA1.CAMPO1,

TABLA1.CAMPO2,

TABLA1.CAMPO3, CONVERT(DateTime, [TABLA1].[FECHA_D],

12), " &

Cdate(MaskFecha1) & " FROM TABLA1;"

En la primera tenias un ")" demas luego de cierre de la

funcion CONVERT.

Luego estabas llamando desde T-SQL la funcion CDATE que

es de VBasic.

Saludos
Adrian D. Garcia
MCSD
NDSoft Consultoria y Desarrollo

"Martín" wrote in message
news:1b38f01c44fc1$eb2772d0$
Maxi: aquí te copio el código que utilizo desde Visual
Basic 6.0 para importar un Archvio txt y luego

transformar

los campos Fecha que me vienen informados como Char(6)
Primero incorporo el Archivo a la Tabla1 con el diseño

que

viene, luego lo paso a Tabla2 y trato de convertir los
datos Fecha.

Dim cnn As ADODB.Connection
Dim TablaOrigen, sTablaOrigen As String
Dim sConnect As String
Dim sSQL, sSQL1 As String
sConnect = "[TEXT; HDR=Yes; DATABASE=" & Camino & "].

["

& TablaOrigen & "]"
sSQL = "INSERT INTO PlazoFijo SELECT * FROM " &

sConnect

sSQL1 = "INSERT INTO Tabla2 (CAMPO1, CAMPO2, CAMPO3,
FECHA_D, F_PROCESO ) SELECT TABLA1.CAMPO1,

TABLA1.CAMPO2,

TABLA1.CAMPO3, CONVERT(DateTime, [TABLA1].[FECHA_D],

12)),

Cdate('" & MaskFecha1 & "') FROM TABLA1;"
'--Conexión con la base de datos Accesss
Set cnn = New ADODB.Connection
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0;"
.ConnectionString="Data :\Sistemas\Base\BaseDeDat

s

..

mdb"
.Open
'--Añadimos los registros
.Execute sSQL, , adCmdText
.Execute sSQL1, , adCmdText
'-- Cerramos la conexión
.Close
End With

Espero tu respuesta. Muchas Gracias.-

como lo estas haciendo y de donde?

Salu2
-

-

-

-

Maxi
Buenos Aires - Argentina
Desarrollador Microsoft 3 Estrellas .NET
-

-

-

-

Nunca consideres el estudio como una obligación sino

como

una oportunidad para penetrar en el bello y

maravillosos

mundo del saber.
- Albert Einstein

"Martín" escribió

en el mensaje

news:1a9fd01c44f07$820fdea0$
He probado con la función CONVERT pero me da un Error
diciendo que "La función CONVERT no está definida en la
Expresión"??? Sucede lo mismo con la Función CAST.
Alguna otra sugerencia por favor.

Muchas Gracias.-

Tengo una Aplicación en VB 6.0 que trabaja con una BD

de

Access, donde se debe importar un Archivo de texto que
contiene una campo Char(6) que debo transformarlo a

Fecha,

hay alguna función de SQL que me permita transformar

este

campo Texto a Fecha pero con la Sentencia en

SQL.??????

El formato destino debería ser dd/mm/yy y el fromato
origen en el Archiv Texto es ddmmyy.
Desde ya muy agradecido por la ayuda de todos.

Martín.-
.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system

(http://www.grisoft.com).

Version: 6.0.698 / Virus Database: 455 - Release Date:

02/06/2004

.

.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system

(http://www.grisoft.com).

Version: 6.0.698 / Virus Database: 455 - Release Date:

02/06/2004

.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.698 / Virus Database: 455 - Release Date:

02/06/2004

.

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.698 / Virus Database: 455 - Release Date: 02/06/2004

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2 3

Busqueda sugerida