#include "dbinfo.ch"
ANNOUNCE RDDSYS
FUNCTION MAIN
LOCAL nInizio := SECONDS()
LOCAL nContati := 0
LOCAL aArray := {}
SET EXCLUSIVE OFF
USE n:\hse\la
SET INDEX TO n:\hse\la
dbInfo( DBI_SHARED, .F. )
SET ORDER TO 1
GO TOP
DO WHILE !EOF()
AADD( aArray , field->modello )
SKIP
inkey()
ENDDO
? SECONDS() - nInizio
? LEN( aArray )
INIT PROCEDURE RddInit
REQUEST DBFFPT
REQUEST DBFCDX
rddSetDefault( "DBFCDX" )
RETURN
MarcoBoschi wrote:This morning,
I tested this through a vpn
The difference in performance is not as clear as yesterday we have 60 seconds versus 75
I use a smaller table.
Yesterday the differenze was 50% faster using that command
This is the source code
P.S. sometimes my posts do not appear in this group
driessen wrote:Enrico,
I tested the network speed without any programs, using the console COPY command. I copied a file of 600 MB from the server to the workstation in just 8 sec. That looks normal to me.
driessen wrote:What do you mean? What is the difference betwee commit and dbcommit() ?
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 40 guests