Aporte - Mantenimiento de Tablas y Comandos Externos

352 views
Skip to first unread message

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 26, 2017, 1:50:33 PM1/26/17
to Comunidad de Visual Foxpro en Español
Hace poco vi una necesidad de  un usuario que necesitaba usar comandos externos para dar mantenimiento a tablas dentro de su mismo sistema.
Me suponia que el sistema ya esta compilado y es un EXE por tal motivo me imagino que en ese terminal no tendrian VFP y se requiere de manteniento de tablas entre otras cosas, asi que prepare este pequeño modulos en un formulario. (Codigo Completo Abierto)




No es nada de otro mundo, solo que es una alternativa adicional a los sistemas la cual desean realizar algunas actividades externas sin que tengan instalado el VFP. y solo tienen su propios sistema ya trabajando.
Le inclui el proceso de reparacion de tablas en caso que suceda esos problemas que nunca faltan por caida de fluido electrico.

Espero sus comentarios y no maleteos por favor.
cmdvfp._ar

Alberto Mancuso

unread,
Jan 26, 2017, 3:16:43 PM1/26/17
to publice...@googlegroups.com
Muy bueno y práctico ya lo incorporo a mi sistema

C

Douglas Sánchez

unread,
Jan 26, 2017, 3:44:58 PM1/26/17
to publice...@googlegroups.com
Hola, 

Jean Pierre

Interesante form, gracias, Pero en la Ventana de comando puedo ejecutar SQLEXEC? y luego ver los cursores?

Slds

Douglas

Saúl Piña

unread,
Jan 26, 2017, 3:52:19 PM1/26/17
to Comunidad de Visual Foxpro en Español
eso, eso, eso,

Gracias.

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 26, 2017, 3:52:20 PM1/26/17
to Comunidad de Visual Foxpro en Español
puedes poner todos los comandos al mismo tiempo y recien dar el boton ejecutar y solucionado mi estimado.
ejemplo
*******
use ? in 0 exclusive
brow
use
*******
eso copia en el cuadro de comando y de ahi presiona ejecutar y veras que ara todo el proceso, linea por linea.

Saúl Piña

unread,
Jan 26, 2017, 4:03:15 PM1/26/17
to Comunidad de Visual Foxpro en Español
Oks, Jean, hice la prueba de abrir una tabla y si lo hizo todo bien, pero ahora desde el edit, trato de cerrar la tabla con use in o close tables y no funciona, de hecho, ya no me funciona ningun script escrito. Estaré omitiendo algo mi estimado?

gracias de nuevo.

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 26, 2017, 4:11:54 PM1/26/17
to Comunidad de Visual Foxpro en Español
muy cierto, debes agregar esta linea al boton Reparar.
thisform.tablas.btn_cer.Enabled= .T.

debes agregarlo debajo de 
MESSAGEBOX("Tabla Reparada",0+64,"CMD VFP",2000)

cierra tu modulos completo, y vuelve a ejecutarlo, antes cierra todas las tablas
close data all
lo prueba y me avisas.

Saúl Piña

unread,
Jan 26, 2017, 4:23:28 PM1/26/17
to Comunidad de Visual Foxpro en Español
Jean disculpa, estoy utilizando solo el edit ( o linea de comandos) y no los botones.
Aplica tu respuesta en mi caso?

gracias

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 26, 2017, 4:31:33 PM1/26/17
to Comunidad de Visual Foxpro en Español
puedes agregar ahi mismo lo sgte,
SET
y pulsas el boton ejecutar para que puedas ver las tablas libres abiertas y cerrarlas directamente, otra opcion
selec mitabla
use
tercera alternativa
use in mitabla

eso lo puedes hacer desde la ventana comnados, recuerda solo un grupo de comandos a la vez, una vez realizado un grupo, debes de limpiar y realizar otro grupo de comandos., recuerda que dicho modulo se puede perfeccionar a los requerimientos del usuario.

Saúl Piña

unread,
Jan 26, 2017, 4:35:08 PM1/26/17
to Comunidad de Visual Foxpro en Español
exactamente Jean, voy a revisar todo y seguramente hare algunos ajustes, para posteriormente subir a este foro.

mil gracias

y que Dios nos Bendiga!

Elides Paredes

unread,
Jan 26, 2017, 6:14:37 PM1/26/17
to Comunidad de Visual Foxpro en Español
Estimado amigo Jean

Mis saludos

Gracias por compartir tus trasnochos..jejeje. digo tus conocimientos. Con gente como tu es que se nutre éste grupo.

Un abrazo.
Elides Paredes Trump
Barquisimeto Venezuela 

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 26, 2017, 6:37:05 PM1/26/17
to Comunidad de Visual Foxpro en Español
Acabo de realizar algunas correcciones, ya que no abría en algunos, traten de probar la nueva versión 1.60 si siguen encontrando errores me avisan nomas.
Para el caso de la Ventana de Comandos, para que visualice la tabla deben de hacer de la sgte manera.
*******
sele 0
use ?
BROWSE NORMAL IN 'CMDVFP'
*******
de esa manera podra visualizar la tabla en su sistema
Tambien agregue una barrita amarilla indicando lo que se esta haciendo en cada proceso de mantenimiento de tablas




cmdvfp1.6._ar

Germán Fabricio Valdez

unread,
Jan 27, 2017, 5:29:43 AM1/27/17
to Comunidad de Visual Foxpro en Español
estuve analizando el codigo de reparacion de tablas

y note que al intentar arreglar la DBF borra los campos MEMO Y BLOB

ademas la saca a la tabla de la BASE DE DATOS (DBC) entonces se pierden los campos con nombres largos y el campo autoincremental ID

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 27, 2017, 8:47:11 AM1/27/17
to Comunidad de Visual Foxpro en Español
Que tal German, cual seria la mejor solucion para ese caso entonces,ya que lo he usdo muchas veces para reparar infinidad de tablas dañadas y nunca he tenido problema, pero como mencione, para tablas libres, si es una tabla que esta anexada a una base de datos, no lo he probado realmente.
y como mencione es un modulo que puede ser mejorado y perfeccionado de ser el caso, asi que pueden aportarle sin problemas.

integral

unread,
Jan 27, 2017, 1:51:42 PM1/27/17
to Comunidad de Visual Foxpro en Español
Estimado Amigo JEAN PIERRE :

Solo para hacer una pequeña observación y es que al maximizar el formulario ocurre lo remarcado en color verde..(Ver Imagen)


Saludos,

INTEGRAL

Jean Pierre Adonis De La Cruz Garcia

unread,
Jan 30, 2017, 9:35:45 AM1/30/17
to Comunidad de Visual Foxpro en Español
ups.muy cierto, jejej, solo agrguenle el anchor a esos objectosw que se salen de la distorsion nomas. tratare de ajustarlo y subire el cambio.

Jean Pierre Adonis De La Cruz Garcia

unread,
Feb 10, 2017, 10:34:13 AM2/10/17
to Comunidad de Visual Foxpro en Español
Ya le hice la coreccion hace dis, solo me olvide de subirla.

Tambien la puedes encontrar aqui.
https://comunidadvfp.blogspot.com/, ya estaran subiendo el ultimo cambio, que es la 1.70
cmdvfp_1.70._ar

integral

unread,
Feb 10, 2017, 11:10:43 AM2/10/17
to Comunidad de Visual Foxpro en Español

Que tal amigo JEAN PIERRE :

Te Agradezco la corrección realizada...

Consulta, veo que solo asignaste un valor a la propiedad ANCHOR...
Como llegas a deducir dicho valor...

Agradezco tus comentarios.

Saludos,

INTEGRAL

El jueves, 26 de enero de 2017, 13:50:33 (UTC-5), Jean Pierre Adonis De La Cruz Garcia escribió:

Jean Pierre Adonis De La Cruz Garcia

unread,
Feb 10, 2017, 11:19:15 AM2/10/17
to Comunidad de Visual Foxpro en Español
En la propiedad del objetio le das click en Anchor, luego aparecera una ventana para que hasgala prueba y lo dejes tal como lo deseas, y un boton "Sample" o ejemplo, que ira mostrando como quedaria tu objeto.

Luis Maria Guayan

unread,
Feb 10, 2017, 12:14:52 PM2/10/17
to publice...@googlegroups.com

Este artículo de AMBY te puede ayudar con la propiedad Anchor:

-- VFP9 - Novedades - Propiedad Anchor --
https://comunidadvfp.blogspot.com/2005/04/vfp9-novedades-propiedad-anchor.html


Luis María Guayán
Tucumán, Argentina
_______________________________
Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com

El 10/02/17 a las 13:10, integral escribió:
Reply all
Reply to author
Forward
0 new messages