Administration des emails, (Web, Web Services, PDA, WidGet, Fat Client)
XAS.Services
  XML Kiosk  
Technologie XAS.Technology Version V 6.0.1
Dernière modification Dimanche 3 Janvier 2010 Par Zaïr BEZGHICHE
Dernière vérification Mardi 5 Janvier 2010 Par Support France
ThèmeAdministration des emails, (Web, Web Services, PDA, WidGet, Fat Client) Fonction FrmMail.Form_EvtUser

Prototype
Sub Form_EvtUser (Evt As Integer, id As Integer, Idn As Integer, RefObject As String, sParam As String)
Usage
Administration-des-emails.Form_EvtUser(...)
HTTP (GET,POST)SOAP WSDLSOAP RESTXML-RPC
Format de sortie
XML HTML TEXT EXCEL(CSV)

Code Source - développement open source
Sub Form_EvtUser (Evt As Integer, id As Integer, Idn As Integer, RefObject As String, sParam As String)
Sub Form_EvtUser (Evt As Integer, id As Integer, Idn As Integer, RefObject As String, sParam As String)
Dim Ret%
Dim s$
 
If Evt = 23 Then
    For Ret = 0 To 4
	txt(Ret).Text = ""
    Next Ret
    Ret = PosCombo(cb(0), "2")
    Ret = PosCombo(cb(1), "1")
    Ret = PosCombo(cb(2), "2")
    Ret = PosCombo(cb(3), "2")
    Ret = PosCombo(cb(4), "2")
    Ret = PosCombo(cb(5), "0")
    Ret = PosCombo(cb(6), "2")
    Ret = PosCombo(cb(7), "2")
    StrURI = ""
    If XasUserGetString(6, s) = True Then
	txt(0).Text = s
    End If
    If XasUserGetString(7, s) = True Then
	txt(1).Text = s
    End If
    If XasUserGetString(8, s) = True Then
	txt(2).Text = s
    End If
    If XasUserGetString(9, s) = True Then
	txt(3).Text = s
    End If
    If XasUserGetString(10, s) = True Then
	StrURI = s
    End If
End If
End Sub

Références Composants
Administration-des-emails-FrmMail-PosCombo,

Références XAS.Technology
XasUserGetString ,

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