ADMINP

Conversion des entêtes C++ (.h) en LotusScript. le toolkit est téléchargeable ici => http://www-128.ibm.com/developerworks/l ... lkits.html

ADMINP

Messagepar Stephane Maillard » 23 Oct 2006 à 20:10

Bonjour,

En commentaire les types que je n'ai pas encore définis.
Code : Tout sélectionner
Option Public
' KFM_DEFS => kfm.h

' Valeurs pour dwDeleteInNABType
Const DELETE_PERSON_IN_NAB = 1
Const DELETE_SERVER_IN_NAB = 2
Const DELETE_GROUP_IN_NAB = 3

Type ADMINReqParams
   Flags As Long
   dwDeleteInNABType As Long
   chGroupName As String
   chAltName As String
   chFirstName As String
   chMiddleInitial As String
   chLastName As String
   chAltCommonName As String
   chAltOrgUnitName As String
   chAltLanguage As String
   fDontUseV1ChangeRequest As Boolean
   dbhDirectory As Long
End Type

Type AdminpAddInMessage
   RequestNoteId As Long ' NOTEID
   ResponseNoteID As Long ' NOTEID
End Type

Declare Function ADMINReqDeleteInNAB Lib "nnotes.dll" (dbhAdmin4 As Long, chAuthor As String, chUserName As String, chMailServerName As String, chMailFileName As String, chDeleteMailFile As String, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long

Declare Function ADMINReqDeleteInACL Lib "nnotes.dll" (dbhAdmin4 As Long, chAuthor As String, chUserName As String, chMailServerName As String, chMailFileName As String, chDeleteMailFile As String, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long

Declare Function ADMINReqChkAccessNewReplica Lib "nnotes.dll" (dbhAdmin4 As Long, chAuthor As String, chSrcServer As String, chSrcPathName As String, chTitle As String, ReplicaInfo As Long, chDesServer As String, chDesPathName As String, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' ReplicaInfo as DBREPLICAINFO

Declare Function ADMINReqChkAccessMoveReplica Lib "nnotes.dll" (dbhAdmin4 As Long, chAuthor As String, chSrcServer As String, chSrcPathName As String, chTitle As String, ReplicaInfo As Long, chDesServer As String, chDesPathName As String, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' ReplicaInfo as DBREPLICAINFO

Declare Function ADMINReqRename Lib "nnotes.dll" (hCertCtx As Long, dbhNab As Long, nhNote As Long, pFirstName As String, pMiddleInitial As String, pLastName As String, pOU As String, retfWeLoggedThisEntry As Boolean, retfFatalError As Boolean, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' hCertCtx As HCERTIFIER

Declare Function ADMINReqRecertify Lib "nnotes.dll" (hCertCtx As Long, dbhNab As Long, nhNote As Long, retfWeLoggedThisEntry As Boolean, retfFatalError As Boolean, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' hCertCtx As HCERTIFIER

Declare Function ADMINReqMoveUserInHier Lib "nnotes.dll" (hCertCtx As Long, dbhNab As Long, nhNote As Long, pTargetCert As String, retfWeLoggedThisEntry As Boolean, retfFatalError As Boolean, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' hCertCtx As HCERTIFIER

Declare Function ADMINReqMoveComplete Lib "nnotes.dll" (hCertCtx As Long, dbhAdmin4 As Long, nhAdminReq As Long, pTargetCert As String, retfWeLoggedThisEntry As Boolean, retfFatalError As Boolean, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' hCertCtx As HCERTIFIER

Declare Function ADMINReqUpgradeToHier Lib "nnotes.dll" (hCertCtx As Long, dbhNab As Long, nhNote As Long, pOU As String, retfWeLoggedThisEntry As Boolean, retfFatalError As Boolean, arpAdminReqParamsPtr As ADMINReqParams, wAdminReqParamsSize As Integer) As Long ' hCertCtx As HCERTIFIER
Si vous trouvez des erreurs n'hésitez pas.
Dernière édition par Stephane Maillard le 02 Nov 2006 à 12:23, édité 1 fois.
Cordialement

Stéphane Maillard
Avatar de l’utilisateur
Stephane Maillard
Lord of DominoArea
Lord of DominoArea
 
Message(s) : 8695
Inscrit(e) le : 16 Déc 2004 à 01:10
Localisation : Bretagne

Messagepar oguruma » 02 Nov 2006 à 11:42

juste une petite remarque sur la lisibilité...
pourrais-tu stp mettre un interligne entre chaque declare...

pour le reste je te fais confiance... you are the api's master ;) ;)
Bien à vous

http://www.dominoarea.org/oguruma/

Les téléphones PORTABLES dans les TGV y en a MARRRE de ces voyageurs qui ne respectent pas les autres ! ARRET DES PORTABLES SVP - Merci

Fumeurs ! respectez les non fumeurs !!!
Fumeurs ! respectez la loi de février 2007 et les lieux publics !!! (ie. hall de gares)
Avatar de l’utilisateur
oguruma
Super V.I.P.
Super V.I.P.
 
Message(s) : 4086
Inscrit(e) le : 16 Déc 2004 à 08:50
Localisation : LILLE

Messagepar Stephane Maillard » 02 Nov 2006 à 12:22

Salut,

Oui, je n'avez pas remarqué que c'était illisible.
Cordialement

Stéphane Maillard
Avatar de l’utilisateur
Stephane Maillard
Lord of DominoArea
Lord of DominoArea
 
Message(s) : 8695
Inscrit(e) le : 16 Déc 2004 à 01:10
Localisation : Bretagne


Retour vers Lotus C++ API en LotusScipt