Объект Recordset и текстовые файлы (ASP)

Христофоров Юрий
В этой статье речь пойдет о построении объекта Recordset на основе информации из текстового файла. Сталкиваясь с задачей представления данных из текстовых файлов (с поддержкой сортировок по нескольким полям, разбиением набора данных по страницам) возникает вопрос как решить данную задачу наиболее просто? Первый вариант решения — использование массивов. Второй вариант, о котором и пойдет речь, — создание объекта Recordset и дальнейшая работа с ним.
Постановка задачи
Есть текстовый файл (country.txt), который представляет собой набор записей вида Страна,Столица. Необходимо вывести постранично (5 записей на страницу) в виде HTML таблицы содержимое этого файла с сортировкой по полю Страна.
ASP-скрипт, который осуществляет этот вывод

<% option explicit Response.Expires = 0 Dim fs, fd, buffer, rs, arrTxT, Page, i, nPages 'создаем объект Recordset Set rs = Server.CreateObject(ADODB.Recordset") rs.Fields.Append "Страна", 200, 255 rs.Fields.Append "Столица", 200, 255 rs.Open Set fs = Server.CreateObject("Scripting.FileSystemObject") Set fd = fs.OpenTextFile(Server.MapPath("country.txt"), 1) 'построчно считываем содержимое файла Do While (Not fd.AtEndOfStream) 'добавляем строку rs.AddNew buffer = fd.ReadLine arrTxT = Split(CStr(buffer),"