Search  
Friday, February 10, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.

SearchForum Home
  Visual FoxPro  Cod, sintaxa si comenzi  QUERY DIN ACCES...
 QUERY DIN ACCES IN FOXPRO
 
 3/2/2010 12:04:50 PM
User is offlineEMRE.RESIT
46 posts


QUERY DIN ACCES IN FOXPRO
 (Romania)
AM URMATORUL QUERY IN ACCES CARE MERGE PERFECT SELECT nota.CONT, Sum(nota.VAL) AS SumOfVAL FROM nota GROUP BY nota.CONT HAVING (((nota.CONT) Like [ENTER THE FIRST CHAR TO SEARCH] & "*" And (nota.CONT) Like "*" & [enter analitic] & "*")) ORDER BY nota.CONT, Sum(nota.VAL); CUM FAC SA MEARGA SI IN FOX?
 3/2/2010 2:00:16 PM
User is offlineaflorin
838 posts
1st


Re: QUERY DIN ACCES IN FOXPRO
 (N/A)
Banuiesc ca [ENTER THE FIRST CHAR TO SEARCH] face sa apara o ferestruica care iti cere sa introduci niste date. Daca da, in VFP ai functia INPUTBOX().
Pe de alta parte, pentru corectitudine, cele doua conditii de pe clauza HAVING pot foarte bine fi mutate pe WHERE.

Florin Aparaschivei - Iasi
 3/3/2010 8:29:32 AM
User is offlineEMRE.RESIT
46 posts


Re: QUERY DIN ACCES IN FOXPRO
 (Romania)
SORRY AM INCERCAT DAR NU DA ACELEASI REZULTATE NU DA O TABELA CARE SA CONTINA CEEA CE URMARESC EU ADICA REZULTATE DE TIPUL 6XXX.T.01 DACA INTRODUC IN PRIMUL INPUTBOX 6 IAR IN AL DOILE .T.01 IMI DA O TAMPENIE
 3/3/2010 9:57:01 AM
User is offlineaflorin
838 posts
1st


Re: QUERY DIN ACCES IN FOXPRO
 (N/A)
In VFP poti folosi macrosubstitutia, ceea ce in cazul tau ar ajuta si la debug.

Concret:
lcSelect = "SELECT nota.Cont, SUM(nota.Val) AS SumOfVal FROM nota WHERE nota.Cont LIKE "
lcRasp = INPUTBOX("Introduceti primul caracter")
// aici ar merge un ALLTRIM, just for sure
lcSelect = lcSelect + " ' " + ALLTRIM(lcRasp) + " *' " + "AND nota.Cont LIKE "
lcRasp = INPUTBOX("Introduceti contul analitic")
lcSelect = lcSelect + " '* " + ALLTRIM(lcRasp) + " *' " + " ORDER BY nota.Cont, SUM(nota.Val)"
// aici pui un messagebox sa vezi cum arata SELECT-ul
MESSAGEBOX(lcSelect)
// acum rulezi select-ul
&lcSelect

PS:
Chestia " ' " am pus-o cu spatii ca sa se vada pe forum. Ai grija la spatii

Florin Aparaschivei - Iasi
  Visual FoxPro  Cod, sintaxa si comenzi  QUERY DIN ACCES...

Search  Forum Home         

 Google Ads Minimize

    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement