DIM fso, f
SET fso = CreateObject("Scripting.FileSystemObject")
SET f = fso.OpenTextFile(Server.MapPath("ISO_8859-1_1987"), 1)
DIM strTemp
DO WHILE f.AtEndOfStream = False
    strTemp = f.ReadLine
    strTemp = Replace(strTemp,"<","<")
    strTemp = Replace(strTemp,">",">")
    Response.Write strTemp & "
" LOOP 'DO WHILE f.AtEndOfStream = False f.Close %>
The ISO 8859-1 standard (which is part of the ISO 8859 family of standards) defines a character repertoire identified as "Latin alphabet No. 1", commonly called "ISO Latin 1", as well as a character code for it. The repertoire contains the ASCII repertoire as a subset, and the code numbers for those characters are the same as in ASCII. <% Call FileLastModified() %>