Hola,
¿Nadie ha hecho nada parecido?
En alguna parte del programa tienes una rutina para reindezax , es decir una
rutina que borra los índices y luego los crea, porque si lo tienes solo es
cambiar la instrucción por un set Order to Tag y generaría índices
estructurtados CDX de fox
Te mando esta rutina de una amigo foxcero
*--------------------------------------------------------
*Es un pequeño programa que regenera indices,
*pero a partir de un directorio dado, o sea lo pongo en un directorio y el
*comienza a recolectar todas las tablas del directorio y crea un nuevo prg
*para crear los indices de cada tabla, a mi me gusto mucho, espero que os
*sirva si es que aun no lo tienes, gracias amigo, y saludos desde Paraguay.
*Lic. Pedro David Ovando
*Dpto. Informática
*Facultad Politécnica UNE
*CDE- Paraguay
Function crearIndices
*/ Programa para crear un prg de indexaciones de todos los Dbf's Actuales.
*/ Programador: David Ovando
*/ Local: MercoSoft
*/ Fecha: 18/08/1999-
*/ Ult. Modif. 23/08/1999 = .Punto: se ha agregado la sentencia delete tag
all en caso de rupturas.
close all
=adir(matriz,'*.dbf')
=asort(matriz)
x_canal = fcreate('indexar.prg')
for c=1 to int(alen(matriz)/5)
use (matriz(c,1))
if tagcount()>0
=fput(x_canal,'use '+matriz(c,1)+' exclusive')
=fput(x_canal,'delete tag all')
for k=1 to tagcount()
=fput(x_canal,'index on '+sys(14,k)+chr(9)+'tag '+TAG(k))
endfor
=fput(x_canal,' ')
endif
endfor
=fclose(x_canal)
modi file indexar.prg
*--------------------------------------------------------
Jairo
-----Mensaje original-----
De: publice...@googlegroups.com
[mailto:publice...@googlegroups.com] En nombre de Masternet
Enviado el: Viernes, 20 de Mayo de 2011 05:10
Para: Comunidad de Visual Foxpro en Español
Asunto: [vfp] Re: Utilizar tabla .dbf con índice .mdx en Vfp9