elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Clausula to x para varible de una ruta
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Clausula to x para varible de una ruta  (Leído 3,443 veces)
DJmixmancar

Desconectado Desconectado

Mensajes: 98


Ver Perfil
Clausula to x para varible de una ruta
« en: 30 Septiembre 2008, 18:10 pm »

hola , tengo un problema  :-\
creado un formulario en fox
cuando ejecuto el formulario  .
ahi hay yb text1 donde preciono enter  y me llama otro formulario pero ala llamar me sale  este error

Citar
Error del programa
La Cláusula TO Sólo Se puede Usar Con formularios y conjuntos de formularios modales

mi codigo es este

Citar
sele agenda

set orde to 1
if seek (this.value)
   thisform.txtapellido.value= (agenda.apellido)
   thisform.txtnombre.value= (agenda.nombre)
   thisform.txtgerencia.value=alltrim(agenda.gerencia)
   thisform.txtoficina.value=alltrim(agenda.oficina)
   thisform.txtanexo.value=alltrim(agenda.anexo)
   this.parent.olbFoto.picture=foto
else
   do form c:\agenda\formulario\c_npedido to XValcod
   
   this.value = XValcod
   seek this.value
   thisform.txtnombre.value= (agenda.nombre)
   thisform.txtgerencia.value=alltrim(agenda.gerencia)
   thisform.txtoficina.value=alltrim(agenda.oficina)
   thisform.txtanexo.value=alltrim(agenda.anexo)
   thisform.refresh
endi
sele agenda

lo que esta con rojo me mada el error

Citar
cuando le di pasar de alto al error
me salio el siguiente error
Error del programa
No se encuentra la variable 'XVALCOD'

AL PONER  depurar me manda el ala linea roja
Citar
sele agenda

set orde to 1
if seek (this.value)
   thisform.txtapellido.value= (agenda.apellido)
   thisform.txtnombre.value= (agenda.nombre)
   thisform.txtgerencia.value=alltrim(agenda.gerencia)
   thisform.txtoficina.value=alltrim(agenda.oficina)
   thisform.txtanexo.value=alltrim(agenda.anexo)
   this.parent.olbFoto.picture=foto
else
   do form c:\agenda\formulario\c_npedido to XValcod
   
   this.value = XValcod
   seek this.value
   thisform.txtnombre.value= (agenda.nombre)
   thisform.txtgerencia.value=alltrim(agenda.gerencia)
   thisform.txtoficina.value=alltrim(agenda.oficina)
   thisform.txtanexo.value=alltrim(agenda.anexo)
   thisform.refresh
endi
sele agenda

TAMBIEN CAMBIE
XValcod  por XVALCOD

esto es :
Microsoft Visual FoxPro 6.0


« Última modificación: 30 Septiembre 2008, 18:54 pm por DJmixmancar » En línea

ssccaann43 ©


Desconectado Desconectado

Mensajes: 792


¬¬


Ver Perfil
Re: Clausula to x para varible de una ruta
« Respuesta #1 en: 30 Septiembre 2008, 18:23 pm »

Hermano esto es Visual Basic 6.0


En línea

- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"
BlackZeroX
Wiki

Desconectado Desconectado

Mensajes: 3.158


I'Love...!¡.


Ver Perfil WWW
Re: Clausula to x para varible de una ruta
« Respuesta #2 en: 1 Octubre 2008, 03:39 am »

cual te fumaste ?¿ ¬¬
En línea

The Dark Shadow is my passion.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Cobrar por cancelar una portabilidad es “una cláusula abusiva”
Noticias
wolfbcn 0 1,865 Último mensaje 4 Mayo 2011, 14:06 pm
por wolfbcn
Piden investigar a Dropbox por mentir en su cláusula de seguridad
Noticias
wolfbcn 0 1,486 Último mensaje 17 Mayo 2011, 13:07 pm
por wolfbcn
La cláusula Handles requiere una variable WithEvents ????
.NET (C#, VB.NET, ASP)
luis456 2 9,515 Último mensaje 13 Octubre 2013, 04:45 am
por luis456
clausula Handles | programacion vb
.NET (C#, VB.NET, ASP)
Letraxis9000 1 3,615 Último mensaje 24 Noviembre 2015, 14:03 pm
por Miseryk
clausula DISTINCT
.NET (C#, VB.NET, ASP)
PETTETE 0 2,267 Último mensaje 18 Agosto 2017, 11:44 am
por PETTETE
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines