hej leif
ja det var en upser så jeg skriver lige igen så her er fejlen ned uder
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified
/Aspeksempel/asphentdata.asp, line 23
------
<% Option Explicit
dim overskrift, SQL, REST, cn, constr, cont %>
<html>
<head>
<title>Indhold i databasen</title>
</head>
<body
<p>Her kan du se hvad der ligger i databasen:<p><br><br>
<%
Overskrift = "<table border='1'><font face=Arial size=2><b><tr><th
valign='top'>Navn</th>"
Overskrift = Overskrift & "<th valign='top'>Adresse</th>"
Overskrift = Overskrift & "<th valign='top'>Postnrby</th></tr>"
'*** Hele HTML outpupét til Tabel header´en kodes i een streng (Overskrift)
'*** der sendes til browseren via respontse.write
Response.write Overskrift
'*** Databaseforbindelsen sættes op og åbnes på samme måde som i
aspregistrer.asp
set cn = Server.CreateObject("ADODB.Connection")
constr = "Provider=Microsoft.JET.OLEDB.4.0; Data Soource= " &
Server.MapPath("database.mdb") &";"
cn.open
SQL = "SELECT * FROM personer"
set REST = cn.execute(SQL)
'*** I variablen SQL gemmes alt indhold fra personer.
while not REST.eof
Cont = "<tr><td Valign='top'>" & rest("Navn") & "</td>"
Cont = Cont & "<td Valign='top'>" & rest("Adresse") & "</td>"
Cont = Cont & "<td Valign='top'>" & rest("Postnrby") & "</td>"
Cont = Cont & "<td Valign='top'>" & rest("Telefon") & "</td></tr>"
'*** og dernæst kodoes en ny tablerække for hver output fra databasen
(While-sætningen)
'*** alt placeres i strengen Cont.
Response.write Cont
'*** Strengen udskrives
rest.movenext
'*** Næste række iaf de udtrukne data læses
wend
'*** Slut på While-Sætningen
rest.close
cn.close
set cn=nothing
'*** Databaseforbindelserne lukkes og nulstilles
%>
-------
hilsen jeppe
"Leif Neland" <leif@neland.dk> skrev i meddelelsen
news:49bfffa7$0$56781$edfadb0f@dtext02.news.tele.dk...
> Jeppe Søndergaard skrev:
>> Hej igen nu har jeg rodet med det scipt og prøvet at rette de ting i har
>> forslået man kan bare ikke få det til at virke så er der en som kan se
>> det igennem og så måske rette i det så det kan virke jeg er ved at være
>> for tivivlet er der en venlig sjæl som har lyst til at rette det
>>
> Du har glemt at skrive fejlmeddelelsen.
>
> Du kan ikke forvente mere hjælp, når du ikke skriver hvad der går galt, og
> om du har gjort de ting, du har fået at vide du skal.
>
> Leif