| XML Kiosk |
| Technologie | XAS.Technology | Version | V 6.0.1 |
| Dernière modification | Lundi 26 Avril 2010 | Par | Zaïr BEZGHICHE |
| Dernière vérification | Vendredi 14 Mai 2010 | Par | Support France |
| Thème | Administration des Import/Export, (Web, Web Services, PDA, WidGet, Fat Client) | Fonction | MODIMP.IMPSetBookMark |
| Prototype |
| Function IMPSetBookMark (IdXml As Integer, sChamp As String) As Integer |
| Usage | |||
| Administration-des-Import-Export.IMPSetBookMark(...) | |||
| HTTP (GET,POST) | SOAP WSDL | SOAP REST | XML-RPC |
| Format de sortie | |||
| XML | HTML | TEXT | EXCEL(CSV) |
| Code Source - développement open source |
| Function IMPSetBookMark (IdXml As Integer, sChamp As String) As Integer |
Function IMPSetBookMark (IdXml As Integer, sChamp As String) As Integer
Dim Ret%
Dim s$
Dim i%
Dim ChampNum$
Ret = XasXMLGetAttributbyName(IdXml, "Name", ChampNum)
Ret = XasXmlChildNode(IdXml, s)
If Ret <> False Then
While (Ret <> False)
Ret = XasXMLGetAttributbyName(IdXml, "Id", s)
i = Val(s)
If i > 0 And i < 10 Then
Ret = XasXMLGetAttributbyName(IdXml, "Name", s)
NameTable(i) = s
Ret = XasXMLGetAttributbyName(IdXml, "type", s)
TypeTable(i) = Val(s)
Ret = XasXMLGetAttributbyName(IdXml, "bookMark", s)
NameBookMark(i) = s
ValueBookMark(i) = ValueBookMark(i) + sChamp + ","
Ret = XasXMLGetAttributbyName(IdXml, "Index", s)
If Ret <> False And Val(s) = 1 Then
ChampNumCompta(i) = ChampNum
End If
End If
Ret = XasXmlNextNode(IdXml, s)
Wend
Ret = XasXmlParentNode(IdXml, s)
End If
End Function
|
| Références XAS.Technology |
| XasXMLGetAttributByName , XasXMLChildNode , Val , XasXMLNextNode , XasXMLParentNode , |
| 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 |