Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Seek not working
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Seek not working
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows 2000 SP4
Network:
Windows 2000 Pro
Database:
Visual FoxPro
Divers
Thread ID:
01133476
Message ID:
01133476
Vues:
56
hi all,
I have the code below. it used to work fine but it no longer does. i had not changed the code, at least i am 99% sure that i did not. i have now added in some wait windows to find out whats happening. it is taking a car registration number and making sure that it was not used already. If i try this in a vfp command window it works, in code on the form it does not. i have checked the values that i pass in and they are all correct, ie a duplicate should be found. any help much appreciated.
lclregno = UPPER(ALLTRIM(thisform.pgfpageframe1.page4.txtCma_regno.Value))

SELECT 0
SELECT NWC

WAIT WINDOW "reg is_" + lclregno + "_"

IF lclregno <> ""
	
	WAIT WINDOW "regno variable is not blank"
	
	SELECT NWC
	SEEK lclregno ORDER CMA_regno
	
	IF EOF()
		WAIT WINDOW "try a locate first"
		SELECT NWC
		LOCATE FOR lclregno = UPPER(ALLTRIM(CMA_regno))
		IF FOUND()
			WAIT WINDOW "locate found it"
		ELSE
			WAIT WINDOW "not found"
		ENDIF
...
...
Go raibh maith agat

~M
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform