[Iska]

Beer-Sheva, вообще-то, правильным будет не предупреждения отключать, а удалять альтернативный поток у загруженного файла (если Вы уверены в его безопасности), например, посредством PowerShell или хотя бы (Streams).

Far Manager

У текущего файла или всех выделенных файлов:

Код:

local FILE_ATTRIBUTE_DIRECTORY = 0x00000010

if APanel.Visible then                                                                                                              -- Активная панель видима?
	if APanel.FilePanel and APanel.Type == 0 then                                                                                   -- Активная панель файловая?
		if APanel.Selected then                                                                                                     -- Активная панель содержит выделенные элементы?
			for i = 1, APanel.ItemCount do                                                                                          -- Перебираем все элементы активной панели
				if Panel.Item(0, i, 8) then                                                                                         -- i-тый элемент активной панели выделен?
					if bit64.band(Panel.FAttr(0, Panel.Item(0, i, 0)), FILE_ATTRIBUTE_DIRECTORY) ~= FILE_ATTRIBUTE_DIRECTORY then   -- i-тый элемент не папка?
						win.DeleteFile(APanel.UNCPath .. "\\" .. Panel.Item(0, i, 0) .. ":Zone.Identifier")
					end

					Panel.Select(0, 0, 1, i)
				end
			end
		else
			win.DeleteFile(APanel.UNCPath .. "\\" .. APanel.Current .. ":Zone.Identifier")
		end
	else
		mf.msgbox("Не файловая панель", "Активная панель не файловая", 0x00010001)
	end
else
	mf.msgbox("Нет видимых панелей", "Нет видимых панелей", 0x00010001)
end