I'm using win32::ole to open an excel spreadsheet.  The code used to work, but then they installed antivirus software on the server (windows NT Server, Norton Antivirus), and I think that's why my code doesn't work anymore.
 
 
<snip>
Norton AntiVirus 2000 detects VBS.NewLove.A in the file ActivePerl-Winfaq12.html.

Workaround

This is a false positive by Norton AntiVirus. ActivePerl-Winfaq12.html has been examined by hand, and it is likely that the following example code is what causes the false report.

   <BLOCKQUOTE>
    <P><CODE>use strict;<BR>
      use Win32::OLE;<BR>
      use Win32::OLE::Const 'Microsoft Outlook';<BR>
      <BR>
      my $Outlook = Win32::OLE-&gt;new('Outlook.Application', 'Quit');<BR>
      my $ol = Win32::OLE::Const-&gt;Load($Outlook);<BR>
      <BR>
      my $namespace = $Outlook-&gt;GetNamespace(&quot;MAPI&quot;);<BR>
      my $Folder = $namespace-&gt;GetDefaultFolder(olFolderInbox);<BR>
      my $NewFolder = $Folder-&gt;Folders-&gt;Add(&quot;Test1&quot;);</CODE></P>
    </BLOCKQUOTE>

This can be tested by removing the above code from the ActivePerl-Winfaq12.html file and rescanning with Norton AntiVirus. Norton AntiVirus will no longer detect VBS.NewLove.A.

Symantec has been notified of this issue.

</snip>

So, by 'workaround', the mean brick wall?  Is there a way around this?

Reply via email to