Lotus Notes help...

B

Big Monkey

Active Member
Joined
Nov 5, 2005
Messages
255
Code: 
' Open and locate current LOTUS NOTES User
    
        Set Session = CreateObject("Notes.NotesSession")
            UserName = Session.UserName
        MailDbName = Left$(UserName, 1) & Right$(UserName, (Len(UserName) - InStr(1, UserName, " "))) & ".nsf"
        Set Maildb = Session.GETDATABASE("", MailDbName)
        If Maildb.IsOpen = True Then
        Else
            Maildb.OPENMAIL
        End If

This is the code directly from NateO's awesome Lotus Notes e-mail macro.

My question is this:

This code identifies the user that is currently logged in to Lotus Notes. Is there a way I can format this piece of code to use a specific Notes ID? When this macro runs, I want it to mask the actual users's ID and use another so that the recipient sees another SMTP instead of the real one.

Any help?
 

Excel Facts

Who is Mr Spreadsheet?
Author John Walkenbach was Mr Spreadsheet until his retirement in June 2019.
Sort by date Sort by votes
That's an excellent question because we worked on that problem for a few weeks at the office last year and nobody could find the answer not even the customer service at Lotus. The problem is in the following (you need to select another username but it's tricky and couldn't work for us).

Good luck, Matt

MailDbName = Left$(UserName, 1) & Right$(UserName, (Len(UserName) - InStr(1, UserName, " "))) & ".nsf"
 
Upvote 0
I can set that no problem.

I actualy edited the line to show:

MailDbName = "BigMonkey.nsf"

and the code still works. The problem is that the recipient still sees the name of the currently logged in user.

I am missing some other parameters here. I'm thinking that it will require somehow switching the info somewhere and add in a password via VBA code.

Where is NateO when ya need him? :)

J/K Nate if you read this, your code rocks !
 
Upvote 0
I had tried that too it didn t work. You may want to try to close the current session and to reopen one with the new user.
 
Upvote 0
Ya the only option I have right now is to switch user IDs by adding a new location to each Notes workstation, but it is a pain.

There has to be a solution, I hope I find it.

At the least, I want to code in a method to auto switch user IDs with password included, and then switch back.
 
Upvote 0
Where is NateO when ya need him? :)
Click to expand...
Somebody ring? :lol:

So, you want to spoof the sender's name/address, eh? Against my better judgment, I'll provide you a Lotus-specific solution tomorrow, the specific code is on my other computer... I'll provide it because I believe there are legitimate reasons for doing this... Including a great April 1 e-mail opportunity. :)

Don't get any crazy ideas with this, your IP is still shipped in the header, do not work with the impression that you are truly anonymous. ;)
 
Upvote 0
Wow!

What's up NateO?

It's wierd I just happend to be browsing here right now. I'm working on another stats reporting spreadsheet that is related to this thread.

Nah, I don't have anything intended for the spoofing other than the recipient not being able to see who really sent the email.

For the moment, I ended up having to add a new location to each Lotus workstation. Each user is having to toggle back and forth between the UserID I want the emails to be sent from, and back to their own ID to send internal emails.

It's a pain, but it's all I could come up with for the moment.

If you have some code I could use to bypass that, it would be awesome! I will check back here tommorow, or you could email me directly at SpamThis@Spam.com if you like.

Thanks!

  • Edited by Nate: Email address removed.
 
Upvote 0
Small world, eh? :)

The solution is much more simple than that, it's a one-liner, a property of e-mail document.

I just don't recall what it is off the top of my head. I'll post it here, tomorrow. Book it. ;)

Incidentally, my super, heavy-duty, hardcore Admin rights allow me to see your email address in your profile, even if you think it's hidden.

I'm going to remove your e-mail address from your post, so that you don't wind up having your e-mail address harvested for some serious spamming.
 
Upvote 0
You are welcome, and I found the thread where I learned how to do this. :lol:

See the following:

http://www.xtremevbtalk.com/showthread.php?t=172691

They both work, but try the first one first, if I recall correctly, that's the COM approach whereas the 2nd is OLE, and I believe you're using COM.

I'll still post my code tomorrow though, I had to tweak this a bit to make it work consistently, I was getting mixed results using it as is...
 
Upvote 0
You must log in or register to reply here.

Similar threads

D
  • Solved
VBA Lotus Notes using MIME HTML and attaching a PDF in Email Body
Replies
3
Views
2K
John_w
J
C
  • Question Question
VBA attachments auto save help
Replies
0
Views
620
cxm687
C
S
  • Question Question
VBA to email cc using addresses in cells
Replies
7
Views
6K
Trevor G
Trevor G
A
  • Question Question
Help on how to update this code to have it send to recipients in Cell Value
Replies
1
Views
1K
agutosay
A
C
  • Solved
How to send these created outlook emails?
Replies
3
Views
830
cutemeatball
C

Forum statistics

Threads
1,224,621
Messages
6,179,936
Members
452,949
Latest member
beartooth91

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top