Problem is it's not 11.0 for everyone. 9.0 for office 2000 10.0 for office xp 11.0 for office 2003 12.0 for office 2007
-----Original Message----- From: Micheal Espinola Jr [mailto:[EMAIL PROTECTED] Sent: Monday, April 14, 2008 7:07 PM To: NT System Admin Issues Subject: Re: Images not displaying correctly in Outlook 2003 - Problem not solved fro everyone! Here's some kixtart code to clear that folder: $O2K3OSTF=ReadValue ("HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security", "OutlookSecureTempFolder") Del "$O2K3OSTF\*.*" On Sun, Apr 13, 2008 at 8:31 AM, Ben Scott <[EMAIL PROTECTED]> wrote: > On Fri, Apr 11, 2008 at 2:07 PM, Micheal Espinola Jr > <[EMAIL PROTECTED]> wrote: > > The problem isnt your temp folder. Its the folder that is specified here: > > > > HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security, > > OutlookSecureTempFolder > > We use the VBScript below to clean out that folder on a semi-regular basis. > > (Outlook doesn't always clean up after itself when it saves a file > to that folder. Our ERP system always uses the same file name when > generating certain reports which get emailed to other people. When > Outlook encounters the existing file name, it renames the new > attachment to "Whatever (1)", "Whatever (2)", etc. Once it hits > "Whatever (99)", Outlook starts to puke when the user tries to open > said reports.) > > > ' PurgeOutlookTempFiles.VBS - delete contents of Outlook's "secure > temp folder" file attachment directory > ' > Option Explicit > ' > Const WshShellRunShow = 1 > Const WshShellRunWait = True > Const dq = """" > ' > Const AttachFolderRegPath = > "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Security\OutlookSecureTempFolder" > ' > Dim WshShell > Set WshShell = WScript.CreateObject("WScript.Shell") > ' > Dim AttachFolderPath > AttachFolderPath = WshShell.RegRead(AttachFolderRegPath) > ' > ' Make sure path contains expected sub-strings > If (InStr(AttachFolderPath, "Documents and Settings") = 0) _ > Or (InStr(AttachFolderPath, "Temporary Internet Files") = 0) Then > WScript.Echo _ > "Outlook attachment folder path looks strange." & vbNewLine & _ > "Path = <" & AttachFolderPath & ">" & vbNewLine & _ > "Aborting." > WScript.Quit > End If > ' > Dim cmd > cmd = "CMD.EXE /C DEL /F/A " & dq & AttachFolderPath & dq > ' > ' run DEL *.* in a foreground window (so user gets prompted) > WshShell.Run cmd, WshShellRunShow, WshShellRunWait > > > ~ Upgrade to Next Generation Antispam/Antivirus with Ninja! ~ > ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm> ~ > -- ME2 ~ Upgrade to Next Generation Antispam/Antivirus with Ninja! ~ ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm> ~ *** The information in this e-mail is confidential and intended solely for the individual or entity to whom it is addressed. If you have received this e-mail in error please notify the sender by return e-mail delete this e-mail and refrain from any disclosure or action based on the information. *** ~ Upgrade to Next Generation Antispam/Antivirus with Ninja! ~ ~ <http://www.sunbelt-software.com/SunbeltMessagingNinja.cfm> ~
