FONT bold italic подч. мон. под над. зач.

H T M L

редактор

















Откр. тег:
Закр. тег:
R
G
B
Текст: Поменять на:
Готовые примеры скриптов:
появляющаяся строка в текстовом поле
часики в текстовом поле
титры (only for MSIE)
голосование с отправкой по почте (без CGI)
до 2000 года осталось ...
 определение броузера
навигация в виде нисподающего меню
последнее обновление документа
мигающая таблица
смена фонового цвета

" & chr(13) & chr(13) end sub Sub body1_onClick document.text.S1.value = document.text.S1.value & chr(13) & "" end sub Sub style_onClick document.text.S1.value = document.text.S1.value & "" & chr(13) end sub Sub JS_onClick document.text.S1.value = document.text.S1.value & "

HTML РЕДАКТОР на VBScript

" document.write "

Автор: Моховой Алексей { WANDERFLY }

" document.write "
Этот редактор полностью написан на Visual Basic Script, и представляет собой одну обыкновенную страницу html. Целью его создания являлось показать возможности применения VBScript. Редактор советую использовать как простейший отладчик для небольших страниц.

Правила пользования:

Если Вы хотите редактировать уже созданный документ, то: Откройте страницу, которую вы будете редактировать в MSIE. Кликните на ней правой клавишей мыши, и выберите пункт View, Source. В появившемся окне текстового редактора Notepad (Блокнот) выберите Правка->Выделить все и скопируйте весь текст в буфер Ctrl+C. Откройте страницу HTML редактора и вставьте текст из буфера в поле для редактирования.
Напоминаю, что при нажатии на кнопки, теги ВСЕГДА записываются в конец текста, независимо от положения курсора, НО в окне редактирования действует принцип: выделил и перетащил. Весь редактируемый текст всегда можно скинуть в один из 3-х буферов, путем нажатия STORE, и опять скопировать в окно редактирования кнопкой PASTE.
Для сохранения полученной после редактирования страницы, выберите в момент просмотра готового результата пункт View, Source и сохраните как *.htm. Если сохраните из меню файл то сохранится этот редактор. Не ошибитесь:)" document.write "

Кнопки:

VIEW: Просмотр или Сохранение HTML страницы в окне брoузера. Возврат в редактор кнопкой назад <= на панели. Чтобы увидеть страницу со всей графикой, htm файл HTMLредактора должен находиться в той же директории, что и редактируемая страница. Редактор не умеет запускать скрипты на VBScipt (скрипт не может породить скрипт:), но JAVAscriptы подлежат отладки. В конце редактора приводится несколько их готовых примеров." document.write "

Версия на Латинице: перевод всего Русского текста вашей страницы в латиницу, с последующим просмотром. Теперь и Вы можете очень быстро делать не только КОИ версии своих страниц, но и на транслите. При нажатии компьютер немного думает, так что не пугайтесь, он не повис. Издержки технологии.

Размер HTML: размер HTML кода вашей страницы в килобайтах и байтах. Это для тех, кто любит хорошо почистить свою страницу, с целью уменьшения времени загрузки." document.write "

Шифровка HTML: наводит полный сумбур в HTML код Вашей страницы, не портя его (разумеется за исключением страниц со скриптами, формами и текстом заключенным в тег PRE). Ваши оригинальные находки в HTML уже будет намного сложнее списать другим." document.write "

Сравнение тегов: Вводим в одно поле, к примеру <TD в другое </TD> и сравниваем их количество в html коде. Если количество открывающих и закрывающих тегов не равно, значит Вы где-то ошиблись. Примечание: заглавные и строчные буквы различны при сравнении, не сравнивайте, к примеру <TABLE> c </TABLE>, пишите <TABLE без закрывающих скобок, у него могут быть и атрибуты." document.write "

Пока Все:) Ваши мнения и замечания, а также информацию об найденных ошибках, и конечно Ваши пожелания о включении в редактор новых опций, просьба писать на wanderfly@chat.ru

P.S. По этому адресу хранится самая последняя версия этого редактора, а здесь она же в htmledit.zip" end sub Sub size_onclick l=len(document.text.S1.value) l1=Clng(l/1024) alert l1&" кБ "&l&" байт" end sub Sub Translit_onclick b=document.text.S1.value for i=1 to len(b) status=i&" из"&len(b) s=mid(b,i,1) if s="а" then s="a" if s="б" then s="b" if s="в" then s="v" if s="г" then s="g" if s="д" then s="d" if s="е" then s="e" if s="+" then s="yo" if s="ж" then s="zz" if s="з" then s="z" if s="и" then s="i" if s="й" then s="y" if s="к" then s="k" if s="л" then s="l" if s="м" then s="m" if s="н" then s="n" if s="о" then s="o" if s="п" then s="p" if s="р" then s="r" if s="с" then s="s" if s="т" then s="t" if s="у" then s="u" if s="ф" then s="f" if s="х" then s="h" if s="ц" then s="c" if s="ч" then s="ch" if s="ш" then s="sh" if s="щ" then s="sh" if s="ъ" then s="'" if s="ы" then s="i" if s="ь" then s="'" if s="э" then s="e" if s="ю" then s="yu" if s="я" then s="ya" if s="А" then s="A" if s="Б" then s="B" if s="В" then s="V" if s="Г" then s="G" if s="Д" then s="D" if s="Е" then s="E" if s="╦" then s="YO" if s="Ж" then s="ZZ" if s="З" then s="Z" if s="И" then s="I" if s="Й" then s="Y" if s="К" then s="K" if s="Л" then s="L" if s="М" then s="M" if s="Н" then s="N" if s="О" then s="O" if s="П" then s="P" if s="Р" then s="R" if s="С" then s="S" if s="Т" then s="T" if s="У" then s="U" if s="Ф" then s="F" if s="Х" then s="H" if s="Ц" then s="C" if s="Ч" then s="CH" if s="Ш" then s="SH" if s="Щ" then s="SH" if s="Ъ" then s="'" if s="Ы" then s="I" if s="Ь" then s="'" if s="Э" then s="E" if s="Ю" then s="YU" if s="Я" then s="YA" document.write s next end sub sub spt1_onClick dim spt(8) spt(1)="
" & chr(13) spt(2)="