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.
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