VBSCRIPT + Outlook 2003

TheMSsForum.com: The Microsoft Software Forum

Hi,
I got an Intranet asp page with some user infomations from a database.
I need to transfert these informations into an outlook Contact.
For this I wrote:
<html>
<body>
<script language="VBScript">
function olContact()
on error resume next
Set ol = GetObject("Outlook.application")
if err.number = 0 then
Set olns = ol.GetNameSpace("MAPI")
Set MyFolder = olns.GetDefaultFolder(10)
Set MyItem = MyFolder.Items.Add("IPM.Contact.MyForm")
MyItem.Display
myCode .....
else
msgbox "ERROR"
end if
end function
</script>
</body>
</html>

But I always got an error: "ActiveX component can't create object"
I customed the security level of my Intranet Site in IE but nothing .....

I use:
Win2K SP4
Office 2003 SP1
IE6

Any idea please ?
Thanks.
Top

Re: VBSCRIPT + Outlook 2003 by joker

joker
Tue Sep 14 16:41:13 CDT 2004

Is outlook still operating in the default of the restricted sites zone?

That is the default setting for that version of outlook.

javier wrote:

> Hi,
> I got an Intranet asp page with some user infomations from a database.
> I need to transfert these informations into an outlook Contact.
> For this I wrote:
> <html>
> <body>
> <script language="VBScript">
> function olContact()
> on error resume next
> Set ol = GetObject("Outlook.application")
> if err.number = 0 then
> Set olns = ol.GetNameSpace("MAPI")
> Set MyFolder = olns.GetDefaultFolder(10)
> Set MyItem = MyFolder.Items.Add("IPM.Contact.MyForm")
> MyItem.Display
> myCode .....
> else
> msgbox "ERROR"
> end if
> end function
> </script>
> </body>
> </html>
>
> But I always got an error: "ActiveX component can't create object"
> I customed the security level of my Intranet Site in IE but nothing .....
>
> I use:
> Win2K SP4
> Office 2003 SP1
> IE6
>
> Any idea please ?
> Thanks.
>
>

Top