| XML Kiosk |
| Technologie | XAS.Technology | Version | V 6.0.1 |
| Dernière modification | Dimanche 11 Avril 2010 | Par | Zaïr BEZGHICHE |
| Dernière vérification | Samedi 24 Avril 2010 | Par | Support France |
| Thème | Administration des missions, (Web, Web Services, PDA, WidGet, Fat Client) | Fonction | MODTRNEE.TRNEEDelete |
| Prototype |
| Function TRNEEDelete (ctrl As Control, IdOnglet As Integer) As Integer |
| Usage | |||
| Administration-des-missions.TRNEEDelete(...) | |||
| HTTP (GET,POST) | SOAP WSDL | SOAP REST | XML-RPC |
| Format de sortie | |||
| XML | HTML | TEXT | EXCEL(CSV) |
| Code Source - développement open source |
| Function TRNEEDelete (ctrl As Control, IdOnglet As Integer) As Integer |
Function TRNEEDelete (ctrl As Control, IdOnglet As Integer) As Integer
Dim Ret%
Dim sData$
Dim i%
Dim sId$
For i = 1 To MaxGridRow
Ret = ctrl.Selected(i)
If Ret = 1 Then
ctrl.Row = i
ctrl.Col = 11
sId = ctrl.Text
If sId <> "" Then
sData = "UPDATE PiedCmd SET "
sData = sData + "maj='" + Date$ + "',"
sData = sData + "aLink='0.0' "
sData = sData + " WHERE aLink.xxKey=" + sId
Ret = pExecute(sData)
sData = "DELETE * FROM Client "
sData = sData + " WHERE CodeClient.xxKey=" + sId
Ret = pExecute(sData)
End If
End If
Next i
End Function
|
| Références XAS.Technology |
| Date , |
| 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 |