Access Notes.ini

Hey everybody

I want to look-up in the notes.ini where the name.id is standing and attach it to a replied mail

So I can see who wants to enter the db and I could then create a password for them

can somebody help me with that.

Subject: Access Notes.ini

You can use the methode:value$ = notesSession.GetEnvironmentString( name$ [, system ] )

Then you need the ‘KeyFilename’ variable.

Tim

Subject: Access Notes.ini

But now I want to attach the file but I have created this

Dim Object as NotesEmbeddedObject

Dim key as String

Dim filename as variant

Dim BodyID as NotesRichTextItemx

Set Db = session.CurrentDatabase

Set Doc = new NotesDocument(Db)

Set BodyID = Doc.CreateRichTextItem(“BodyID”)

Key = session.GetEnvironmentString(“KeyFilename”,True)

filename = dir$(key,4)

Set Object = BodyID.GetEmbeddedObject(filename)

Buffer = Session.CommonUserName

Doc.User = Buffer

Doc.PassWord = password

Doc.Body = “The user is :” & Buffer & chr(10) & "The password is : " & password

Doc.SendTo = “ADT.MAIL@DEV5”

Doc.Send(False)

I will always reseve nothing; whats wrong with it

Subject: RE: Access Notes.ini

Try this:

Dim BodyID as NotesRichTextItemx

has to be:

Dim BodyID as NotesRichTextItem

And you have to add an attachment like this:

Set BodyID = New NotesRichTextItem(Doc, “BodyID”)

Set Object = BodyID.EmbedObject(EMBED_ATTACHMENT, “”, filename)

Tim