Просмотровщик дисков, папок, файлов

@Ципихович Эндрю · Регистрация: 10.04.2009

Студворк — интернет-сервис помощи студентам

Здравствуйте, итак ослик рулит, Просмотровщик дисков, только если это локальный хтмл файл, то как избавится от мессаги при открытии файла
Страница может содержать опасные программы (элементы АктивеХ) разрешить их выполнение?
Если этот вопрос можно решить, тогда как усмирить валидатор как?
1Element name hta:application cannot be represented as XML 1.0.
и
Element hta:application not allowed as child of element body in this context. (Suppressing further errors from this subtree.)
в строке

HTML5
1
VERSION="1.0"></HTA:APPLICATION>

2 Stray end tag head.
в строке

HTML5
1
</HEAD>

3 An body start tag seen but an element of the same type was already open.
в строке

HTML5
1
<BODY ONLOAD="fillDrivesList();">

4 Cannot recover after last error. Any further errors will be ignored.
в строке

HTML5
1
<BODY ONLOAD="fillDrivesList();">

HTML5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
<!DOCTYPE html>
<!--html5-->
 
<html>
 
<head>
 
<meta http-equiv="content-type" content="text/html; charset=utf-8">
 
<!--
http://validator.w3.org/#validate_by_input
http://validator.w3.org/#validate_by_uri
-->
 
<TITLE>Просмотровщик дисков, папок, файлов http://www.thevista.ru/page14227-htmlprilozheniya_rabota_s_faylami_papkami_i_diskami_ch3</TITLE>
 
 <HTA:APPLICATION ID="hta1" APPLICATIONNAME="appDiskViewer" BORDER="thin"
 ICON="Disk_viewer.ico" MAXIMIZEBUTTON="no" SCROLL="no" SELECTION="no"
 VERSION="1.0"></HTA:APPLICATION>
 <SCRIPT>
 window.resizeTo(660, 500);
 
 var oFSO = new ActiveXObject("Scripting.FileSystemObject");
 var oSelDrives, oSelFolders, oSelFiles, oPCurrentPath, sCurrentFolder = ""
 
 function fillDrivesList()
 {
 oSelDrives = document.getElementById("selDrives");
 oSelFolders = document.getElementById("selFolders");
 oSelFiles = document.getElementById("selFiles");
 oPCurrentPath = document.getElementById("pCurrentPath");
 
 var oEn = new Enumerator(oFSO.Drives);
 var oF, oOption;
 for (; !oEn.atEnd(); oEn.moveNext()) {
 oF = oEn.item();
 oOption = document.createElement("OPTION");
 oOption.text = oF.Path;
 oOption.value = oF.Path;
 oSelDrives.add(oOption);
 }
 }
 
 function fillFoldersList()
 {
 oPCurrentPath.innerHTML = sCurrentFolder;
 
 while (oSelFolders.options.length > 0)
 oSelFolders.options.remove(0);
 
 var oDrive = oFSO.GetDrive(oSelDrives.value);
 if (oDrive.IsReady) {
 var oFol = oFSO.GetFolder(sCurrentFolder);
 var oEn = new Enumerator(oFol.SubFolders);
 var oF, oOption;
 if (!(oFol.IsRootFolder)) {
 oOption = document.createElement("OPTION");
 oOption.text = "..";
 oOption.value = "..";
 oSelFolders.add(oOption);
 }
 for (; !oEn.atEnd(); oEn.moveNext()) {
 oF = oEn.item();
 oOption = document.createElement("OPTION");
 oOption.text = oF.Name;
 oOption.value = oF.Name;
 oSelFolders.add(oOption);
 }
 }
 }
 
 function fillFilesList()
 {
 while (oSelFiles.options.length > 0)
 oSelFiles.options.remove(0);
 
 var oDrive = oFSO.GetDrive(oSelDrives.value);
 if (oDrive.IsReady) {
 var oFol = oFSO.GetFolder(sCurrentFolder);
 var oEn = new Enumerator(oFol.Files);
 var oF, oOption;
 for (; !oEn.atEnd(); oEn.moveNext()) {
 oF = oEn.item();
 oOption = document.createElement("OPTION");
 oOption.text = oF.Name;
 oOption.value = oF.Name;
 oSelFiles.add(oOption);
 }
 }
 }
 
 function goToDrive()
 {
 sCurrentFolder = oSelDrives.value + "\\";
 fillFoldersList();
 fillFilesList();
 }
 
 function goToFolder()
 {
 if (oSelFolders.value == "..")
 sCurrentFolder = oFSO.GetParentFolderName(sCurrentFolder);
 else
 sCurrentFolder = oFSO.BuildPath(sCurrentFolder, oSelFolders.value);
 fillFoldersList();
 fillFilesList();
 }
 </SCRIPT>
 </HEAD>
 <BODY ONLOAD="fillDrivesList();">
 <FORM>
 <TABLE>
 <TR>
 <TD>
 Диски:<BR>
 <SELECT ID="selDrives" SIZE="20" STYLE="width: 200px; height: 350px"
 ONDBLCLICK="goToDrive();"></SELECT>
 </TD>
 <TD>
 Папки:<BR>
 <SELECT ID="selFolders" SIZE="20" STYLE="width: 200px; height: 350px"
 ONDBLCLICK="goToFolder();"></SELECT>
 </TD>
 <TD>
 Файлы:<BR>
 <SELECT ID="selFiles" SIZE="20" STYLE="width: 200px; height: 350px"></SELECT>
 </TD>
 </TR>
 </TABLE>
 </FORM>
 <P ID="pCurrentPath"></P>
 </BODY>
 </HTML>

@newJS · 03.10.2012, 06:24

Сообщение от Ципихович Эндрю

Если этот вопрос можно решить, тогда как усмирить валидатор как?

Доктайп подсунуть более подходящий.

HTML5
1
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">

или этот, но тогда некоторые нужные вещи скриптом генерить

HTML5
1
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">

попробуй это, закрывает окно по эскейпу

HTML5
1
<body onkeydown="if(event.keyCode==27){window.close();}">

это лучше в скрипт перенести

HTML5
1
onload="fillDrivesList();"

=

JavaScript
1
2
3
onload=function(){
fillDrivesList();
 };

size избыточно, а стили вынеси из html

HTML5
1
size="20" style="width: 200px; height: 350px"

тебе отправлять ни чего не нужно на сервер, значит

HTML5
1
 <form> </form>

будет только мешать

все теги и их атрибуты пиши в нижнем регистре, всегда!

в селект сунь оптион и клик вешай скриптом, убирай все лишние из html

HTML5
1
 <select id="selDrives" ondblclick="goToDrive();"><option></option></select>

@Ципихович Эндрю · 03.10.2012, 19:32 **[ТС]**

newJS, спасибо за ответ, но сначала надо добиться, чтобы

Сообщение от Ципихович Эндрю

избавится от мессаги при открытии файла
Страница может содержать опасные программы (элементы АктивеХ) разрешить их выполнение?

ведь у меня установлено:
В Internet Explorer в Меню > Сервис > Свойства обозревателя > Дополнительно
Флажок: Разрешать запуск активного содержимого файлов на моем компьютере
Но это не помогает, можно как-то сделать?? потом валидатора буду усмырять

@Notortep · 03.10.2012, 19:46

Ципихович Эндрю,

1) если внутри html-файла присутствует <hta:application>, то этот файл следует сохранить с расширением *.hta; читайте документацию - http://msdn.microsoft.com/en-u... 85%29.aspx - другого просто не дано!
и вот тогда, в формате *.hta, никаких сообщений системы безопасности у вас не будет

2) валидация - это проверка соответствия содержимого страницы действующим стандартам консорциума W3C
технология HTA (HTML Applications) никакими стандартами не поддерживается
это конкретная "особенная фишка" одного-единственного браузера - MSIE
так что "усмирять валидатор"... это как пытаться трупу рассказывать сказки на ночь и одевать ему памперсы в надежде, что труп когда-нить таки в них написает

@Ципихович Эндрю · 03.10.2012, 21:33 **[ТС]**

ясно, спасибо!!!

Добавлено через 6 минут

Сообщение от Ципихович Эндрю

ясно, спасибо!!!

жалко, что нельзя в хтмл делать, хта - немного не то

Добавлено через 1 час 38 минут
пока пришла мысль, как реализовать пока не знаю, спросил по профилю
Открыть нужный html файл в IE и нажать кнопку в его MsgBox

Новые блоги и статьи Все статьи Все блоги /
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .

@Notortep Заблокирован
	03.10.2012, 19:46
	Ципихович Эндрю, 1) если внутри html-файла присутствует <hta:application>, то *этот файл следует сохранить с расширением .hta; читайте документацию - http://msdn.microsoft.com/en-u... 85%29.aspx - другого просто не дано!** и вот тогда, в формате .hta, никаких сообщений системы безопасности у вас не будет 2) валидация - это проверка соответствия содержимого страницы действующим стандартам консорциума W3C технология HTA (HTML Applications) никакими стандартами не поддерживается* это конкретная "особенная фишка" одного-единственного браузера - MSIE так что "усмирять валидатор"... это как пытаться трупу рассказывать сказки на ночь и одевать ему памперсы в надежде, что труп когда-нить таки в них написает 1