FRNet.Narod.Rufor you! - http://www.frnet.narod.ru/
» О рассылке Уважаемые подписчики!

С 15.06.2004 открыта новая рассылка посвященная web-дизайну и web-программированию. Ведущий рассылки Голубев Алексей. По вопросам размещения статей в рассылке обращайтесь по e-mail: alexey-golubev@mail.ru. Буду всегда рад разместить их здесь, а также на моем сайте. Ссылка на ваш сайт гарантирована!
» Сегодня в рассылке Разделы рассылки:


Если у вас есть соображения по увеличению рассылки, увеличению количества ее разделов, то пишите мне. Кроме этого присылайте свои вопросы. Вместе мы ответим на них.
» Создание файлов при помощи JavaScript и VBScript Автор: Алексей Голубев

Сайт: http://www.frnet.narod.ru/

Многие книги по Web-программированию отрицают возможность создания и использование файлов на клиентском компьютере. однако, это совсем не так. Я в этом убедился, когда копаясь по документации VBScript и JavaScript, внезапно обнаружил эти функции. Недостаток их в том, что перед их выполнением IE и другие браузеры запрашивают подтверждение на их выполнение, но это и правильно, кто знает, что этот программист задумал ввести в файл... Давайте теперь приступим к самим функциям.

1. Создание пустого файла.

На первый взглад эта функция может показаться бесполезной, однако, как вы занесете данные в файл, не имея самого файла, не будем же мы потртить фалы посетителя нашей страници. Для того, чтобы создать пустой файл с помощью VBSctipt надо написать в HTML-файле следующий код:

<script language="VBScript">
Dim fso, f1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.CreateTextFile("c:\testfile.txt", True)
</script>


Ту же самую функцию выполняет и следующий код, написанный уже на JavaScirpt:

<script language="JavaScript">
var fso, f1;
fso = new ActiveXObject("Scripting.FileSystemObject");
f1 = fso.CreateTextFile("c:\\testfile.txt", true);
</script>


Вот теперь, создав чистый файл, можно приступить к его заполнению...

2. Запись данных в файл.

а) Открытие файла.
Для того, чтобы открыть файл надо применить следующий скрипт:

Dim fso, ts
Const ForWriting = 2
Set fso = CreateObject("Scripting. FileSystemObject")
Set ts = fso.OpenTextFile("c:\test.txt", ForWriting, True)


Данный скипт написан на VBScript. Здесь по-моему все понятно. ForWriting - флаг, показывающий зачем открывать файл. Вот тот же скрипт на JavaScript:

var fso, ts;
var ForWriting= 2;
fso = new ActiveXObject("Scripting.FileSystemObject");
ts = fso.OpenTextFile("c:\\test.txt", ForWriting, true);


Надо отметить, что при этом файлы будут автоматически создаваться.

б) Непосредственная запись в файл.
Для занесения строчек текста в файл используется следующие методы:

Задача Метод
Втавка новой строки, с последующей возможностью добавления в этуже строку данных, т.е. в конце строки нет символов переноса строки и возврата каретки. Write
Втавка новой строки с переносом на следующую. WriteLine
Вставка одной или несколких пустых строк. WriteBlankLines

Вот примеры скриптов. На VBScript:

Sub CreateFile()
Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile("c:\testfile.txt", True)
' Вставка строки с переносом на новую.
tf.WriteLine("Testing 1, 2, 3.")
' Вставка 3 путых строк.
tf.WriteBlankLines(3)
' Вставка новой строки, без переноса.
tf.Write ("This is a test.")
' Закрытие файла.
tf.Close
End Sub


На JavaScript:

function CreateFile()
{
var fso, tf;
fso = new ActiveXObject("Scripting.FileSystemObject");
tf = fso.CreateTextFile("c:\\testfile.txt", true);
// Вставка строки с переносом на новую.
tf.WriteLine("Testing 1, 2, 3.") ;
// Вставка 3 путых строк.
tf.WriteBlankLines(3) ;
// Вставка новой строки, без переноса.
tf.Write ("This is a test.");
' Закрытие файла.
tf.Close();
}


Вот и все. Что с этим делом делать вы наверное уже знаете. В мирных целях эта возможность создавать файлы на клиентских машинах очень полезна. Можно предложить посетителю скачать ваш фирменных значок и установить его в кчестве значка дика C, D, E, F, ..., Z. Можно создать autorun для диска X, в котором будет прописана строка, которая позволит загружать ваш фирменный сайт при запуске этого диска. Сохранение настроек без использования cookies и т. д. и т.п. На этой оптимистической ноте я заканчиваю. Спасибо за внимание.

Вверх
» Новые скрипты » Создание файлов при помощи JavaScript и VBScript.

Скрипт описанный в выше выложенной статье. По щелчку на ссылке создает файл.

Скачать: здесь.
» Генератор паролей на JavaScript.

Выдает пароль в соответствии с выбранными вами условиями.

Скачать: здесь.
» Дрожащий рисунок.

Рисунок дрожит при наведении на него мышью.

Скачать: здесь.

Вверх
» Программы для дизайна и верстки » Harm'sTile 99 2.5.

Предназначена для создания фоновых изображений, кнопок и баннеров для web-страниц. Содержит большое количество фильтров и эффектов.

Скачать: здесь.
» HTML Generator 3.12402.

Позволяет создать web-страницу с помощью мастера всего за несколько минут. Включает встроенные браузер, мастер скриптов, редактор для правки кода, ftp-клиент для отправки страниц на сервер. С программой поставляется 200 встроенных фоновых изображений.

Скачать: здесь.
» Public Source v1.2.1.

С помощью этой программы вы сможете конвертировать исходники, написанные на Delphi, C++, C#, Asm, Basic и Java, в формат RTF и HTML, с сохранением синтаксического выделения как в родном редакторе.

Скачать: здесь.

Вверх
» Разделы сайта На нашем сайте (http://www.frnet.narod.ru/) имеются слудующие разделы:


Вверх
» Заключение Надеюсь, вам понравилась информция в рассылке и вы не будете от нее отписываться. Больше информации можно найти на нашем сайте. Ваши пожелания и критику присылайте на e-mail:alexey-golubev@mail.ru.

При публикации статей из рассылки или с сайта вам следует подписать автора статьи и действующую ссылку на наш сайт.

Ответственный за рассылку: Голубев Алексей.

Вверх


Rambler's Top100
Hosted by uCoz