Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Vfp 6.0 viewing files as unsorted with Windows Explore
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00276232
Message ID:
00276372
Vues:
27
George

I just figured it out. There are only 60 seconds and I'm incrementing the seconds by 1 for each file copied and there are over 790 records.

Could I increment the year instead?

Jim







>WHOOPS!,
>
>I was a little premature, it worked for 59 records and then I got a "Getting Systime" program error message.
>
>How do I fix this?
>
>Jim
>
>
>
>>Hi George,
>>
>>Thanks for your help. The following code below works!! In effect I can now view the files in Explore by "hip number"
>>
>>No way I could have figured this out myself.
>>
>>I appreciate your's and Sylvan's advice.
>>
>>Jim Harvey
>>
>>
>>
>>***MIXEDCOMBINE.PRG
>>SET LIBRARY TO "C:\Program Files\Microsoft Visual Studio\vfp98\foxtools.fll"
>>SET SAFETY OFF
>>close all
>>clear all
>>set talk on
>>set exact off
>>store 0 to mminute
>>use mixed order hip_no in 0
>>use ahorse in 0
>>select mixed
>>scan
>>mname = name
>>select ahorse
>>locate for name = trim(mname)
>>if ! found()
>>IF EOF()
>>LOOP
>>ENDIF
>>SKIP
>>loop
>>endif
>>store alltrim(name) to cname
>>store "c:\pedigrees\mixedcombined\pedigrees\" to cdestination
>>if ! file(cname)
>>wait 'not found'
>>else
>>=FOXTOUCH((cname),1999,10,14,10,mminute,30)
>>copy file (cname) to cdestination + (cname)
>>endif
>>store mminute + 1 to mminute
>>endscan
>>close data
>>return
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform