#7394
FRAD
Participant

Hi,

thanks for your tips Smile

But when i use this script i get the following message:

Invaild source File

Here is the script Portal.vbf:

dim oPortal
dim oPortals

set oPortals = GroupWise.PortalManager.Portals
set oPortal = oPortals.Item(“MyCompany”)

if oPortal is nothing Then
set oPortal = oPortals.Add
oPortal.Caption = “My Company”
oPortal.TabCaption = “My Company”
oPortal.ID = “MyCompany”
oPortal.NavigationControlsEnabled = false
oPortal.URLInputEnabled = false
end If
oPortal.Url = “http://intranet”
oPortal.Show
oPortals.ActivePortal = oPortal.ID

set oPortal = nothing
set oPortals = nothing

Bye
Andy