ControlSource
Publicado por Stok (79 intervenciones) el 12/05/2001 05:38:48
Alguien me puede decir cual es el error en el siguiente código?
set defa to c:\sistemaindice\Datos
close databases
Bases = 'mc'+trim(thisform.txtano.text)+trim(thisform.txtperiodo.text)
if .not. file (Bases + '.dbf')
* Messagebox("Archivo no Hallado")
thisform.estado.value="Archivo no hallado"
else
do form movimiento
movimiento.text1.controlsource=&Bases..cliente
movimiento.refresh
thisform.estado.value="Archivo hallado"
endif
el mensaje de error que me presenta es:
" No se encuentra el Alias NombreTabla(variable &Bases)"
Muchas Gracias
Sergio
set defa to c:\sistemaindice\Datos
close databases
Bases = 'mc'+trim(thisform.txtano.text)+trim(thisform.txtperiodo.text)
if .not. file (Bases + '.dbf')
* Messagebox("Archivo no Hallado")
thisform.estado.value="Archivo no hallado"
else
do form movimiento
movimiento.text1.controlsource=&Bases..cliente
movimiento.refresh
thisform.estado.value="Archivo hallado"
endif
el mensaje de error que me presenta es:
" No se encuentra el Alias NombreTabla(variable &Bases)"
Muchas Gracias
Sergio
Valora esta pregunta


0