Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
1st App installed at beta site but errors...
Message
De
24/10/2000 21:38:30
Ed Gay
Computer Software Consultants
Bangor, Maine, États-Unis
 
 
À
24/10/2000 11:58:05
Information générale
Forum:
Visual FoxPro
Catégorie:
The Mere Mortals Framework
Divers
Thread ID:
00433499
Message ID:
00433867
Vues:
26
Jim,
I think I found the problem and it maybe a bug in the Framework. The error happens in the cGlobalDataEnvironment, here is the code:


IF EMPTY(this.cResource)
SET RESOURCE ON && error happens here
ELSE
luTemp = this.cResource
SET RESOURCE &luTemp
ENDIF

IF EMPTY(this.cResourceTo)
IF FILE(HOME() + "FOXUSER.DBF")
SET RESOURCE TO (HOME() + "FOXUSER.DBF")
ENDIF
ELSE
luTemp = this.cResourceTo
IF FILE(this.cResourceTo)
luTemp = ["] + luTemp + ["]
SET RESOURCE TO &luTemp
ENDIF
ENDIF

I think that the this.cResourceTo should be checked before you try to set the resouce on. The two If statements should be reversed like this



IF EMPTY(this.cResourceTo)
IF FILE(HOME() + "FOXUSER.DBF")
SET RESOURCE TO (HOME() + "FOXUSER.DBF")
ENDIF
ELSE
luTemp = this.cResourceTo
IF FILE(this.cResourceTo)
luTemp = ["] + luTemp + ["]
SET RESOURCE TO &luTemp
ENDIF
ENDIF

IF EMPTY(this.cResource)
SET RESOURCE ON && now its safe to turn the resource on
ELSE
luTemp = this.cResource
SET RESOURCE &luTemp
ENDIF

How about it Kevin is this a problem?

Ed
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform