Messagebox mostrar dato en la ventana del messagebox

[Noe]

Hola foro !!

esperando me puedan ayudar Gracias....

como muestro el numero de empleado en la ventana del messagbox Ejem.

Close tables all
Select 1
Use plantilla

Locate for numemp=Thisform.text1.value
if found()
* Nota lo quiero mostrar aqui
=messagebox( " el numero de empleado que dijito fue ****AQUI*****
","Administrador")
else
=messabox( " no existe")
endif

espero respuesta.

[Jorge Luis Vázquez Hernández]

SOLO ASIGNA EL VALO DEL CAMPO DE TU TABLA A UNA VARIABLE, EJEMPLO
If found()
     _cCveEmpleado=Tabla.CampoClave
     =Messageboc("codigo Digitado --> "+_cCveEmpleado, etc,etc)
else
     =Messageboc("codigo No encontrado -->"_VarNoencontrado, etc,etc)
Endif

 
 

---

SERVICE COMPUTER XPRESS

 

COMPRA-VENTA DE EQUIPO DE COMPUTO

INSTALACION DE REDES ESTRUCTURADAS, SISTEMAS ASPEL, MEGAPAQ Y SISTEMAS A LA MEDIDA

REPARACION DE PC'S, LAPTOPS, IMPRESORAS, REINSTALACIONES DE SOFTWARE

SOLUCIONES EN SOFTWARE PARA LA MICRO Y PYMES

 

 

T.S.C. JORGE LUIS VAZQUEZ HERNANDEZ

---

 
> Date: Tue, 19 Jan 2010 18:16:58 -0800
> Subject: [Mundo Visual FoxPro] Messagebox mostrar dato en la ventana del messagebox
> From: elcorre...@yahoo.com.mx
> To: mundovis...@googlegroups.com

---

Tus fotos, tus amigos y todo las fiestas de diciembre las tienes en Windows Live

[Noe]

Gracias Jorge por tu tiempo y sabiduria........

Te mando un saludo Noe Diego Velazquez Hernandez

On 20 ene, 03:22, Jorge Luis Vázquez Hernández

<jlvazque...@hotmail.com> wrote:
> SOLO ASIGNA EL VALO DEL CAMPO DE TU TABLA A UNA VARIABLE, EJEMPLO
>
> If found()
>
>      _cCveEmpleado=Tabla.CampoClave
>
>      =Messageboc("codigo Digitado --> "+_cCveEmpleado, etc,etc)
>
> else
>
>      =Messageboc("codigo No encontrado -->"_VarNoencontrado, etc,etc)
>
> Endif
>

> SERVICE COMPUTER XPRESS
>
> COMPRA-VENTA DE EQUIPO DE COMPUTO
> INSTALACION DE REDES ESTRUCTURADAS, SISTEMAS ASPEL, MEGAPAQ Y SISTEMAS A LA MEDIDA
> REPARACION DE PC'S, LAPTOPS, IMPRESORAS, REINSTALACIONES DE SOFTWARE
> SOLUCIONES EN SOFTWARE PARA LA MICRO Y PYMES
>
> T.S.C. JORGE LUIS VAZQUEZ HERNANDEZ
>
>
>
>
>

> > Date: Tue, 19 Jan 2010 18:16:58 -0800
> > Subject: [Mundo Visual FoxPro] Messagebox mostrar dato en la ventana del messagebox

> > From: elcorreode_...@yahoo.com.mx

> > To: mundovis...@googlegroups.com
>
> > Hola foro !!
>
> > esperando me puedan ayudar Gracias....
>
> > como muestro el numero de empleado en la ventana del messagbox Ejem.
>
> > Close tables all
> > Select 1
> > Use plantilla
>
> > Locate for numemp=Thisform.text1.value
> > if found()
> > * Nota lo quiero mostrar aqui
> > =messagebox( " el numero de empleado que dijito fue ****AQUI*****
> > ","Administrador")
> > else
> > =messabox( " no existe")
> > endif
>
> > espero respuesta.
>

> _________________________________________________________________
> Descubre Windows 7http://www.windows.com.mx- Ocultar texto de la cita -
>
> - Mostrar texto de la cita -

[MVilchez]

&&SELECT _Tmp_arti
Resp=messagebox("Se Eliminara el Producto : " + Chr(13) + "Codigo: "+
ALLTRIM(CodArti) + Chr(13) + "Descripcion: "+ ALLTRIM(Descrip) ,36,
sAplica)
IF Resp=6
DELETE
ENDIF

> > Descubre Windows 7http://www.windows.com.mx-Ocultar texto de la cita -
>
> > - Mostrar texto de la cita -- Ocultar texto de la cita -

[Noe]

GRACIAS ...

A todos, quedo resulto

> > > Descubre Windows 7http://www.windows.com.mx-Ocultartexto de la cita -

[Ing.Daniel Bojorge]

Lo otro es igual a lo que ya te dijeron, pero sin asignarlo a una variable

If found()
     =Messageboc("codigo Digitado --> "+Tabla->CampoClave, etc,etc)
else
     =Messageboc("codigo No encontrado ", etc,etc)
Endif

Dios L@s Bendiga

Saludos,

Daniel (Con 1 Estrella DCE de Microsoft)
Nicaragua

visita www.debs.educaleft.com

--
_______________________________________________________________
Has recibido este mensaje porque estás suscrito al Grupo "Mundo Visual
FoxPro" de Grupos de Google.

Para anular la suscripción a este grupo, envía un mensaje a:
mundovisualfox...@googlegroups.com

[Carlos Miguel FARIAS]

Cada vez que respondo una consulta del foro, puedo poner mi aviso publicitario? O eso es una falta de ética.

[Mario Alfredo Oviedo]

eso es porque al fin es viernes, de los chistes

[Carlos Miguel FARIAS]

En este foro, tambien se mandan chistes los viernes (en vfoxpro de yahoo, tenemos esa costumbre).
Mi pregunta fue porque como firma de una de las respuetas, había una publicidad de oferta de productos y servicios informáticos, mas grande que la respuesta o aporte efectuado.
Saludos: Miguel

El 20 de enero de 2010 17:34, Mario Alfredo Oviedo <maov...@hotmail.com> escribió:

eso es porque al fin es viernes, de los chistes