| XML Kiosk |
| Technologie | XAS.Technology | Version | V 6.0.1 |
| Dernière modification | Mardi 13 Juillet 2010 | Par | Zaïr BEZGHICHE |
| Dernière vérification | Vendredi 16 Juillet 2010 | Par | Support France |
| Thème | XML Client Service Collaboratif, (Web, Web Services, PDA, WidGet, Fat Client) | Fonction | IHM.IHMGetIdSession |
| Prototype |
| Function IHMGetIdSession (sFile As String) As Integer |
| Usage | |||
| XML-Client-Service-Collaboratif.IHMGetIdSession(...) | |||
| HTTP (GET,POST) | SOAP WSDL | SOAP REST | XML-RPC |
| Format de sortie | |||
| XML | HTML | TEXT | EXCEL(CSV) |
| Code Source - développement open source |
| Function IHMGetIdSession (sFile As String) As Integer |
Function IHMGetIdSession (sFile As String) As Integer
Dim Ret%
Dim s$
Dim IdXml%
IHMGetIdSession = False
If GlobIHMFileSession <> "" Then
Kill sFile
Exit Function
End If
IdXml = XasXmlOpen(sFile, 0, 0, 0, 0)
If IdXml <> False Then
Ret = XasXmlStart(IdXml, 0)
Ret = XasXmlSearchNode(IdXml, "Session", "", "", "")
If Ret <> False Then
Ret = XasXMLGetAttributByName(IdXml, "Id", s)
GlobIHMFileSession = s
GlobIHMIdSession = s
IHMGetIdSession = True
XasTrace " IHMGetIdSession->" + GlobIHMFileSession
End If
Ret = XasXmlCLose(IdXml)
End If
Kill sFile
End Function
|
| Références XAS.Technology |
| Kill , XasXMLOpen , XasXMLStart , XasXMLSearchNode , XasXMLGetAttributByName , XasTrace , XasXMLClose , |
| Audience |
| Cette documentation est destinée aux personnes s'intéressant aux systèmes d'information collaboratifs. Les Webservices, les architectures collabortives et distribuées, les moteurs transactionnelles et les concepts de programmation orientés objet. |
| XAS Services - Zaïr BEZGHICHE - Copyright 1991-2011 tous droits réservés- Powered by XAS.Technology |