LotusScript: Query d'une view Domino -> Génération flat file.

Marsh Posté le 02-07-2004 à 14:55:23

J'ai mis ce post dans "Divers" car même si LotusScript est proche de VB ma question est plus Domino qu'autre chose ...

Rapidement, je cherche à récupérer des datas se trouvant dans une vue Domino pour générer un flat file au format LDIF pour populer un Directory Server LDAP.
Ayant été développeur VB/VBA dans une vie antérieure, la partie génération du fichier ne me pose pas de problème. Par contre j'ai du mal à cerner la Hierarchie de la DB Domino.

J'arrive à acceder à la vue qui m'intéresse et au premier Document sans problème, et celle ci est correctement "set" car le view.Name retourne bien le nom de la vue, et le doc.Created la date de création du premier Document (comparé à Document/Properties/Created de la vue).

Code :

Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim i,j,k As Integer
Dim test1,test2 As String
Set db = session.CurrentDatabase
Set view = db.GetView( "People" )
Set doc = view.GetFirstDocument
MessageBox view.Name & Chr(10) & doc.Created

Je peux aussi compter le nombre de document de la view avec un Do/Until/Loop ... par contre je ne vois pas comment récupérer les champs dans les Documents :??:

Par exemple:

Code :

Messagebox (doc.GetItemValue("LastName" ))

me renvoie une erreur 91 "Object Variable not set" ...

J'aimerai en fait pouvoir récupérer les champs LastName, FirstName, UserID, ... de chaque Document.
Je cherche au bon endroit ? Document(Domino) = Record(Access) par exemple ?

Merci d'avance.

---------------
Institutions européennes: Ensemble d'outils dont le but est de transformer une grande quantité d'argent en merde. Cette merde est utilisée pour créer de nouveaux fonctionnaires. L'argent restant payant des externes pour faire leur travail.

Reply

Marsh Posté le 02-07-2004 à 14:55:23

Reply

Marsh Posté le 02-07-2004 à 15:19:16

En fait c'est une erreur 13 "Type Mismatch" et pas 91 désolé ...
Et ça le fait avec doc.GetItemValue("FirstName" ) ainsi que doc.FirstName

---------------
Institutions européennes: Ensemble d'outils dont le but est de transformer une grande quantité d'argent en merde. Cette merde est utilisée pour créer de nouveaux fonctionnaires. L'argent restant payant des externes pour faire leur travail.

Reply

Marsh Posté le 02-07-2004 à 15:22:16

Bon ben je viens de l'avoir ...

Code :

test = doc.GetItemValue("FirstName" )
Messagebox test(0)
ou
Messagebox doc.FirstName(0)

Pas logique ... mais pas le temps de chipoter.

Message édité par Deadlock le 02-07-2004 à 18:08:02

---------------
Institutions européennes: Ensemble d'outils dont le but est de transformer une grande quantité d'argent en merde. Cette merde est utilisée pour créer de nouveaux fonctionnaires. L'argent restant payant des externes pour faire leur travail.

Reply

LotusScript: Query d'une view Domino -> Génération flat file.

Sujets relatifs:

Leave a Replay