Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Increment time() by 1 minute
Message
De
10/06/2005 23:05:55
 
 
À
10/06/2005 20:02:34
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 8 SP1
Database:
Visual FoxPro
Divers
Thread ID:
01020951
Message ID:
01022399
Vues:
14
>>Check Dragan's sample for example and try it a few times.

I thought that was Dragan's sample I was working with???

>>Also try to SQL select with equality operator.

I just did and yes... againsts SQL Server it is buggy. And... it was buggy against free tables in VFP.
CLOSE DATABASES ALL
SET SAFETY OFF 
CREATE TABLE Test1 (dt t)
=RAND(234)
FOR X = 1 TO 1000
  INSERT INTO Test1 (dt) VALUES (DATETIME()+ROUND((RAND()*10000),0))
ENDFOR
COPY TO Test2
SCAN
  m.tDate = Test1.dt
  REPLACE Test1.dt WITH m.tDate
  m.tDate = Test1.dt
  SELECT * FROM Test2 WHERE dt=tDate INTO CURSOR Temp
  IF RECCOUNT()#1
    USE 
    SELECT Test2
    LOCATE FOR TTOC(Test1.dt)=TTOC(Test2.dt)
    ? FOUND(),Test1.dt,Test2.dt,Test1.dt=Test2.dt
    CANCEL
  ENDIF
  USE 
  SELECT Test1
ENDSCAN
RETURN
It was interesting to note that Test1.dt=Test2.dt does return .T. even though the select fails to locate the matching record.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform