NewItemAlert Modification for outlook path link
Exchange Server Forum Index Exchange Server
Discussion forums for Microsoft Exchange Server users.
Microsoft Outlook
 
 FAQFAQ   MemberlistMemberlist     RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 
 
Google
 
Web ExchangeServerHelp.com
NewItemAlert Modification for outlook path link

 
Post new topic   Reply to topic    Exchange Server Forum Index -> Development
Author Message
beowulfs
Guest





Posted: Fri Dec 17, 2004 2:34 am    Post subject: NewItemAlert Modification for outlook path link Reply with quote

I've got the NewItemAlert working, but i don't like having to click a
web browser link and then insert my uysername and password. i'd rather
have it put in an outlook style link, outlook:\\public folders\All
Public Folders\Newsgroups. that way, you click on it and it brings up a
new outlook window in that folder. I'd also like the subject line to
list not only the subject of the newly posted message but the folder it
was posted to as well (i'm using it on 5 different folders). i've been
running through the script and msdn all day, and i'm burned out. i
just don't know enough vb and cdo to figure it out. could someone
help? thanks.

Back to top
beowulfs
Guest





Posted: Wed Dec 22, 2004 11:20 pm    Post subject: Re: NewItemAlert Modification for outlook path link Reply with quote

solved it myself:

added this:

Dim strOutlookable ' As String added by Troy
Dim strOutlookableL ' As String added by Troy
Dim strOutlookableR ' As String added by Troy
Dim strOutlookableT ' As String added by Troy
Dim intOutlookcount ' As Integer added by Troy
Dim intOutlookcountR ' As Integer added by Troy

' Covert ExOLEDB item URL into an Outlook usable url
intOutlookcount = Len(bstrURLItem)
strOutlookableR = Right(bstrURLItem, intOutlookcount-39)
strOutlookableL = Left(strOutlookableR, 14)
strOutlookableR = Right(strOutlookableR, Len(strOutlookableR)-15)
intOutlookcountR = InstrRev(strOutlookableR, "/", -1, 1)
strOutlookableR = Left(strOutlookableR, intOutlookcountR-1)
strOutlookable = "outlook://" & strOutlookableL & "/All Public
Folders/" & strOutlookableR
strOutlookableT = Replace(strOutlookable, "/", "\")
strOutlookable = Replace(strOutlookable, " ", "%20")

strHTMLBody = strHTMLBody & "<br><b>Click here to see NEW the item
submitted to <a href =" & strOutlookable & ">" & strOutlookableT &
"</a>.</b><br><br>"

beowulfs wrote:
Quote:
I've got the NewItemAlert working, but i don't like having to click a
web browser link and then insert my uysername and password. i'd
rather
have it put in an outlook style link, outlook:\\public folders\All
Public Folders\Newsgroups. that way, you click on it and it brings up
a
new outlook window in that folder. I'd also like the subject line to
list not only the subject of the newly posted message but the folder
it
was posted to as well (i'm using it on 5 different folders). i've
been
running through the script and msdn all day, and i'm burned out. i
just don't know enough vb and cdo to figure it out. could someone
help? thanks.
Back to top
 
Post new topic   Reply to topic    Exchange Server Forum Index -> Development All times are GMT
Page 1 of 1

 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum




Windows Server Dedicated Servers
Contact Us
New Topics Powered by phpBB