Hi,
thanks for your tips 
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