Programación General > Visual FoxPro
Tableupdate() Y Tablerevert()
Widark:
Como les baila :D?
Sucede lo siguiente, carga en tiempo de ejecucion una tabla cualquiera (la que selecciona el usuario) así que no tengo una tabla en el Dataenvironment. Cuando quiero utilizar Tableupdate() o TableRevert() aparece un mensaje de error algo con el buffer. Este es el código que utilizo para abrir la tabla:
--- Código: Text ---CLOSE DATABASESstrRuta = GETFILE('DBF','','Abrir',0,'Conectar con...')IF LEN(strRuta) > 0 strTabla = '"' + strRuta + '"' USE &strTabla IN 0 PosicionB = RATC("\",strRuta) && Posicion del primer backslash de derecha a izquierda Extencion = LEN(ALLTRIM(strRuta)) - (PosicionB + 4) && Para quitar la extencion con su punto strTablaActiva = SUBSTR(strRuta,PosicionB + 1,Extencion) &strTablaActiva.BufferMode = 1 ThisForm.chkAparece.ControlSource = strTablaActiva + ".aparece" ThisForm.txtEtiqueta.ControlSource = strTablaActiva + ".etiqueta" ThisForm.txtNomcampo.ControlSource = strTablaActiva + ".nomcampo" ThisForm.txtTamcampo.ControlSource = strTablaActiva + ".tamcampo" ThisForm.txtTipcampo.ControlSource = strTablaActiva + ".tipocampo" ThisForm.txtposicion.ControlSource = strTablaActiva + ".posicion" ThisForm.cmbTipcontrol.ControlSource = strTablaActiva + ".Tipcontrol" ThisForm.edtDescripcio.ControlSource = strTablaActiva + ".descripcio" ThisForm.lstCampos.RowSource = "nomcampo" ThisForm.lstCampos.RowSourceType = 6 ThisForm.lstCampos.ControlSource = strTablaActiva ThisForm.cmdCargar.Enabled = .T.ENDIF La pregunta es como hago para que pueda utilizar TableUpdate() y TableRevert()?. Algun comentario o sugerencia se los agradeceria mucho.
scorpio:
si no me equivoco en el dataeviroment la opcion 1 y cero no te almacena tablas temporales para lo que quieres hacer por lo que en sus proiedades en la opcion buffermodeOverrrite tienes que seleccionar la opcion 2 o 4
haber si funciona....suerte....
Widark:
Gracias por tu respuesta scorpio, lo cambie a 2 pero me sigue apareciendo el mismo error: "Function requires row or table buffering mode. Campos" (Campos es la tabla).
scorpio:
esta instruccion te regresa el buffer a modo 1
&strTablaActiva.BufferMode = 1
pon el buffer en modo 4 y comenta la instruccion
&strTablaActiva.BufferMode = 1
o si lo prefieres en lugar de 1 ponle 4
&strTablaActiva.BufferMode = 4
Widark:
Qu más scorpio?
con ninguna de las opciones funciona sigue apareciendo el mismo mensaje de error. Gracias por tu intencion.
Navegación
[#] Página Siguiente
Ir a la versión completa