Configure Formativ Portal

[FRAD]

Hi,

i want to configure the “Formativ Portal”…

How can i rename the “Formativ Portal”, and how can i set the default page? I want that when a user click on the “Formativ” Portal” that the page http://www.xxxxx.com opend…

Is this doable?

Bye

Topic

[MA]

quote:

---

How can i rename the “Formativ Portal”,

---

Select ‘Advansys Formativ’ from Windows ‘Control Panel’ and rename the default portal folder name from the ‘User Interface’ tab.

quote:

---

how can i set the default page? I want that when a user click on the “Formativ” Portal”

---

In the ‘User Interface’ tab above you can specify the applet to execute when the portal folder is selected. Here is some sample code to create a portal.

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://www.advansyscorp.com”
oPortal.Show
oPortals.ActivePortal = oPortal.ID

set oPortal = nothing
set oPortals = nothing

Thanks
MA

[lp_irovetz]

Great MA, thanks

Features request for support : Could it be possible to specify an shared applet rather than a local one ? In this case, it could be possible to deploy a ‘standard’ portal

L.P. Irovetz
Arcane Groupware

[Support 1a]

Thanks MA.

Advansys Support.

[FRAD]

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

[Support 1]

Every script must contain a Main subroutine – the Formativ IDE automatically inserts one when you create a new applet.

I think the source code you are looking for will be something like:

Sub Main(Client, GWEvent)

  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

End Sub

Regards,
Advansys Support

[Author]

Replies