wordFindAndreplace("foxpro","FoxPro","c:\informe.doc")
FUNCTION wordFindAndReplace
LPARAMETERS cValueTofind,cValueToreplace,cDocument
LOCAL lValue
oWord=CREATEOBJECT("word.application")
oDocument=oWord.Documents.OPEN(cDocument)
loSelection=oWord.SELECTION
WITH loSelection.FIND
.TEXT = cValueToFind
.Forward = .T.
.WRAP= 1
ENDWITH
DO WHILE .T.
lValue = loSelection.FIND.Execute
IF lValue
loSelection.Cut
loSelection.InsertBefore(cValueToReplace)
loselection.MoveRight
ELSE
EXIT
ENDIF
ENDDO
ENDFUNC
oWord.VISIBLE =.T.Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn’t provide a direct interface to embed itself into a host application.
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
@Ariel:
no me parece que sirva para nada "copiar el texto" como vos dec�s, porque �d�nde lo pegar�as para que te respete el formato?.
Una forma ser�a automatizar Word para grabar el archivo como RTF y despu�s usar un control RichTextControl
para mostrar el texto en un form VFP (http://support.microsoft.com/kb/253684/es). Utilic� algo similar en una
ocasi�n as� que s� que funciona.
Otra forma (bastante m�s complicada) la muestra Rick Strahl en http://www.west-wind.com/weblog/posts/2005/Jan/13/Embedding-Microsoft-Word-as-a-control-into-Desktop-Forms ; copio la parte relevante del m�todo que usa:
Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn�t provide a direct interface to embed itself into a host application.
�
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
HTH
Mario
---
El jueves, 1 de noviembre de 2012 20:28:08 UTC-3, Ariel escribi�:Hola amigos, sigo insistiendo, necesito pasar un texto de un documento en word a una variable, textbox, memobox, lo que sea.�encontr�este�c�digo�en PORTALFOXhttp://www.portalfox.com/index.php?name=News&file=article&sid=1361�que me hizo�ilusionar�much�simo, pero le di vueltas y no�encontr�la forma.
en este�c�digo�busca una palabra en el documento y la�reemplaza�por otra.�cual seria la�funci�n�de seleccionar todo el texto y copiarlo?? seguramente esta a la vista... pero no lo veo.. ayuda por favor.
desde ya muchas gracias
Ariel D'Alfeo
Codigo: Compartido Por�MAOH
wordFindAndreplace("foxpro","FoxPro","c:\informe.doc") FUNCTION wordFindAndReplace LPARAMETERS cValueTofind,cValueToreplace,cDocument LOCAL lValue oWord=CREATEOBJECT("word.application") oDocument=oWord.Documents.OPEN(cDocument) loSelection=oWord.SELECTION WITH loSelection.FIND .TEXT = cValueToFind .Forward = .T. .WRAP= 1 ENDWITH DO WHILE .T. lValue = loSelection.FIND.Execute IF lValue loSelection.Cut loSelection.InsertBefore(cValueToReplace) loselection.MoveRight ELSE EXIT ENDIF ENDDO ENDFUNC oWord.VISIBLE =.T.
--
�
�
�
-- Ariel D'Alfeo C�rdoba, Argentina
Hola Mario, pienso igual que vos, no tiene sentido pasar de un word a fox. lo útil seria al revés... pero uno se encuentra con cada usuario... el tema es que el usuario hace unos informes en word y quiere que estén en el sistema, lo vengo discutiendo hace mucho tiempo... pero al tipo le gusta word y tiene gente en otros lugares que también lo hacen en word.
no quiero poner directamente los documentos en la BD para que no se haga pesada, ya que el servidor y la red son de un nivel regular-bajo.
No me interesa el formato, solo el contenido.
hemos probado de que copien y peguen, pero tuvimos algunos pequeños problemas por caracteres inválidos, cantidad de palabras, etc.. y son suficientes motivos para que te rompan las p.... por un buen tiempo.
Como veras el usuario es bastante básico, osea no le puedo decir que lo guarde en RTF o en texto plano, el tipo tiene que apretar un botón buscar el archivo y listo.
nos toca solucionarles la vida a los que pagan... no queda otra.
Voy a mirar el articulo que me pasaste, pero te juro que estoy arto de leer y buscar, pero no le encuentro la vuelta.
Muchas gracias por la ayuda
Ariel D'Alfeo
El 01/11/2012 20:51, Mario López escribió:
@Ariel:
no me parece que sirva para nada "copiar el texto" como vos decís, porque ¿dónde lo pegarías para que te respete el formato?.
Una forma sería automatizar Word para grabar el archivo como RTF y después usar un control RichTextControl
para mostrar el texto en un form VFP (http://support.microsoft.com/kb/253684/es). Utilicé algo similar en una
ocasión así que sé que funciona.
Otra forma (bastante más complicada) la muestra Rick Strahl en http://www.west-wind.com/weblog/posts/2005/Jan/13/Embedding-Microsoft-Word-as-a-control-into-Desktop-Forms ; copio la parte relevante del método que usa:
Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn’t provide a direct interface to embed itself into a host application.
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
HTH
Mario
---
El jueves, 1 de noviembre de 2012 20:28:08 UTC-3, Ariel escribió:
Hola amigos, sigo insistiendo, necesito pasar un texto de un documento en word a una variable, textbox, memobox, lo que sea. encontré este código en PORTALFOXhttp://www.portalfox.com/index.php?name=News&file=article&sid=1361 que me hizo ilusionar muchísimo, pero le di vueltas y no encontré la forma.
en este código busca una palabra en el documento y la reemplaza por otra.
cual seria la función de seleccionar todo el texto y copiarlo?? seguramente esta a la vista... pero no lo veo.. ayuda por favor.
desde ya muchas gracias
Ariel D'Alfeo
Codigo: Compartido Por MAOH
----
-- Ariel D'Alfeo Córdoba, Argentina
Hola�Si la idea es solamente guardarlo, lo puedes guardar como un archivo pdf asi conserva su formato tambi�n�Saludos�
Hola lo correcto seria mejor insertarlo en un campo memo de un cursor temporal.
saludes
Hola Mario, pienso igual que vos, no tiene sentido pasar de un word a fox. lo �til seria al rev�s... pero uno se encuentra con cada usuario... el tema es que el usuario hace unos informes en word y quiere que est�n en el sistema, lo vengo discutiendo hace mucho tiempo... pero al tipo le gusta word y tiene gente en otros lugares que tambi�n lo hacen en word.
�no quiero poner directamente los documentos en la BD para que no se haga pesada, ya que el servidor y la red son de un nivel regular-bajo.
No me interesa el formato, solo el contenido.
�hemos probado de que copien y peguen, pero tuvimos algunos peque�os problemas por caracteres inv�lidos, cantidad de palabras, etc.. y son suficientes motivos para que te rompan las p.... por un buen tiempo.
Como veras el usuario es bastante b�sico, osea no le puedo decir que lo guarde en RTF o en texto plano, el tipo tiene que apretar un bot�n buscar el archivo y listo.
nos toca solucionarles la vida a los que pagan... no queda otra.
Voy a mirar el articulo que me pasaste, pero te juro que estoy arto de leer y buscar, pero no le encuentro la vuelta.
Muchas gracias por la ayuda
Ariel D'Alfeo
El 01/11/2012 20:51, Mario L�pez escribi�:
@Ariel:
no me parece que sirva para nada "copiar el texto" como vos dec�s, porque �d�nde lo pegar�as para que te respete el formato?.
Una forma ser�a automatizar Word para grabar el archivo como RTF y despu�s usar un control RichTextControl
para mostrar el texto en un form VFP (http://support.microsoft.com/kb/253684/es). Utilic� algo similar en una
ocasi�n as� que s� que funciona.
Otra forma (bastante m�s complicada) la muestra Rick Strahl en http://www.west-wind.com/weblog/posts/2005/Jan/13/Embedding-Microsoft-Word-as-a-control-into-Desktop-Forms ; copio la parte relevante del m�todo que usa:
Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn�t provide a direct interface to embed itself into a host application.
�
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
HTH
Mario
---
El jueves, 1 de noviembre de 2012 20:28:08 UTC-3, Ariel escribi�:
Hola amigos, sigo insistiendo, necesito pasar un texto de un documento en word a una variable, textbox, memobox, lo que sea.�encontr�este�c�digo�en PORTALFOXhttp://www.portalfox.com/index.php?name=News&file=article&sid=1361�que me hizo�ilusionar�much�simo, pero le di vueltas y no�encontr�la forma.
en este�c�digo�busca una palabra en el documento y la�reemplaza�por otra.�
cual seria la�funci�n�de seleccionar todo el texto y copiarlo?? seguramente esta a la vista... pero no lo veo.. ayuda por favor.
desde ya muchas gracias
Ariel D'Alfeo
Codigo: Compartido Por�MAOH
--
�
�
�
-- Ariel D'Alfeo C�rdoba, Argentina
------
�
�
�
--
Ing. Douglas S�nchez Guill�n�� � �Consultor Informatico
Claro: 505 88495476
�
�
�
--
���� ������������������������� Ricardo Pina
Desarrollo y Servicios Inform�ticos
����������������� Profesionales
�������������� www.dsip.com.ar��
�
�
�
Douglas seria buenísimo guardarlo en un campo memo, pero como lo hago??.
Ricardo el guardar el archivo no me interesa, quiero que el contenido se vea en un textbox. el formato tampoco me interesa solo el contenido
El 01/11/2012 21:55, Ricardo Pina escribió:
HolaSi la idea es solamente guardarlo, lo puedes guardar como un archivo pdf asi conserva su formato tambiénSaludos
El 1 de noviembre de 2012 21:46, Douglas Sánchez <dougl...@gmail.com> escribió:
Hola lo correcto seria mejor insertarlo en un campo memo de un cursor temporal.
saludes
El 1 de noviembre de 2012 18:22, Ariel D'Alfeo <ariel...@gmail.com> escribió:
Hola Mario, pienso igual que vos, no tiene sentido pasar de un word a fox. lo útil seria al revés... pero uno se encuentra con cada usuario... el tema es que el usuario hace unos informes en word y quiere que estén en el sistema, lo vengo discutiendo hace mucho tiempo... pero al tipo le gusta word y tiene gente en otros lugares que también lo hacen en word.
no quiero poner directamente los documentos en la BD para que no se haga pesada, ya que el servidor y la red son de un nivel regular-bajo.
No me interesa el formato, solo el contenido.
hemos probado de que copien y peguen, pero tuvimos algunos pequeños problemas por caracteres inválidos, cantidad de palabras, etc.. y son suficientes motivos para que te rompan las p.... por un buen tiempo.
Como veras el usuario es bastante básico, osea no le puedo decir que lo guarde en RTF o en texto plano, el tipo tiene que apretar un botón buscar el archivo y listo.
nos toca solucionarles la vida a los que pagan... no queda otra.
Voy a mirar el articulo que me pasaste, pero te juro que estoy arto de leer y buscar, pero no le encuentro la vuelta.
Muchas gracias por la ayuda
Ariel D'Alfeo
El 01/11/2012 20:51, Mario López escribió:
@Ariel:
no me parece que sirva para nada "copiar el texto" como vos decís, porque ¿dónde lo pegarías para que te respete el formato?.
Una forma sería automatizar Word para grabar el archivo como RTF y después usar un control RichTextControl
para mostrar el texto en un form VFP (http://support.microsoft.com/kb/253684/es). Utilicé algo similar en una
ocasión así que sé que funciona.
Otra forma (bastante más complicada) la muestra Rick Strahl en http://www.west-wind.com/weblog/posts/2005/Jan/13/Embedding-Microsoft-Word-as-a-control-into-Desktop-Forms ; copio la parte relevante del método que usa:
Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn’t provide a direct interface to embed itself into a host application.
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
HTH
Mario
---
El jueves, 1 de noviembre de 2012 20:28:08 UTC-3, Ariel escribió:
Hola amigos, sigo insistiendo, necesito pasar un texto de un documento en word a una variable, textbox, memobox, lo que sea. encontré este código en PORTALFOXhttp://www.portalfox.com/index.php?name=News&file=article&sid=1361 que me hizo ilusionar muchísimo, pero le di vueltas y no encontré la forma.
en este código busca una palabra en el documento y la reemplaza por otra.
cual seria la función de seleccionar todo el texto y copiarlo?? seguramente esta a la vista... pero no lo veo.. ayuda por favor.
desde ya muchas gracias
Ariel D'Alfeo
Codigo: Compartido Por MAOH
--
-- Ariel D'Alfeo Córdoba, Argentina
--
--
Ing. Douglas Sánchez Guillén
Consultor Informatico
Claro: 505 88495476
--
-- Ariel D'Alfeo Córdoba, Argentina
--
Hola Ariel
Mira este programa, puede que sirva para lo que deseas:�http://www.pdfzilla.com/zilla_word_to_text_converter.html
Saludos.V�ctor.
El 2 de noviembre de 2012 07:32, Ariel D'Alfeo <ariel...@gmail.com> escribi�:
Douglas� seria buen�simo guardarlo en un campo memo, pero como lo hago??.
Ricardo el guardar el archivo no me interesa, quiero que el contenido se vea en un textbox. el formato tampoco me interesa solo el contenido
El 01/11/2012 21:55, Ricardo Pina escribi�:
Hola�Si la idea es solamente guardarlo, lo puedes guardar como un archivo pdf asi conserva su formato tambi�n�Saludos�
Hola lo correcto seria mejor insertarlo en un campo memo de un cursor temporal.
saludes
El 1 de noviembre de 2012 18:22, Ariel D'Alfeo <ariel...@gmail.com> escribi�:
Hola Mario, pienso igual que vos, no tiene sentido pasar de un word a fox. lo �til seria al rev�s... pero uno se encuentra con cada usuario... el tema es que el usuario hace unos informes en word y quiere que est�n en el sistema, lo vengo discutiendo hace mucho tiempo... pero al tipo le gusta word y tiene gente en otros lugares que tambi�n lo hacen en word.
�no quiero poner directamente los documentos en la BD para que no se haga pesada, ya que el servidor y la red son de un nivel regular-bajo.
No me interesa el formato, solo el contenido.
�hemos probado de que copien y peguen, pero tuvimos algunos peque�os problemas por caracteres inv�lidos, cantidad de palabras, etc.. y son suficientes motivos para que te rompan las p.... por un buen tiempo.
Como veras el usuario es bastante b�sico, osea no le puedo decir que lo guarde en RTF o en texto plano, el tipo tiene que apretar un bot�n buscar el archivo y listo.
nos toca solucionarles la vida a los que pagan... no queda otra.
Voy a mirar el articulo que me pasaste, pero te juro que estoy arto de leer y buscar, pero no le encuentro la vuelta.
Muchas gracias por la ayuda
Ariel D'Alfeo
El 01/11/2012 20:51, Mario L�pez escribi�:
@Ariel:
no me parece que sirva para nada "copiar el texto" como vos dec�s, porque �d�nde lo pegar�as para que te respete el formato?.
Una forma ser�a automatizar Word para grabar el archivo como RTF y despu�s usar un control RichTextControl
para mostrar el texto en un form VFP (http://support.microsoft.com/kb/253684/es). Utilic� algo similar en una
ocasi�n as� que s� que funciona.
Otra forma (bastante m�s complicada) la muestra Rick Strahl en http://www.west-wind.com/weblog/posts/2005/Jan/13/Embedding-Microsoft-Word-as-a-control-into-Desktop-Forms ; copio la parte relevante del m�todo que usa:
Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn�t provide a direct interface to embed itself into a host application.
�
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
HTH
Mario
---
El jueves, 1 de noviembre de 2012 20:28:08 UTC-3, Ariel escribi�:
Hola amigos, sigo insistiendo, necesito pasar un texto de un documento en word a una variable, textbox, memobox, lo que sea.�encontr�este�c�digo�en PORTALFOXhttp://www.portalfox.com/index.php?name=News&file=article&sid=1361�que me hizo�ilusionar�much�simo, pero le di vueltas y no�encontr�la forma.
en este�c�digo�busca una palabra en el documento y la�reemplaza�por otra.�
cual seria la�funci�n�de seleccionar todo el texto y copiarlo?? seguramente esta a la vista... pero no lo veo.. ayuda por favor.
desde ya muchas gracias
Ariel D'Alfeo
Codigo: Compartido Por�MAOH
--
�
�
�
-- Ariel D'Alfeo C�rdoba, Argentina
--
�
�
�
--
Ing. Douglas S�nchez Guill�n
--�� � �Consultor Informatico
Claro: 505 88495476
�
�
�
--
�
�
�
----
�
�
�
�
�
�
Hola Ariel
Mira este programa, puede que sirva para lo que deseas:�http://www.pdfzilla.com/zilla_word_to_text_converter.html
Saludos.V�ctor.
El 2 de noviembre de 2012 07:32, Ariel D'Alfeo <ariel...@gmail.com> escribi�:
Douglas� seria buen�simo guardarlo en un campo memo, pero como lo hago??.
Ricardo el guardar el archivo no me interesa, quiero que el contenido se vea en un textbox. el formato tampoco me interesa solo el contenido
El 01/11/2012 21:55, Ricardo Pina escribi�:
Hola�Si la idea es solamente guardarlo, lo puedes guardar como un archivo pdf asi conserva su formato tambi�n�Saludos�
Hola lo correcto seria mejor insertarlo en un campo memo de un cursor temporal.
saludes
El 1 de noviembre de 2012 18:22, Ariel D'Alfeo <ariel...@gmail.com> escribi�:
Hola Mario, pienso igual que vos, no tiene sentido pasar de un word a fox. lo �til seria al rev�s... pero uno se encuentra con cada usuario... el tema es que el usuario hace unos informes en word y quiere que est�n en el sistema, lo vengo discutiendo hace mucho tiempo... pero al tipo le gusta word y tiene gente en otros lugares que tambi�n lo hacen en word.
�no quiero poner directamente los documentos en la BD para que no se haga pesada, ya que el servidor y la red son de un nivel regular-bajo.
No me interesa el formato, solo el contenido.
�hemos probado de que copien y peguen, pero tuvimos algunos peque�os problemas por caracteres inv�lidos, cantidad de palabras, etc.. y son suficientes motivos para que te rompan las p.... por un buen tiempo.
Como veras el usuario es bastante b�sico, osea no le puedo decir que lo guarde en RTF o en texto plano, el tipo tiene que apretar un bot�n buscar el archivo y listo.
nos toca solucionarles la vida a los que pagan... no queda otra.
Voy a mirar el articulo que me pasaste, pero te juro que estoy arto de leer y buscar, pero no le encuentro la vuelta.
Muchas gracias por la ayuda
Ariel D'Alfeo
El 01/11/2012 20:51, Mario L�pez escribi�:
@Ariel:
no me parece que sirva para nada "copiar el texto" como vos dec�s, porque �d�nde lo pegar�as para que te respete el formato?.
Una forma ser�a automatizar Word para grabar el archivo como RTF y despu�s usar un control RichTextControl
para mostrar el texto en un form VFP (http://support.microsoft.com/kb/253684/es). Utilic� algo similar en una
ocasi�n as� que s� que funciona.
Otra forma (bastante m�s complicada) la muestra Rick Strahl en http://www.west-wind.com/weblog/posts/2005/Jan/13/Embedding-Microsoft-Word-as-a-control-into-Desktop-Forms ; copio la parte relevante del m�todo que usa:
Embedding Word into a FoxPro (or any other ActiveX container) is not easily done. Although Word is an Activedocument host, it doesn�t provide a direct interface to embed itself into a host application.
�
You can make this happen however, by using the Microsoft Web Browser ActiveX control and hosting a Word document inside of it. You can simply navigate the WebBrowser to a Word Document and Word will load into the browser control in place and expose the Word object model via the Document property.
HTH
Mario
---
El jueves, 1 de noviembre de 2012 20:28:08 UTC-3, Ariel escribi�:
Hola amigos, sigo insistiendo, necesito pasar un texto de un documento en word a una variable, textbox, memobox, lo que sea.�encontr�este�c�digo�en PORTALFOXhttp://www.portalfox.com/index.php?name=News&file=article&sid=1361�que me hizo�ilusionar�much�simo, pero le di vueltas y no�encontr�la forma.
en este�c�digo�busca una palabra en el documento y la�reemplaza�por otra.�
cual seria la�funci�n�de seleccionar todo el texto y copiarlo?? seguramente esta a la vista... pero no lo veo.. ayuda por favor.
desde ya muchas gracias
Ariel D'Alfeo
Codigo: Compartido Por�MAOH
--
�
�
�
-- Ariel D'Alfeo C�rdoba, Argentina
--
�
�
�
--
Ing. Douglas S�nchez Guill�n
--�� � �Consultor Informatico
Claro: 505 88495476
�
�
�
--
�
�
�
----
�
�
�
�
�
�
oWord.VISIBLE =.T.oWord=CREATEOBJECT("word.application")
oDocument=oWord.Documents.OPEN(cDocument)
loSelection=oWord.SELECTION
WITH loSelection
.WholeStory .Copy ENDWITH
ENDFUNC
--