hasta aqui esta perfecto
ya subiste el archivo (supongo que esta tabulado o separado por comas). lo que debes hacer ahora es abrirlo y leer linea por linea.
Código:
<%
Set fso = CreateObject("Scripting.FileSystemObject")
Const ParaLectura = 1, ParaEscritura = 2
Set Archivo = fso.OpenTextFile(archivo, ParaLectura)
If not archivo.AtEndOfStream Then
Do While not archivo.AtendOfStream
linea = Archivo.ReadLine
'creas un arreglo con los datos de cada linea
'para hacer referencia a la primera columna lo haces asi arreglo(0)
arreglo=split(linea, ",") ' ai lo tienes separado por tabulacion usa vbtab
loop
end if
archivo.close
%>
debes cambiar la ruta del archivo. deberia funcionar ya que es un codigo que tenia guardado hace tiempo.