Issue about send email through lotus notes

C

Caroline

I am using following code to send email through lotus notes.

Set notessession = CreateObject("Notes.Notessession")
username = notessession.username
MailDbName = Left$(username, 1) & Right$(username, (Len(username) - InStr(1,
username, " "))) & ".nsf"

Set notesdb = notessession.GetDatabase("", MailDbName)
If notesdb.IsOpen = False Then Call notesdb.OPENMAIL
Set notesdoc = notesdb.CreateDocument

Some of clients got problem. It will hang lotus notes and excel. If I shut
down lotus notes , excel will be fine. I am not sure what's going on. Some of
them have no problem at all.

Thanks
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top