Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Whose datasession is it?
Message
De
04/04/2014 08:15:59
 
 
À
04/04/2014 05:43:52
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2003
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Divers
Thread ID:
01598035
Message ID:
01598044
Vues:
67
Hi,

I would try this:
&& after menu > program > suspend

local oForm as Form;
, iDS;
, aClasses[1];
, cClass;
, cClasses;

activate screen
iDS = Set("Datasession")

for each oForm in _Screen.Forms foxobject
	set datasession to m.oForm.DataSessionId
	if Set("Hours") = 12 and AClass(m.aClasses, m.oForm) > 0
		cClasses = ''
		for each cClass in m.aClasses
			cClasses = m.cClasses + ', ' + m.cClass && or the opposite way
		endfor
		? m.oForm.Name, Substr(m.cClasses, 3)
	endif
endfor

set datasession to m.iDS
>Just noticed that some of the datasessions have set("hours")=12 even though the app-wide setting should be 24. So it means that some classes and/or forms don't call the code which sets it.
>
>Now how can I know which class created each datasession? There's a bunch of session and form classes, and going through them one by one would be rather cumbersome... Is there an easier way to at least display a hierarchy of inheritance in the project, at least for these two base classes? I can write that, but if there's a ready tool out there, I'd gladly save a couple of hours.
Thierry Nivelet
FoxinCloud
Give your VFP application a second life, web-based, in YOUR cloud
http://foxincloud.com/
Never explain, never complain (Queen Elizabeth II)
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform