ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Forum AtoutFox : Vues non trouvées   

Sujet

rss Flux RSS des derniers messages

Vous devez vous identifier pour pouvoir poser une question ou répondre.

ven. 22 mai 2020, 18h02
BONEMME
atoutfox.public.association

Vues non trouvées

Bonjour,

J'ai créé und DBC contenant une table(hf) dans un nv projet.
Sur cette table deux vues de recherches pour alimenter un grid
Ces dernières, testées dans le PJT efonctionelle
Un programme de démarrage pour le set d'environnement
Dans la forme un champs texte, et le grid
Dans le lostfocus du texte:
lors de l'appel SELECT vrech_epx
Le programme indique que la vue n'existe pas?
(j'ai effacé toute ldes config et fichier USER au préalable)

Si vous avez une explication je suis preneur.

txtNom = THIS.Value
txtNom = ALLTRIM(txtNom)+REPLICATE(" ",76-LEN(ALLTRIM(txtNom)))
txtNomx = ALLTRIM(txtNom)+REPLICATE("z",76-LEN(ALLTRIM(txtNom)))
txtNom = UPPER(txtNom)
txtNomx = UPPER(txtNomx)

*SELECT tmpd
SELECT hf

DO CASE
CASE Thisform.coptiongroup1.cOptionbutton1.value = 1
SET STEP ON
SELECT vrech_epx
REQUERY("vrech_epx")
COPY TO d_A
SELECT tmpd
APPEND FROM d_A.dbf
DELETE FILE d_A.dbf
DELETE FILE d_A.fpt
CASE Thisform.coptiongroup1.cOptionbutton2.value = 1
SELECT vRech_eps
REQUERY("vRech_eps")
......
ENDCASE

THIS.Value = ""
GO TOP
THISFORM.cgrid1.column1.text1.SetFocus

Merci
Guy Bonemme

--
Guy Bonemme

--
Cet email a fait l'objet d'une analyse antivirus par AVG.
http://www.avg.com
Permalink : http://www.atoutfox.org/nntp.asp?ID=0000019628
19 559 messages dans le forum • Liste complète des messages

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2020.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3