irfanhabib
Programmer
Dear All Expert -
i like foxpro and presently i worked in visual foxpro , i have no idea
regarding form base programming , my all coding in prg file. ( Client.Prg )
presently i face problem , i have one(01) database
and i required multi user shared my database.
My Coding In Prg File
=====================
Set talk off
set echo off
set safe off
clear all
clear
Sele A
use counterfile
inde on counter to cnt
set orde to tag cn1
go bott
A=0
GO BOTT
A=COUNTER+1
SELE B
USE CLIENT
INDE ON CLIENTNAME TO CL1
SET ORDE TO TAG CL1
SCAT MEMV BLANK
@ 2,20 SAY 'Client Id : -'
@ 2,35 SAY ALLT(STR(A))
@ 4,20 SAY 'Cliennt Name ' Get M.CLIENTNAME
READ
Problem
=======
This is possible multiuser share above database on realtime, if multi user exceute same program on same
time , client id field automatically sense and display unique number and if any user exit without saving
remaing user clientid counter automatically refresh according to current numeric value.
I am very thankful quick and kind response.
very best regards
irfan habib
i like foxpro and presently i worked in visual foxpro , i have no idea
regarding form base programming , my all coding in prg file. ( Client.Prg )
presently i face problem , i have one(01) database
and i required multi user shared my database.
My Coding In Prg File
=====================
Set talk off
set echo off
set safe off
clear all
clear
Sele A
use counterfile
inde on counter to cnt
set orde to tag cn1
go bott
A=0
GO BOTT
A=COUNTER+1
SELE B
USE CLIENT
INDE ON CLIENTNAME TO CL1
SET ORDE TO TAG CL1
SCAT MEMV BLANK
@ 2,20 SAY 'Client Id : -'
@ 2,35 SAY ALLT(STR(A))
@ 4,20 SAY 'Cliennt Name ' Get M.CLIENTNAME
READ
Problem
=======
This is possible multiuser share above database on realtime, if multi user exceute same program on same
time , client id field automatically sense and display unique number and if any user exit without saving
remaing user clientid counter automatically refresh according to current numeric value.
I am very thankful quick and kind response.
very best regards
irfan habib