OT: network access speed
Posted: Thu Jun 25, 2009 6:13 pm
I developed a app where I check for the existence of a xxxt.ldb file.
If the file is there the depending xxx.dbf is locked otherwise free.
(a kind of filelocking - necessary because FWPPC and FWH work on the same files).
Now I started to test on the hardware where this app (ECR) software
should work on. The files are on a network.
This is my code I tested with file() and also Directory().
But it takes at least 4 sec. till file() or directory() function notice that the file is deleted.
On my develop machine or with the PPC – Symbol - where I use the same code for testing the existence of the file - this takes milli seconds.
On the ECR there is a Windows CE embedded installed.
Does someone have an idea how to speed up the response time?
Thanks in advance
Otto
If the file is there the depending xxx.dbf is locked otherwise free.
(a kind of filelocking - necessary because FWPPC and FWH work on the same files).
Now I started to test on the hardware where this app (ECR) software
should work on. The files are on a network.
This is my code I tested with file() and also Directory().
But it takes at least 4 sec. till file() or directory() function notice that the file is deleted.
On my develop machine or with the PPC – Symbol - where I use the same code for testing the existence of the file - this takes milli seconds.
On the ECR there is a Windows CE embedded installed.
Does someone have an idea how to speed up the response time?
Thanks in advance
Otto
- Code: Select all Expand view
- do while .t.
//HB_GCAll( .T. )
//sysrefresh()
//HB_IdleState()
//if file( ::oApp:dbfTisch + ".ldb" ) = .t.
aTisch := Directory( ::oApp:dbfTisch + ".ldb" )
if len(aTisch) > 0
nVersuche := nVersuche + 1
MsgWait("Tisch gesperrt","Versuch Nr: " + str(nVersuche),1)
if nVersuche > 10
if MsgYesNo( "Tisch gesperrt - Abbruch" ) = .t.
exit
endif
endif
else
exit
endif
enddo