| XML Kiosk |
| Technologie | XAS.Technology | Version | V 6.0.1 |
| Dernière modification | Vendredi 14 Mai 2010 | Par | Zaïr BEZGHICHE |
| Dernière vérification | Dimanche 16 Mai 2010 | Par | Support France |
| Thème | Administration des articles, (Web, Web Services, PDA, WidGet, Fat Client) | Fonction | ARTMAIN.OPEJobLink |
| Prototype |
| Function OPEJobLink (IdOnglet As Integer) |
| Usage | |||
| Administration-des-articles.OPEJobLink(...) | |||
| HTTP (GET,POST) | SOAP WSDL | SOAP REST | XML-RPC |
| Format de sortie | |||
| XML | HTML | TEXT | EXCEL(CSV) |
| Code Source - développement open source |
| Function OPEJobLink (IdOnglet As Integer) |
Function OPEJobLink (IdOnglet As Integer)
Dim i%
Dim Ret%
Ret = XasUserSetProperties(FrmPage.CelRapOng, 18, 1) 'AutoRedraw
Ret = XasUserSetProperties(FrmPage.CelCible, 139, 0) 'HIGHLIGHT
Ret = XasUserSetProperties(FrmLink.LabMsg, 7, "")
Ret = XasUserSetProperties(FrmGes.LabMsg, 7, "")
Ret = XasUserSetProperties(FrmTarif.LabMsg, 7, "")
For i = 0 To 5
Ret = XasUserSetStateRollOver(FrmPage.RapOng(i), 2)
Next i
GlobLocActifOnglet = IdOnglet
Ret = XasUserSetStateRollOver(FrmPage.RapOng(IdOnglet), 1)
Select Case GlobLocActifOnglet
Case 0
Ret = ARTFormatPage(IdOnglet)
Case 1
Ret = ARTFormatTarif(IdOnglet)
Case 2, 3, 4
GlobLinkCarteType = IdOnglet - 1
Ret = LINKFormatHyb(FrmLink.GridPage, True, IdOnglet)
Case 5
Ret = GRPFormatPage(IdOnglet)
End Select
End Function
|
| Références XAS.Technology |
| XasUserSetProperties , XasUserSetStateRollOver , |
| 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 |