18. januar 2001 - 10:14Der er
4 kommentarer og 1 løsning
Opslag i Excel via ASP
Kan man - og giv mig gerne en forklaring for \"dummies\" - slå op med ASP/SQL til en Excel fil.
Jeg har nogle kollonner i excel - nøjagtigt som til en database.
Jeg ønsker at slå op eks. på dato - som er en af kollonnerne - og tage nogle andre af de andre kollonner med også - altså nogle af felterne fra en række skal med.
Kan det gøres med en DSN-less forbindelse - eller skal jeg gøre det via ODBC - dette er en af mine egne servere - så jeg kan lave ODBC\'en. Men kan det gøres som DSNless vil det være fint.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
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
Det var lige hvad jeg skulle have - jeg har dog lavet min kode i Excel - og exporteret data over i access db. Men jeg kan da genkende det meste af koden - blot at din laver connection til excel. Så jeg accepterer det utestet :)
Jeg fandt faktisk en direkte vejledning til \"sådan gør du i Frontpage\" - men dette var mere hvad jeg ledte efter.
TNX jlc
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.