Solved

Internet Explorer Prompts User to Open/Save Office File / need to clear "Confirm open after download" check box via script

Posted on 2010-11-10
13
1,694 Views
Last Modified: 2012-05-10
We are delpoying an Intranet and when we click a file to download in IE 7 it says
"Some filles can harm your computer. If the infomation looks suspicious or you do not fully trust the source, do not open file"
I need it to just download the file and not promt the user. This is only happening in IE 7. IE 8 seems fine. I have found some info on it...

http://bytes.com/topic/windows/answers/595210-file-download-how-make-windows-stop-asking
http://support.microsoft.com/kb/296717

I know how to modify the setting on the Tools menu, click Folder Options, and then click the File Types tab to view all file types, select doc for example, advanced, then clear the Confirm open after download and click OK.
Click OK to close the Folder Options dialog box.
that works fine I just need to send this out to 300 users on my network. In a VB script of whatever works. The users do not have admin rights.

Thanks!
0
Comment
Question by:Encinitas
  • 7
  • 5
13 Comments
 
LVL 5

Expert Comment

by:MrN1c3
ID: 34107928
Assuming your client computers are domain members, you should be able to overcome this by adding the intranet server as a trusted site via group policy.
0
 

Author Comment

by:Encinitas
ID: 34107954
Did that. Its in there. Only fix is manuel as noted above.  Need script to apply to 300 pcs.
0
 
LVL 66

Expert Comment

by:johnb6767
ID: 34108170
Does it have to be vbs?

Also, for each file extension, do this for me.....

start>run>cmd

assoc .docx
assoc .file extension

YThis will make sure we cover each file extension you need it done for....
0
 

Author Comment

by:Encinitas
ID: 34108234
.docx=Word.Document.12
.doc=Word.Document.8
.xls=Excel.Sheet.8
.xlsx=Excel.Sheet.12
.ppt=PowerPoint.Show.8
.ppt=PowerPoint.Show.12

file=URL:File Protocol
0
 

Author Comment

by:Encinitas
ID: 34108236
it does not have to be vbs, just looking for the best solution.
0
 
LVL 66

Accepted Solution

by:
johnb6767 earned 250 total points
ID: 34108967
Based on the link in your above post, the first set will add the reg values. The Default (@) values are already there by default, and shouldnt be needed. I am just adding the EditFlags value.....

Please try this on a test box first please......
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.12" /v "EditFlags" /t reg_dword /d 0x00010000 /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.8" /v "EditFlags" /t reg_dword /d 0x00010000 /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.12" /v "EditFlags" /t reg_dword /d 0x00010000 /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8" /v "EditFlags" /t reg_dword /d 0x00010000 /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.12" /v "EditFlags" /t reg_dword /d 0x00010000 /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.8" /v "EditFlags" /t reg_dword /d 0x00010000 /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.url" /v "EditFlags" /t reg_dword /d 0x00010000 /f





Prolly shouldnt need these, as they are already set.....



reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.12" /ve /d "Microsoft Word Document" /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.8" /ve /d "Microsoft Word Document" /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.12" /ve /d "Microsoft Office Excel Worksheet" /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8" /ve /d "Microsoft Office Excel Worksheet" /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.12" /ve /d "Microsoft Office PowerPoint Slide Show" /f

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.8" /ve /d "Microsoft Office PowerPoint Slide Show" /f

Open in new window

0
Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

 

Author Comment

by:Encinitas
ID: 34109010
How do I run it?
0
 
LVL 66

Expert Comment

by:johnb6767
ID: 34117510
Sorry, start>run>cmd

Paste in the DOS box. All at once, and hit enter.....
0
 

Author Comment

by:Encinitas
ID: 34122438
Awsome that worked. How would I deploy that to 300 users that do not have local admin.
0
 

Author Comment

by:Encinitas
ID: 34122466
If I could add it to a vb script I have to deploy via SMS that would work or whatevr is easiest.
0
 
LVL 66

Expert Comment

by:johnb6767
ID: 34128384
Or add it to the Machine Startup Script... Runs under the SYSTEM context....
0
 

Author Comment

by:Encinitas
ID: 34137047
Are you saying use group policy to run the startup script?

Would you happen to know how to add the below that you gave me to a vb script?

reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.12" /v "EditFlags" /t reg_dword /d 0x00010000 /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.8" /v "EditFlags" /t reg_dword /d 0x00010000 /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.12" /v "EditFlags" /t reg_dword /d 0x00010000 /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8" /v "EditFlags" /t reg_dword /d 0x00010000 /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.12" /v "EditFlags" /t reg_dword /d 0x00010000 /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PowerPoint.Show.8" /v "EditFlags" /t reg_dword /d 0x00010000 /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.url" /v "EditFlags" /t reg_dword /d 0x00010000 /f

Below is a script I have for another issue andI would like to add what you gave me to it.
Set objShell = CreateObject("WScript.Shell")

' note this value is 9
objShell.RegWrite "HKLM\SOFTWARE\Classes\Excel.Sheet.5\BrowserFlags", 9, "REG_DWORD"

' other values are 8, find and add the ones you want, some here as examples

objShell.RegWrite "HKLM\SOFTWARE\Classes\Excel.Sheet.8\BrowserFlags", 8, "REG_DWORD"
objShell.RegWrite "HKLM\SOFTWARE\Classes\Word.Document.6\BrowserFlags", 8, "REG_DWORD"
objShell.RegWrite "HKLM\SOFTWARE\Classes\Word.Document.8\BrowserFlags", 8, "REG_DWORD"
objShell.RegWrite "HKLM\SOFTWARE\Classes\Word.RTF.8\BrowserFlags", 8, "REG_DWORD"
objShell.RegWrite "HKLM\SOFTWARE\Classes\MSProject.Project.8\BrowserFlags", 8, "REG_DWORD"
objShell.RegWrite "HKLM\SOFTWARE\Classes\PowerPoint.Show.8\BrowserFlags", 8, "REG_DWORD"
objShell.RegWrite "HKLM\SOFTWARE\Classes\PowerPoint.SlideShow.8\BrowserFlags", 8, "REG_DWORD"

thx

0
 
LVL 66

Expert Comment

by:johnb6767
ID: 34149738
Im sorry, I dont code VBS......
0

Featured Post

Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

Join & Write a Comment

It is only natural that we all want our PCs to be in good working order, improved system performance, so that is exactly how programs are advertised to entice. They say things like:            •      PC crashes? Get registry cleaner to repair it!    …
When you upgrade from Windows 8 to 8.1 or to Windows 10 or if you are like me you are on the Insider Program you may find yourself with many 450MB recovery partitions.  With a traditional disk that may not be a problem but with relatively smaller SS…
In this video, we discuss why the need for additional vertical screen space has become more important in recent years, namely, due to the transition in the marketplace of 4x3 computer screens to 16x9 and 16x10 screens (so-called widescreen format). …
With the advent of Windows 10, Microsoft is pushing a Get Windows 10 icon into the notification area (system tray) of qualifying computers. There are many reasons for wanting to remove this icon. This two-part Experts Exchange video Micro Tutorial s…

706 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

22 Experts available now in Live!

Get 1:1 Help Now