Problemas al borrar un registro desde una interfaz grafica

javier
23 de Octubre del 2003
En la interfaz que estoy desarrollando en foxpro no me deja borrar, al presionar el boton borrar me despliega un mensaje que dice que debo abrir el archivo de manera exclusiva, el codigo que tengo en el boton borrar, es el siguiente:

mensaje=messagebox('¿Seguro que desea borrar este registro?',4+32+256,'Eliminar registros')
do case
case mensaje=6
delete from actividad where resp = " "
pack
go top
thisform.refresh
case mensaje=7
thisform.refresh
endcase

Que debo hacer??? AYUDA!!!

Gracias

abraham
23 de Octubre del 2003
salu2

el probelma se debe q que has abierto tu tabla o base de datos en modo "shared" esto es modo compartido.

para poder borrar tienes que abrir tu base de datos o tabla en modo "exclusive"

por ejemplo:

use mi_tabla exclusive

open database mi_base_de_datos exclusive

si la abriste en modo compartido tendras que cerrar tu tabla o base de datos y despues abrirla en modo exlusivo y ahora si utilizar el codigo que mencionas en este liga y despues la cierras y la abres de nuevo en modo compartido.



Luisen98
23 de Octubre del 2003
Lo que dice Abraham es correcto....pero quien te esta dando el problema no es el delete sino el PACK, que requiere la tabla en uso EXCLUSIVE.