FoxPro/Visual FoxPro - WITH/ENDWITH

 
Vista:
Imágen de perfil de Ana

WITH/ENDWITH

Publicado por Ana (186 intervenciones) el 04/05/2005 19:28:26
Tengo el siguiente codigo en el boton Nuevo :

SET EXCLUSIVE on
OPEN DATABASE stock
SELECT 0
USE articulos
APPEND BLANK
thisform.text1.Value = 0
thisform.text2.Value = SPACE(35)
CLOSE DATABASES
thisform.command1.Enabled = .f
thisform.command2.enabled = .t.
thisform.command2.SetFocus
return

y este otro el Aceptar :

SET EXCLUSIVE on
OPEN DATABASE stock
SELECT 0
USE articulos
GO bottom
replace articulos.codart WITH thisform.text1.Value
replace articulos.nombre WITH thisform.text2.Value
thisform.command2.Enabled = .f
thisform.command1.Enabled = .t.
CLOSE databases
thisform.command1.SetFocus
return

cuando lo ejecuto me aparece el siguiente error :

La expresion no es valida fuera de WITH/ENDWITH
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder