yo haría algo así:
Código PHP:
<%
set FSO = Server.CreateObject("Scripting.FileSystemObject")
set oFichero = FSO.OpenTextFile(Server.MapPath("archivo.txt"))
Archivo = oFichero.ReadAll
'quito la linea vacía:
Archivo = Replace(Archivo, vbcrlf & vbcrlf, vbcrlf)
' quito los encabezados:
Archivo = Replace(Archivo," Date Time Ext CO Dial Number Duration Acc code CD " & vbcrlf, "")
' quito los "_"
Archivo = Replace(Archivo,"--------------------------------------------------------------------------------" & vbcrlf, "")
' convierto el string en una matriz por el salto de linea
Archivo = Split(Archivo, vbcrlf)
' por cada elemento del array, detecto "campos" y los guardo en variables "volátiles"
For i = 0 to UBound(Archivo)
sDate = Trim(Left(Archivo(i), 8))
sTime = Trim(Mid(Archivo(i), 10, 7))
sExt = Trim(Mid(Archivo(i), 20, 3))
sCO = Trim(Mid(Archivo(i), 24, 2))
sDialNumber = Trim(Mid(Archivo(i), 27, 31))
sDuration = Trim(Mid(Archivo(i), 58, 8))
' acá podrías hacer un insert por cada elemento del array...
SQL = "INSERT INTO tabla (sDate, sTime, sExt, sCO, SDialNumber, sDuration) VALUES ('" & sDate & "'..." & ")"
oConn.Execute(SQL)
Next
%>
saludos