** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Lineas de Texto
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoLineas de Texto
 Responder Responder
Autor
Mensaje
  Tema Buscar Tema Buscar  Opciones del Tema Opciones del Tema
LUDICO Ver desplegable
Habitual
Habitual
Avatar

Unido: 14/Julio/2006
Localización: Colombia
Estado: Sin conexión
Puntos: 131 		Enlace directo a este mensaje Tema: Lineas de Texto
    Enviado: 28/Septiembre/2021 a las 00:24
Saludos;

Agradezco quien me pueda ayudar con esto,  al momento de escáner un código QR este me trae una información que guardo en un campo de texto largo;  ahora necesito separar estos datos de manera que pueda trabajar línea por línea.  la información viene así:

NumFacÑ MAXC3916
FecFacÑ 2021'09'17
HorFacÑ 12Ñ24Ñ30'05Ñ00
NitFacÑ 900416068
DocAdqÑ 801003287
ValFacÑ 226698.00
ValIvaÑ 43073.00
ValOtroImÑ 0.00
ValTolFacÑ 269771.00

ya logrando llegar a cada líinea podre tomar los datos que realmente necesito de cada registro.  de ante mano muchas gracias!
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 14025 		Enlace directo a este mensaje Enviado: 28/Septiembre/2021 a las 08:45
Supongo que las líneas tendrán un retorno de carro para separarlas (VbCr), con eso y la función Split lo tienes hecho.
Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
LUDICO Ver desplegable
Habitual
Habitual
Avatar

Unido: 14/Julio/2006
Localización: Colombia
Estado: Sin conexión
Puntos: 131 		Enlace directo a este mensaje Enviado: 28/Septiembre/2021 a las 15:00
Gracias por tu apoyo; la verdad no se como podría identificar los saltos de linea en el texto.
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 14025 		Enlace directo a este mensaje Enviado: 28/Septiembre/2021 a las 15:13
La función split te separa una cadena en función de un carácter separador, que este caso será un retorno de carro. Mira la ayuda de la función, verás que es muy simple.
Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
AnSanVal Ver desplegable
Administrador
Administrador
Avatar

Unido: 16/Marzo/2005
Localización: España
Estado: Sin conexión
Puntos: 5976 		Enlace directo a este mensaje Enviado: 29/Septiembre/2021 a las 14:24

Perdonen que intervenga. Realmente, como separador, tiene un avance de línea (vbLf -carácter 10-).

Constante

Equivalente

Descripción

vbCrLf

Chr(13) + Chr(10)

Combinación de retorno de carro y avance de línea

vbCr

Chr(13)

Carácter de retorno de carro

vbLf

Chr(10)

Carácter de avance de línea

 

Estos son los códigos:

NumFacÑMAXC3916

78,117,109,70,97,99,209,32,77,65,88,67,51,57,49,54,10

FecFacÑ2021'09'17

70,101,99,70,97,99,209,32,50,48,50,49,39,48,57,39,49,55,10

HorFacÑ12Ñ24Ñ30'05Ñ00

72,111,114,70,97,99,209,32,49,50,209,50,52,209,51,48,39,48,53,209,48,48,10

NitFacÑ900416068

78,105,116,70,97,99,209,32,57,48,48,52,49,54,48,54,56,10

DocAdqÑ801003287

68,111,99,65,100,113,209,32,56,48,49,48,48,51,50,56,55,10

ValFacÑ226698.00

86,97,108,70,97,99,209,32,50,50,54,54,57,56,46,48,48,10

ValIvaÑ43073.00

86,97,108,73,118,97,209,32,52,51,48,55,51,46,48,48,10

ValOtroImÑ0.00

86,97,108,79,116,114,111,73,109,209,32,48,46,48,48,10

ValTolFacÑ269771.00

86,97,108,84,111,108,70,97,99,209,32,50,54,57,55,55,49,46,48,48,10

 
Saludos desde Tenerife.
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 14025 		Enlace directo a este mensaje Enviado: 29/Septiembre/2021 a las 14:28
Don Antonio, está usted perdonado ....  Wink

Eso que apuntas es la siguiente parte del charco, ya que dependiendo de los entornos y el programador puede venir cualquier código de avance ...
Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
AnSanVal Ver desplegable
Administrador
Administrador
Avatar

Unido: 16/Marzo/2005
Localización: España
Estado: Sin conexión
Puntos: 5976 		Enlace directo a este mensaje Enviado: 29/Septiembre/2021 a las 20:44
No puse nada de «mi cosecha».

Copié el texto de LUDICO y en vez de pegarlo en una celda (interpretaría los avances como tales y colocaría los textos -sin avances- en varias celdas) lo pegué en un cuadro de texto > Copié del cuadro de texto y lo pegué en una celda (aquí interpreta todo el texto como un sólo texto) > luego leí el código de cada carácter (en varias celdas) y aparecieron los códigos 10.

También se puede leer con código VBA.
Saludos desde Tenerife.
Arriba
LUDICO Ver desplegable
Habitual
Habitual
Avatar

Unido: 14/Julio/2006
Localización: Colombia
Estado: Sin conexión
Puntos: 131 		Enlace directo a este mensaje Enviado: 30/Diciembre/2021 a las 22:59
Gracias; se puede cerrar
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable