A Microsoft Outlook email forum. Outlook Banter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook - Using Forms
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

Hyperlink button from intranet to public task form



 
 
Thread Tools Search this Thread Display Modes
  #1  
Old February 20th 11, 06:22 PM
Jeffrey Volker Jeffrey Volker is offline
Junior Member
 
First recorded activity at Outlookbanter: Feb 2011
Posts: 1
Default Hyperlink button from intranet to public task form

Trying to link a button to an outlook public form when clicked I get this message from the user webpage.

Webpage error details

User Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; GTB6.6; InfoPath.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)
Timestamp: Sun, 20 Feb 2011 01:27:45 UTC


Message: ActiveX component can't create object: 'Outlook.Application'
Line: 18
Char: 5
Code: 0
URI: file://it-pc/Intranet%20Files/MCR%20Intranet/HTML/help.htm

Below is the code behind the button


1 !DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"
2 html xmlns="http://www.w3.org/1999/xhtml"
3 head
4 meta http-equiv="Content-Type" content="text/html; charset=utf-8" /
5 titleUntitled Document/title
6 /head
7
8
9
10
11 SCRIPT LANGUAGE="VBScript"
12 !--
13 Sub Button1_OnClick
14 Dim outlookApp, oNameSpace
15 Dim oFolder1, oFolder2, oFolder3
16 Dim oItems, oMailItem
17
18 Set outlookApp = CreateObject("Outlook.Application")
19 Set oNameSpace = outlookApp.GetNameSpace ("MAPI")
20 Set oFolder1 = oNameSpace.Folders ("Public Folders")
21 Set oFolder2 = oFolder1.Folders ("All Public Folders")
22 Set oFolder3 = oFolder2.Folders ("Service Request")
23
24 Set myExplorer = oFolder3.GetExplorer
25 myExplorer.Display
26 Set oItems = oFolder3.Items
27 Set oMailItem = oItems.Add ("IPM.Task.SR Ticket")
28 oMailItem.Display
29 End Sub
30 --
31 /SCRIPT
32 /head
33 body
34 form
35 Open Help Desk Ticket br
36 INPUT NAME="Button1" TYPE="BUTTON" VALUE="Open Help Desk Ticket" brbr
37 /form
38 /body
39 /html
Ads
 




Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
XLsheet Button Control to Lauch form the Public Drive IT Girl[_2_] Outlook - Using Forms 2 October 29th 08 05:14 PM
Custom Task Form - Assign Button steve Outlook - Using Forms 1 July 8th 07 07:36 PM
Send Button on Custom Task Form steve Outlook - Using Forms 2 June 15th 07 04:33 AM
Outlook form or Intranet form Richard Outlook - Using Forms 2 October 11th 06 04:40 PM
Public calender link on intranet Dan Eskekärr Outlook - Calandaring 0 May 30th 06 12:23 PM


All times are GMT +1. The time now is 05:14 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2024 Outlook Banter.
The comments are property of their posters.