Ayuda con insertar Archivo TXT

03/07/2003 - 15:55 por Rodrigo | Informe spam
Aplique el siguiente codigo para insertar un archivo TXT
en una tabla de Access 2000 y todo me resulta muy bien,
pero de los 400 registros que inserte solo 12 registros se
insertan hasta la mitad, es decir si el registro tiene 100
caracteres se estan insertando 30 o cuarenta caracteres,
este problema no lo he podido solucionar y ya revise el
archivo TXT y todo esta OK.

Adjunto el codigo que he usado, Gracias.

Dim cnn As ADODB.Connection
Dim sConnect As String, sSQL As String

'INSERTA ARCH. TXT CLIENTES EN TABLA ACCESS Cliente_ccc100
sConnect = "[TEXT; HDR=yes; DATABASE=I:\Sistema\Txt].
[Clientes#txt]"
'Construimos la consulta SQL
sSQL = "INSERT INTO Cliente_Ccc100 SELECT * FROM " &
sConnect
' Conexión con tu base de datos Accesss
Set cnn = New ADODB.Connection
With cnn
.Provider = "Microsoft.Jet.OLEDB.4.0;"
.ConnectionString = "Data
Source=I:\Sistema\Txt\Alpha.mdb"
.Open
'Añadimos los registros
.Execute sSQL, , adCmdText
'Cerramos la conexión
.Close
End With

Preguntas similare

Leer las respuestas

#6 Softjaen
03/07/2003 - 19:33 | Informe spam
"Manuel Romero" escribió:

Alguna vez alguien me llamo porque la impresora no funcionaba y
despues de gastarle un rato, me di cuenta que estaba desconectada.




¡Jajajaja!

Eso me recuerda a una llamada que me realizó una compañera de trabajo,
diciéndome que la impresora que habíamos adquirido nueva no funcionaba. Le
dije que abriera el cajón y comprobara si tenía papel suficiente. :-))

Como la impresora está compartida, el mensaje de error «No hay papel
suficiente ...» sale en el equipo servidor donde está instalada la
impresora, y como siempre, el monitor del equipo está apagado. :-)

Enrique Martínez
[MS MVP - VB]
Respuesta Responder a este mensaje
#7 Manuel Romero
03/07/2003 - 20:32 | Informe spam
Que es ese archivo que adjunto Enrique?

"Softjaen" @yahoo.es> escribió en el mensaje
news:#BBeZ#
"Rodrigo" escribió:

> el delimitador es un ; y los caracteres no estan dentro de
> comillas, es decir el delimitador esta entre numericos y
> alphanumericos, ojala me entienas.
> lo que descubri es que hay caracteres con comillas y esos
> son los registros que tienen problemas. La cosa es que no
> debo quitar las comillas, mi pregunta es que puedo hacer
> en este caso para que no se maree.

Mejor que me hubieras enviado el archivo en formato TXT, porque a decir
verdad, es un verdadero jaleo entender los datos. Aparte, yo no he visto
ninguna comilla doble en los datos que me has enviado.

He creado una tabla en una base de datos de Access, con los nombres de los
campos del archivo de texto que adjunto al mensaje, y los he importado sin
ningún tipo de problema.

Publica los registros que te dan problemas, pero adjunta el archivo TXT.


No
los escribas en el mensaje porque es difícil de leerlo.

Enrique Martínez
[MS MVP - VB]



Respuesta Responder a este mensaje
#8 Softjaen
03/07/2003 - 21:50 | Informe spam
Con el archivo de texto que me has enviado, no te va a quedar más remedio
que especificar delimitadores de campos, porque hay una gran serie de
números y espacios en blanco, que entiendo que el ISAM de texto no sabe lo
que tiene que hacer con ellos, salvo que dicha serie forme parte de un sólo
campo, por lo que debes de especificar el tamaño del mismo.

Te recomiendo que crees un archivo de información de esquema «Schema.ini» en
la misma carpeta donde se encuentre el archivo de texto, donde especifiques
la longitud de cada campo. Si quieres conocer como crearlo, échale un
vistazo a mi artículo

Trabajar con los datos de un archivo de texto
http://es.geocities.com/softjaen/Ar...t_isam.htm

Un saludo.

Enrique Martínez
[MS MVP - VB]
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida