hent data fra et excell dokument ?

Ja. Der er ODBC (og formentlig også OLE DB) drivere
til Excel.

http://www.eksperten.dk/spm/49390

//>Rune

puha det ser lidt indviklet ud.

hvordan kan dette oversættes til at være fra en excel fil ?

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

' SQL forespørgsel
strSQL = "Select * from database where ID = "&ID"

' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)

= rs("resultat")

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
end if
%>

I din excel fil skal øverste række indeholde navnet på feltet.

        A                        B
1    Fornavn            Efternavn
2    Anders              Hansen
3    Erik                  Jørgensen

Du skal markere det område som skal kunne læses fra ASP. Det markede område skal så tildeles et navn.
Marker områder A1:B3, gå op i menuen Indsæt -> Navn .. -> Definer… 
Definer et navn eks.vis myRange.

Generelt undgå æøå i feltnavne og det Defineret navn.
-----

Du kan komme i kontakt med excel filen fra asp ved hjælp af dette:

Set myConn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")

'Connect til Excel via ODBC driver. Angiv fil navnet, her hedder filen fil.xls
'DriverID=790 betyder Excel97
myConn.Open "Driver={Microsoft Excel Driver (*.xls)};READONLY=FALSE;DBQ="&Server.MapPath("fil.xls")&";DriverID=790"

'Du kan skrive * for at vælge alle felter, eller feltnavne for at vælge nogle udvalgte (Fornavn, Efternavn)
strSQL = "SELECT * FROM myRange"

'Hent data fra excel.
rs.Open strSQL,myConn

'Flyt til første record
rs.movefirst
'Udskriv alle record. EOF End of File, BOF Begining of File.
'Udskriv kun hvis der er noget i excel filen eller indtil alle er udskrevet
while not(rs.EOF OR rs.BOF)
  'Udskriv navn
  Response.Write "<br>Navn fra Excel filen : " & rs("Fornavn") & " " & rs("Efternavn")
  'Flyt til næste record
  rs.MoveNext
Wend

'Rydder pænt op efter os
rs.Close
myConn.Close
set rs=nothing
set myConn=nothing

//>Rune

Thx 4 Poinz

//>Rune