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	Vendredi 23 Avril 2010	Par	Zaïr BEZGHICHE
Dernière vérification	Jeudi 29 Avril 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.cri_Click

Prototype

Sub cri_Click ()

Usage
Accueil-pour-les-media-WAP-Telephone-PDA.cri_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 cri_Click ()

Sub cri_Click ()
Dim Ret%
Dim Id%
Dim s$
Dim S2$
Dim i%

s = Left$(cri.Text, 25)
LabCheck(CurrentCur).Caption = s
LabCheck(CurrentCur).Visible = True
s = Trim$(Right$(cri.Text, 4))
Ret = Val(s)
If Ret <> 0 Then
    TabId(CurrentCur) = Ret
    Id = NextCur 'CurrentCur + 1
    s = ""
    For i = 1 To MaxCritere
        If TabId(i) <> 0 Then
            s = s + "c" + CStr(i) + "=" + CStr(TabId(i)) + " AND "
        End If
    Next i
    If s = "" Then
        S2 = "S_MroCrit 0,''"
        Ret = FaireSQLtoCOMBO(s, 1)
    Else
        S2 = "S_MroCrit 0,'" + Left$(s, Len(s) - 4) + "'"
        Ret = FaireSQLtoCOMBO(S2, Id)
    End If
End If

End Sub

Références Composants

Accueil-pour-les-media-WAP-Telephone-PDA-StPlate-FaireSQLtoCOMBO,

Références XAS.Technology

Left , Trim , Right , Val , Cstr , Len ,

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.