Forum Replies Created

Viewing 15 replies - 691 through 705 (of 913 total)
  • Author
    Replies
  • in reply to: HTML containing long URLs in personalized mass email #5746
    Support 1a
    Participant

      I cannot think of another way to do this in the very short term. Our engineering team yesterday updated the personalized mass email applet to include the comments field. They are testing it today. Once they are confident with it, I’ll send you a copy via email. I expect this should be some time later today our time.

      Advansys Support

      in reply to: Toolbar gets double helping of icons #5426
      Support 1a
      Participant

        They may have rolled the fix back into 6.0x as well. I’m not sure, but keep an eye on any 6.0x updates Novell makes available.

        Advansys Support

        in reply to: Cannot see Edirectory applets #5429
        Support 1a
        Participant

          The config line “No config object found in NDS – checking the registry” indicates your user object does not have a Formativ eDirectory configuration associated with it. You need to select a pre-existing eDirectory configuration object, then use the ‘Associate’ button to associate your user object with the configuration object. Alternatively, you could associate a group, OU or O you are member of with the configuration object.

          Please let me know if you require any further assistance.

          Advansys Support

          in reply to: HTML containing long URLs in personalized mass email #5747
          Support 1a
          Participant

            You should be able to create a HTML personilized mass email form containing a long URL embedded in a tag. We created a test form here containing the following long link, which merged out correctly:

            >[URL=http://groups.google.com.au/groups?hl=en&lr=&ie=UTF-8&oe=UTF-8&threadm=ajv8jj%241bs4%241%
            40FreeBSD.csie.NCTU.edu.tw&rnum=2&prev=/groups%3Fq%3Durl%2Blong%2Blength%26hl%3Den%26lr%3D%26ie%3DUTF-8%26oe%
            3DUTF-8%26selm%3Dajv8jj%25241bs4%25241%2540FreeBSD.csie.NCTU.edu.tw%26rnum%3D2]Google
                URL related question[/URL]

            Regarding your other issue, are you still referring to the Personalized Mass Email applet? Engineering advised me this applet doesn’t actually support the comments field, so instead of truncation, you probably wouldn’t see any data from the comments field at all when you perform the merge. Is that what you are seeing?

            Were you placing the URL in the comments field of the address book because they differed for each user, or was this an attempt to work around not being able to insert the URL in the master HTML form?

            You might wish to email more information and a copy of your template to support@advansyscorp.com and I’ll take a look.

            Regards,

            Advansys Support

            [This message was edited by Support 1 on June 19, 2003 at 04:27 PM.]

            in reply to: GW 6.5 sp1 rev B client breaks formativ #5741
            Support 1a
            Participant

              I might need to get you an updated Formativ 1.6 preview build – I’ll contact you directly in this regard.

              Advansys Support

              in reply to: GW 6.5 sp1 rev B client breaks formativ #5745
              Support 1a
              Participant

                Thanks for the info. I think these issues have been fixed in a later build of the SP1 client. I am using 6.5.1 (5/20/2003), which doesn’t exhibit the problems you describe. We did have an earlier SP1 build that did cause most of the icons, etc, to not appear.

                Advansys Support

                in reply to: Signature Path #5735
                Support 1a
                Participant

                  Simon,

                  Assuming you are using the open source version of the applet, try changing the line:

                  sSigDir = Utilities.GetDataDirectory + "Signatures"

                  to

                  sSigDir = "m:advformativdatasignature"

                  or wherever your network drive signature location if. You will need a copy of Formativ Developer or Admin to do this.

                  I hope this helps.

                  Advansys Support

                  in reply to: Centrally managed multiple signature #8558
                  Support 1a
                  Participant

                    I cannot seem to locate your contact details in the forum database. Could you please send an email to sales@advansyscorp.com and we’ll liase directly regarding this issue.

                    Thanks,

                    Advansys Support

                    in reply to: Signature Path #5736
                    Support 1a
                    Participant

                      Assuming you are using the latest version of the ‘Multiple Signatures’ applet, there are two ways to change the default path:

                      1) Execute the applet. When the signature selection dialog appears, press the ‘Settings’ button. Select the desired location.

                      1) If you are using Formativ Admin or Developer, open the applet in the editor and locate the constant called ‘OVERRIDE_PATH’ at the top of the source code. This constant will be set to an empty string. Enter the full path of the location of your signatures.

                      I hope this helps.

                      Advansys Support

                      in reply to: Toolbar gets double helping of icons #5427
                      Support 1a
                      Participant

                        There is a problem with the calendar view context in the GroupWise client that can cause duplicate icons to appear – you are probably experiencing this issue.

                        Novell fixed this problem in the GroupWise 6.5 SP1 client (I’m not sure if SP1 is officially released yet – we are using a beta copy).

                        Advansys Support

                        in reply to: remove formativ portals folder #5732
                        Support 1a
                        Participant

                          Thank you for the update.

                          Advansys Support

                          in reply to: Create Folder and Copy Current Item #6634
                          Support 1a
                          Participant

                            Try this code:

                            const IDS_MAIN_FOLDER   = "People"
                              
                            '-------------------------------------------------------------------------------
                            ' Main-Line processing
                            '-------------------------------------------------------------------------------
                            Sub Main(Client, GWEvent)
                             
                              dim iMsg 
                              dim iFolder    
                               
                              on error resume next
                              Set iMsg = Client.ClientState.CommandMessage
                              
                              ' Do we have a message selected?
                              if not isobject(iMsg) then
                                call msgbox("Please select a message to proceed.", vbInformation, "Message Management")
                                exit sub    
                              end if
                              
                              
                              ' Create the destination folder
                              set iFolder = CreateFolder(GetDisplayName(iMsg.FromText))
                              
                              
                              ' Make sure we have the folder
                              if iFolder is nothing then
                                exit sub
                              end if   
                             
                                  
                              ' Move the message from the current folder into the destination folder's messages collection
                              call Client.ClientState.SelectedFolder.messages.move(iMsg.MessageID, iFolder.Messages)
                              
                              set iMsg = nothing
                                
                            End Sub
                             
                             
                             
                            '-------------------------------------------------------------------------------
                            ' Create the sub folders of the People folder
                            '-------------------------------------------------------------------------------
                            function CreateFolder(aName)
                              
                              set CreateFolder = nothing   
                              
                              if (len(aName) = 0) then
                                exit function
                              end if
                              
                              dim iFolder   
                              dim iMainFolder
                              
                              ' Create the main 'People' folder
                              set iMainFolder = CreateMainFolder()
                             
                              if iMainFolder is nothing then
                                exit function
                              end if    
                                  
                              ' Create the sub folders under the 'People' folder
                              on error resume next
                              set iFolder = iMainFolder.folders.ItemByName(aName)
                                  
                              if iFolder is nothing then
                                set iFolder = iMainFolder.folders.add(aName)
                              end if
                              
                              set CreateFolder = iFolder
                              
                              set iFolder = nothing             
                              set iMainFolder = nothing  
                              
                            end function
                             
                             
                             
                            
                            '-------------------------------------------------------------------------------
                            ' Create the 'people' folder which is off the root
                            '-------------------------------------------------------------------------------
                            function CreateMainFolder()
                              
                              dim iFolder
                              dim iRootFolders
                             
                              groupwise.account.refresh  
                              set iRootFolders = groupwise.account.RootFolder.folders
                              
                              on error resume next
                              set iFolder = iRootFolders.ItemByName(IDS_MAIN_FOLDER)
                                  
                              if iFolder is nothing then
                                set iFolder = iRootFolders.add(IDS_MAIN_FOLDER)
                              end if
                              
                              set CreateMainFolder = iFolder
                              
                              set iFolder = nothing             
                              set iRootFolders = nothing  
                              
                            end function
                             
                             
                             
                            
                            '-------------------------------------------------------------------------------
                            ' Get the sender's display name
                            '-------------------------------------------------------------------------------
                            Function GetDisplayName(aName)
                              
                              Dim iPos
                              dim iText
                                
                              aName = trim(aName)
                              iPos = Instr(1, aName, "<", 1)
                              
                              if (iPos > 0) then
                                iText = trim(mid(aName, 1, iPos -1))
                                if (len(iText) = 0) then
                                  aName = mid(aName, iPos + 1)
                                else
                                  aName = iText
                                end if
                              end if
                              
                              iPos = Instr(1, aName, ">", 1)
                              if (iPos > 0) then
                                aName = mid(aName, 1, iPos -1)
                              end if
                              
                              iPos = Instr(1, aName, "@", 1)
                              if (iPos > 0) then
                                aName = mid(aName, 1, iPos -1)
                              end if  
                                
                              aName = replace(aName, """", "")
                              aName = replace(aName, ".", " ")
                              aName = replace(aName, "/", "")
                              aName = replace(aName, "", "")
                              aName = replace(aName, "'", "")
                              aName = replace(aName, "*", "")
                              aName = replace(aName, ">", "")
                              aName = replace(aName, "<", "")
                                                      
                              GetDisplayName = trim(aName)
                              
                            End Function
                            

                            Most of these objects are native Object API. Have a look at the Novell GroupWise Object API documentation, which is linked from the drop down help menu within the Formativ development environment.

                            in reply to: remove formativ portals folder #5731
                            Support 1a
                            Participant

                              The Formativ portals folder is created on startup if:

                              a) Formativ is installed.
                              b) The folder does not exist in the currently active Groupwise account, and
                              c) The ‘Create a portal folder…’ option is checked in the Formativ Windows Control panel applet.

                              In other words, for a user to see a Formativ portals folder appear if they have not installed Formativ, that users account has been accessed on a machine with Formativ installed with the appropriate ‘create a portal folder option’ checked.

                              (I assume the folder as it appears in the users account is displayed using the standard Groupwise folder icon, as opposed to the custom portals folder icon? If the special icon appears in the other users account then Formativ is installed on the PC.)

                              There is no global ‘create/remove’ portals option, as the feature is client based. As mentioned above, the only way I imagine a Formativ portal folder could appear in a non-Formativ users account would be for that account to be accessed by someone who does have Formativ installed. Could this have happened in your case?

                              Manually deleting the folder will remove it from the account. You may wish to then try accessing the same users account from a Formativ machine to see if the folder re-appears.

                              Please let me know if you are able to reproduce this behavior. We have received no other reports of this nature, and certainly want to address any possible problems.

                              Regards,

                              Advansys Support

                              in reply to: StatusDlg #6640
                              Support 1a
                              Participant

                                Glad to be of assistance!

                                Advansys Support

                                in reply to: Create Folder and Copy Current Item #6637
                                Support 1a
                                Participant

                                  No problems – we always like to try to assist our users. The following code may assist:

                                  dim iMsg 
                                  dim iFolder
                                    
                                  '-------------------------------------------------------------------------------
                                  ' Main-Line processing
                                  '-------------------------------------------------------------------------------
                                  Sub Main(Client, GWEvent)
                                     
                                    on error resume next
                                    Set iMsg = Client.ClientState.CommandMessage
                                    
                                    if not isobject(iMsg) then
                                      call msgbox("Please select a message to proceed.", vbInformation, "Message Management")
                                      exit sub    
                                    end if
                                    
                                    ' Create the destination folder
                                    CreateFolder(GetDisplayName(iMsg.FromText))
                                    
                                    ' Move the message from the current folder into the destination folder's messages collection
                                    call Client.ClientState.SelectedFolder.messages.move(iMsg.MessageID, iFolder.Messages)
                                    
                                    set iMsg = nothing
                                    set iFolder = nothing
                                      
                                  End Sub
                                   
                                   
                                   
                                   
                                  '-------------------------------------------------------------------------------
                                  ' Create the folder if not exists
                                  '-------------------------------------------------------------------------------
                                  sub CreateFolder(aName)
                                    
                                    if (len(aName) = 0) then
                                      exit sub
                                    end if
                                    
                                    dim iRootFolders
                                   
                                    groupwise.account.refresh  
                                    set iRootFolders = groupwise.account.RootFolder.folders
                                    
                                    on error resume next
                                    set iFolder = iRootFolders.ItemByName(aName)
                                        
                                    if iFolder is nothing then
                                      set iFolder = iRootFolders.add(aName)
                                    end if
                                                 
                                    set iRootFolders = nothing  
                                    
                                  end sub
                                   
                                   
                                   
                                  
                                  '-------------------------------------------------------------------------------
                                  ' Get the sender's display name
                                  '-------------------------------------------------------------------------------
                                  Function GetDisplayName(aName)
                                    
                                    Dim iPos
                                    dim iText
                                      
                                    aName = trim(aName)
                                    iPos = Instr(1, aName, "<", 1)
                                    
                                    if (iPos > 0) then
                                      iText = trim(mid(aName, 1, iPos -1))
                                      if (len(iText) = 0) then
                                        aName = mid(aName, iPos + 1)
                                      else
                                        aName = iText
                                      end if
                                    end if
                                    
                                    iPos = Instr(1, aName, ">", 1)
                                    if (iPos > 0) then
                                      aName = mid(aName, 1, iPos -1)
                                    end if
                                    
                                    iPos = Instr(1, aName, "@", 1)
                                    if (iPos > 0) then
                                      aName = mid(aName, 1, iPos -1)
                                    end if  
                                      
                                    aName = replace(aName, """", "")
                                    aName = replace(aName, ".", " ")
                                    aName = replace(aName, "/", "")
                                    aName = replace(aName, "", "")
                                    aName = replace(aName, "'", "")
                                    aName = replace(aName, "*", "")
                                    aName = replace(aName, ">", "")
                                    aName = replace(aName, "<", "")
                                                            
                                    GetDisplayName = trim(aName)
                                    
                                  End Function
                                  

                                  Regards,

                                  Advansys Support

                                Viewing 15 replies - 691 through 705 (of 913 total)