Avatar billede cskaade Nybegynder
14. februar 2001 - 20:08 Der er 8 kommentarer og
2 løsninger

Udtrækning af oplysninger fra en databse

Hej

Jeg skal trække oplysninger ud fra en Database, som jeg skal have vidst på skærmen, mit problem er at jeg ikke kender kommandoen til at få SELECT sætningen data udtræk vist.
Avatar billede tpiil Nybegynder
14. februar 2001 - 20:12 #1
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"db.mdb\")

SQL = \"Select * From tabel\"
set rs = Conn.execute(SQL)
if rs.EOF then
%>
Ingen data I Databasen
<%
else
%>
Udtræk:<br>
<%
Do Until rs.EOF
%>
<%=rs(\"felt\")%>
<%
rs.MoveNext
Loop
end if
%>
Avatar billede tpiil Nybegynder
14. februar 2001 - 20:12 #2
<%=rs(\"felt\")%><br>

(så laver du lige ny linie)
Avatar billede cskaade Nybegynder
14. februar 2001 - 20:30 #3
Hej tpiil

jeg kan ikke få det til at virke kan du se hvad der er i vejen her.

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"data/database.mdb\")

sql = \"select hjemmenavn,hjemmeurl,urlsms,tilbageside from bruger where id = \'\"&request.form(\"id\")&\"\'\"

set rs = Conn.execute(SQL)
if rs.EOF then
%>
Ingen data I Databasen
<%
else
%>
Hjemmeside:<br>
<%
Do Until rs.EOF
%>
<%=rs(\"hjemmenavn\")%>
<%
rs.MoveNext
Loop
end if
%>
Avatar billede tpiil Nybegynder
14. februar 2001 - 20:32 #4
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"data/database.mdb\")

sql = \"select * from bruger where id = \'\"&request.form(\"id\")&\"\'\"

set rs = Conn.execute(SQL)
if rs.EOF then
%>
Ingen data I Databasen
<%
else
%>
Hjemmeside:<br>
<%
Do Until rs.EOF
%>
<%=rs(\"hjemmenavn\")%><br>
<%
rs.MoveNext
Loop
end if
%>
Avatar billede eagleeye Praktikant
14. februar 2001 - 20:34 #5
ID er sikkert et tal så skal det ikke \'\' udenom i sql sætningen. Det skal kun \'\' uden om tekst felter.

sql = \"select * from bruger where id = \"&request.form(\"id\")
Avatar billede tpiil Nybegynder
14. februar 2001 - 20:35 #6
nå ja det havde jeg ikke set:

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"data/database.mdb\")

sql = \"select * from bruger where id=\"&request.form(\"id\")

set rs = Conn.execute(SQL)
if rs.EOF then
%>
Ingen data I Databasen
<%
else
%>
Hjemmeside:<br>
<%
Do Until rs.EOF
%>
<%=rs(\"hjemmenavn\")%><br>
<%
rs.MoveNext
Loop
end if
%>
Avatar billede eagleeye Praktikant
14. februar 2001 - 20:36 #7
Og hvis du afligevel skriver alle navne på felterne (hjemmenavn,hjemmeurl,urlsms,tilbageside) så kan du lige så godt srive *.

Prøv at kikke på denne SQl tutorial: http://www.w3scripts.com/sql/
Avatar billede tpiil Nybegynder
14. februar 2001 - 20:39 #8
eagleeye >> det var kun for at lave det fulde jeg skrev det :)
Avatar billede cskaade Nybegynder
14. februar 2001 - 20:43 #9
Jeg takker for hjælpen nu virker det tak.
Avatar billede eagleeye Praktikant
14. februar 2001 - 20:45 #10
tpiil>> :) OK, jeg ville bare komme med lidt input.
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester