Concatenación

Hola soy yo de nuevo grasi por la páginas me sirvieron mucho para aprender lo básico pero ora quisirera saber algo más abansado mira tengo que crear una cadena paresida a esta:
¿Y603631110584927708085XXXX111111111MESJ160999 MENDOZA$SILVA$JUAN 10010920070005000VNSTAS NORTE 01092007 00000000
y todo esto esta en la base de datos ay una manera en que VFP concatene todo eso datos y lo yabe aun txt?
grasi por tu atención

1 Respuesta

Respuesta
1
set alternate to "archivo.txt"
set alternate on
select archivo
go top
do while !eof()
 ? ¿Acampo1
? ¿Campo2
? Campo3
  Skip
Enddo
set alternate off
Esta es una forma, ahora bien estudia el COPY TO
Avisame.
Hola soy yo de nuevo grasi por la páginas me sirvieron mucho para aprender lo básico pero ora quisirera saber algo más abansado mira tengo que crear una cadena paresida a esta:
¿Y603631110584927708085XXXX111111111MESJ160999 MENDOZA$SILVA$JUAN 10010920070005000VNSTAS NORTE 01092007 00000000
y todo esto esta en la base de datos ay una manera en que VFP concatene todo eso datos y lo yabe aun txt?
grasi por tu atención
Hola oye que crees investigue si se puede usar el copy to y si se puede pero ala ora me crea una cadena así
0

   h                    USER       C   
               PASS C
                                                                                                                                                                                                                                                                        Ivan calo 
¿Por qué puede ser?
Usa esta instrucción
alltrim(campo1)+alltrim(campo2)+alltrim(str(camponum))
Campo1 y campo2 son caracter
Camponum es numerico
Prueba y me dices
Me marca que el código esta bien pero me marca que archivo no se encuentra
Hola encontré este código
close databases
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE customer && Opens Customer table
COPY NEXT 3 TO temp TYPE DELIMITED
WAIT WINDOW 'This is the delimited text file' NOWAIT
MODIFY FILE temp.txt
DELETE FILE temp.txt
y me genrea este resultado
"ALFKI","Alfreds Futterkiste","Maria Anders","Sales Representative","Obere Str. 57","Berlin","","12209","Germany","030-0074321","030-0076545",6300.0000
"ANATR","Ana Trujillo Emparedados y helados","Ana Trujillo","Owner","Avda. de la Constitución 2222","México D.F.","","05021","Mexico","(5) 555-4729","(5) 555-3745",3500.0000
"ANTON","Antonio Moreno Taquería","Antonio Moreno","Owner","Mataderos  2312","México D.F.","","05023","Mexico","(5) 555-3932","",8500.0000
me lopuedes explicar no le entiendo
set alternate to "archivo.txt"
set alternate on
select archivo
go top
do while !eof()
  ?alltrim(campo1)+alltrim(campo2)+alltrim(str(camponum))
  Skip
Enddo
set alternate off
Campo1, campo2, camponum van campos de la tabla
no he probado con copy to
y si quieres enviame el archivo [email protected]
Close databases
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE customer && Opens Customer table
COPY NEXT 3 TO temp TYPE DELIMITED
* este copy to crea el archivo temp.txt de la tabla CUSTOMER graba 3 registros delimitados, toma cada campo y lo graaba como aparece abajo
WAIT WINDOW 'This is the delimited text file' NOWAIT
MODIFY FILE temp.txt
DELETE FILE temp.txt
y me genrea este resultado
"ALFKI","Alfreds Futterkiste","Maria Anders","Sales Representative","Obere Str. 57","Berlin","","12209","Germany","030-0074321","030-0076545", 6300.0000
"ANATR","Ana Trujillo Emparedados y helados","Ana Trujillo","Owner","Avda. de la Constitución 2222","México D.F.","","05021","Mexico","(5) 555-4729","(5) 555-3745", 3500.0000
"ANTON","Antonio Moreno Taquería","Antonio Moreno","Owner","Mataderos 2312","México D.F.","","05023","Mexico","(5) 555-3932","", 8500.0000
me lopuedes explicar no le entiendo
Enviame la tabla, y un ejemplo de como debe quedar el archivo txt y te puedo ayudar más
Listo le envíe un correo con mi bad usuarios la cual usuarios es una tapbal de eejemplo ya que no me dejan mandar la original, espero que le sirve micorro es [email protected]
No ha llegado el correo, estoy pendiente.
Ya se lo madnde espero que sirva y llega
Ya llegó pero esta tabla pertenece a una base de datos de tal forma que cuando la enviaste sola no se puede trabajar, te voy a enviar uncodigo para que lo ejecutes y analices.
* abre la bse de datos
OPEN DATABASE usuarios
*tra in formacion de la tabla usuarios y lo almacena en el cursor user
select  from usuarios into cursor user
*muestra informacion de un campos "campo1" de la tablas usurios
?usr.campo1
*ahora bien si lo haces desde un formulario
thisform.text.calue = usr.campo1
no se si te colabore
me amrca un error en este  SELECT from usuarios INTO CURSOR qeu el comando contiene inreconocible phrrase/keywork
luego del select va un * : select * from ...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas