XAS, Xml Server, Xml Services, XML Kiosk, Accueil pour les média WAP,Téléphone,PDA, (Web, Web Services, PDA, WidGet, Fat Client)

Accueil pour les média WAP,Téléphone,PDA, (Web, Web Services, PDA, WidGet, Fat Client)

Technologie	XAS.Technology	Version	V 6.0.1
Dernière modification	Lundi 31 Mai 2010	Par	Zaïr BEZGHICHE
Dernière vérification	Mardi 8 Juin 2010	Par	Support France
Thème	Accueil pour les média WAP,Téléphone,PDA, (Web, Web Services, PDA, WidGet, Fat Client)	Fonction	StPlate.BtnLogin_Click

Prototype

Sub BtnLogin_Click ()

Usage
Accueil-pour-les-media-WAP-Telephone-PDA.BtnLogin_Click(...)
HTTP (GET,POST)	SOAP WSDL	SOAP REST	XML-RPC

Format de sortie
XML	HTML	TEXT	EXCEL(CSV)

Code Source - développement open source

Sub BtnLogin_Click ()

Sub BtnLogin_Click ()
Dim S1$
Dim S2$
Dim Ret%


S1 = TxtInfo(0).Text
S2 = TxtInfo(1).Text



Ret = XasUserCheckAcces("", S1, S2)
If Ret = True Then
    Ret = XasSystemGetStatusUser(GlobPU, "", 0)
    If Ret = True Then
        S1 = GlobPU.ExeName
        CurPro_Id = Val(GlobPU.XasIdBase)
        'Ret = XasUserRunService(S1)
        'If GlobPU.BsMedia = XASMEDIA_WEB Then
        '    Ret = XasUserSendMessage(0, 1, 2, S2)
        'End If
    End If
    Frame1.Visible = False
Else
    LabInfo.Caption = "Connexion Refused"
End If

End Sub

Références XAS.Technology

XasUserCheckAcces , XasSystemGetStatusUser , Val ,

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.