Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Interactive Seek
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Interactive Seek
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01228215
Message ID:
01228215
Vues:
65
I have done an Interactive SEEK in the past so that as you type in your seek content, the database pointer moves closer to the targeted record.

I have a TAG called PNDTSER, meaning "Product # + Date + Serial #". However, as I type in the seek on this search, it does not move the pointer at all until I have typed in all of the Product Number and at least the year and month of the date, which is put in as character data type as in "2007/05/11", so the search isn't even happening until at least the following is entered: "0703101352007/05". 9 characters for the PN and 7 characters for the date.

Can anyone tell me why this doesn't seem to work?

This is what I have int he Combobox's LostFocus:
   CASE This.ListIndex = 6   && Product # + Date + Serial
      WAIT WINDOW NOWAIT "Setting Order to Product # + Date + Serial #"
      SET ORDER TO PNDTSER
      .txtSearch.MaxLength = LEN(Certs.PN) + LEN(Certs.cDate) + LEN(Certs.Serial)
      .txtSearch.InputMask = "9999999999999/99/99999999"
The next part is the seek in the Search Textbox's Interactive Change event:
WITH ThisForm
   IF NOT(EMPTY(This.Value))
      SEEK(UPPER(ALLTRIM(This.Value)))
   ENDIF
   IF EOF()
      ThisForm.nextButton.Enabled = .F.
   ENDIF
   ThisForm.Refresh()
ENDWITH
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform