Вы когда -нибудь хотели знать, как отобразить содержимое текстового документа с помощью ASP. Вот простой способ прочитать
из текстового файла
<!-начало кода ASP ---->
<%
'Джеймс Сеймур, http://jamesdot.org
Dim write
Dim filesySobj, tf, читать
'Прочтите read.txt
'Храните имя файла, где информация хранится в переменной с именем Read
read = read.txt
'Получите полную дорожку файла чтения
read = left (server.mappath (request.servervariables (path_info)), instrrev (server.mappath
(Request.servervariables (path_info)), /)) и читать
'Создайте экземпляр объекта файловой системы и сохраните его в переменной с названием FileSOBJ
SET FILESSOBJ = createObject (scripting.filesystemobject)
'Проверьте, существует ли файл чтения
If (fileSySobj.fileExists (читать)) тогда
'Если файл существует, откройте его для чтения
Установить tf = fileSySobj.opentextfile (читать, 1)
read = tf.readline
tf.close
ЕЩЕ
'Если вы не можете найти read.text, отображать сообщение по умолчанию
Read = Я не могу найти файл read.txt! Так что это мое сообщение по умолчанию.
Конец, если
%>
Таблица отображает файл read.txt
<div align = center>
<Центр>
<таблица границы = 0 ширина = 40% сотовой связи = 0 cellpadding = 0>
<tr>
<td width = 100%bgcolor =#eeeecc> <b> <%= read%> </b>
</td>
</tr>
<tr>
<TD ширина = 100%>
<!-Конец ASP->
Используйте приведенный выше код, нажмите и перетащите свою мышь через код, чтобы выделить его. Затем щелкните правой кнопкой мыши на
Выдвинутый код и нажмите Copy. Теперь вы можете вставить его в свой редактор кода.