Combinación de correspondencia.

20 views
Skip to first unread message

Kike. Sevilla

unread,
Feb 1, 2011, 11:16:43 AM2/1/11
to Comunidad de Visual Foxpro en Español
Hola Grupo:

Hace un par de meses o menos se publico un mensaje para cambiar
correspondencias a un fichero de texto "word" o también ".rtf" que se
hacía cambiando por ejemplo "%nombre%" por lo que se quisiera.
Lamentablemente para mí he cambiado de ordenador y he perdido eje
ejemplo, que por cierto estaba muy bien.

¿Alguien sabe cómo puedo localizarlo o me pueden dar una pista de cómo
se hacía?

Muchas gracias a todos.

Saludos.

Kike.
Sevilla.
España

Arnaldo Toledano (GMail)

unread,
Feb 1, 2011, 12:01:33 PM2/1/11
to publice...@googlegroups.com
Aca esta un post de Walter Ojeda Valiente.
Supongo que te referis a este.
 Para reemplazar un texto por otro texto en un archivo, lo que hago es ponerle unos "marcadores" al texto reemplazable y así puedo localizarlo facilmente. Algo como:
>
> lcArchivoTemp = FileToStr(lcArchivoDestino)
> lcArchivoTemp = StrTran(lcArchivoTemp, "%NombreSistema%", TEMP.SIS_NOMBRE)
> lcArchivoTemp = StrTran(lcArchivoTemp, "%FechaInicio%", DtoC(Date()))
> StrToFile(lcArchivoTemp, lcArchivoDestino)
>
> En este ejemplo reemplazo el texto: %NombreSistema% por el contenido del campo: TEMP.SIS_NOMBRE. Reemplazo el texto: %FechaInicio% por la fecha actual.
>
> Luego, vuelvo a grabar el archivo, ahora con los datos reemplazados. Funciona perfectamente.
>
> El archivo original sería:
> Nombre del Sistema: %NombreSistema%
> Fecha de Inicio: %FechaInicio%
>
> y el archivo modificado sería:
> Nombre del Sistema: SQL_CONTA
> Fecha de Inicio: 12/06/2010
>
> Saludos.
>
> Walter.

__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5837 (20110201) __________

ESET NOD32 Antivirus ha comprobado este mensaje.

http://www.eset.com




__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5837 (20110201) __________

ESET NOD32 Antivirus ha comprobado este mensaje.

http://www.eset.com

Kike. Sevilla

unread,
Feb 1, 2011, 12:22:59 PM2/1/11
to Comunidad de Visual Foxpro en Español
Gracias esto era lo que buscaba.

On 1 feb, 18:01, "Arnaldo Toledano \(GMail\)"

Luis Maria Guayan

unread,
Feb 1, 2011, 12:31:55 PM2/1/11
to publice...@googlegroups.com
Los mensajes del grupo están  en la siguiente URL: http://groups.google.com/group/publicesvfoxpro

Allí hay un cuadro de texto y un botón "Buscar en este grupo"


Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

 

Reply all
Reply to author
Forward
0 new messages