>Dear Sir,
>
>When I run Following codes, it do nothing
>What is wrong?
>
>datadir="d:\c2007\tables\"
>backdir="d:\c2007\tables\Backup\"
>
>=adir(afiles,datadir+"*.dbf")
>
>declare integer CopyFile in KERNEL32.dll ;
> string @SourceFileName, ;
> string @DestFileName, ;
>integer bFailIfExists
>
>nsucces=0
>for nt = 1 to alen(afiles,1)
> nsucces=copyfile("datadir"+afiles[nT,1],"backdir"+afiles[nT,1],0)
> wait window "Done"
> if nsucces = 0
> wait window "Error"
> exit
> endif
>endfor
>nsucces=copyfile(datadir+afiles[nT,1],backdir+afiles[nT,1],0)
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
