Puedes leerlo fila por fila y columna por columna por ejm. en la fila 1 de la posicion 1 a la 10 es XXXXX y de la posicion 11 a la 20 es XXXX asi:
Set FS= Server.CreateObject("Scripting.FileSystemObject")
Set f = FS.OpenTextFile(Server.MapPath("Archivo.HL0"), 1)
do while f.AtEndOfStream = false
x = f.ReadLine
'Inicio de proceso de manipulación de archivo de texto
xxxxx = mid((x),1,10)
xxxx1 = mid((x),11,20)
loop
espero te sirva.