Работа с текстовыми файлами
Для работы с текстовым файлом с разделителями используется ActiveX‑элемент Tabular Data Control (TDC).
Свойства
DataURL ‑ адрес текстового файла.
FieldDelim ‑ символ‑разделитель полей (,).
FilterColumn ‑ имя поля, по которому производится фильтрация данных.
FilterCriterion - операция сравнения в фильтре (=, <>, >, <, >=, <=).
FilterValue ‑ значение, с которым сравнивается значение поля.
RowDelim ‑ символ конца записи, по умолчанию ‑ возврат каретки.
SortColumn, SortAscending ‑ имя поля сортировки и порядок сортировки: по возрастанию (True) или убыванию (False).
TextQualifier ‑ символ, ограничивающий значение текстового поля (“).
UseHeader первая строка содержит имена полей (True).
Метод Reset - пересортировка данных.
Пример. Составим страницу (рис. 1.8.1) для просмотра текстового файла с фамилиями и телефонами (рис. 1.8.2).
 |  |
Рисунок - 1.8.1. Вид страницы просмотра Рисунок - 1.8.2.Телефоны
<HTML><HEAD><TITLE>Список телефонов</TITLE>
<SCRIPT LANGUAGE=“VBScript“>
Sub KnopkaNext_OnClick 'процедура обработки кнопки “Вперед”
form1.data1.recordset.MoveNext ‘метод перехода к следующей записи
if.form1.data1.recordset.EOf then Form1.data1.recordset.moveLast
End Sub
Sub KnopkaPrev_OnClick 'процедура обработки кнопки “Назад”
form1.data1.recordset.MovePrevious
if form1.data1.recordset.BOf then Form1.data1.recordset.moveFirst
End Sub
</SCRIPT>
<BODY>
<FORM NAME=“Form1“>
<OBJECT ID=“Data1“
ClassID=“CLSID:333C7BC4-460F-11D0-BC04-0080C7055A83“>
<PARAM Name=“DataURL“ Value=“C:\My Documents\HTML_primer\telefon.txt“>
<PARAM Name=“UseHeader“ Value=“True“>
</OBJECT>
<INPUT TYPE=“text“ SIZE=“30“ DATASRC=#Data1 DATAFLD=“Fam“>
<INPUT TYPE=“text“ SIZE=“6“ DATASRC=#Data1 DATAFLD=“Tel“><P>
<INPUT TYPE=“button“ NAME=“KnopkaPrev“ VALUE=“Назад“>
<INPUT TYPE=“button“ NAME=“KnopkaNext“ VALUE=“Вперед“> </P>
</FORM>
</BODY>
</HTML>
Дата добавления: 2015-04-15; просмотров: 793;