Søg
Avatar billede izemate Nybegynder
12. april 2003 - 13:46 Der er 12 kommentarer og
1 løsning

ASP (nem)

Hejsa :)
hvordan for jeg dette til at virke !

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

strSQL = "SELECT * FROM forside"
set rs = conn.execute(strSQL)

if not rs.eof then
do while not rs.eof
%>

<tr>
    <td class="text" width="190px">Forside</td>
    <td class="rodtext" width="50px" align="right"><a href="redigerforside.asp?id=<%= rs("ID") %>" class="rod">Rediger</a></td>
</tr>
<%
rs.movenext
loop
end if
%>


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

strSQL = "SELECT * FROM sjov"
set rs = conn.execute(strSQL)

if not rs.eof then
do while not rs.eof
%>

<tr>
    <td class="text" width="190px">Sjov</td>
    <td class="rodtext" width="50px" align="right"><a href="redigersjov.asp?id=<%= rs("ID") %>" class="rod">Rediger</a></td>
</tr>
<%
rs.movenext
loop
end if
%>

<%
conn.close
set conn = nothing
%>
Avatar billede izemate Nybegynder
12. april 2003 - 13:47 #1
som i sikker kan se, skal jeg have iden fra dem for at kunne redigere dem !!
Avatar billede Jman Praktikant
12. april 2003 - 13:51 #2
hvad får du af fejl ?
Avatar billede izemate Nybegynder
12. april 2003 - 13:52 #3
jeg for den fejl at den ikke vil vise <td class="text" width="190px">Sjov</td>
    <td class="rodtext" width="50px" align="right"><a href="redigersjov.asp?id=<%= rs("ID") %>"
Avatar billede izemate Nybegynder
12. april 2003 - 13:53 #4
men som i kan se er SJOV, og FORSIDe i forskellige tabeller
Avatar billede erikjacobsen Ekspert
12. april 2003 - 13:57 #5
Jeg kan ikke forstå hvad dit problem er, men det kunne nu da
være lidt smart at skrive <table> ... </table>, når du nu
bruger en tabel.
Avatar billede Jman Praktikant
12. april 2003 - 14:17 #6
hvis den ikke vil vise teksten, er det måske fordi der ikke er noget i databasen (?)
Avatar billede Jman Praktikant
12. april 2003 - 14:44 #7
prøv dette:

if not rs.eof then
response.write "intet i databasen"
do while not rs.eof
Avatar billede hossein Nybegynder
12. april 2003 - 15:16 #8
Hvis hele koden ligger på en side, det er ikke nødvendig og lave database forbindelse 2 gange, den linie:
Set Conn = Server.CreateObject("ADODB.Connection")

Men du kan lave mange recordset.
Avatar billede discowarp9 Nybegynder
12. april 2003 - 15:16 #9
Du kan prøve at sætte dine "while not rs.eof" ned til dine loop, så det i begge tilfælde bliver:
do %>
<tr>
...
</tr>
<%
rs.movenext
loop while not rs.eof
Avatar billede discowarp9 Nybegynder
12. april 2003 - 15:17 #10
Så er du garanteret at den kører dit loop igennem mindst en gang.
Avatar billede discowarp9 Nybegynder
12. april 2003 - 15:19 #11
For lige at få det hele med:
Du behøver egentlig ikke din if...then statement. Dine betingelser for loop'et er nok. Om du sætter betingelser for oven eller for neden afgør om den skal køres minimum 0 eller 1 gang.
Avatar billede Jman Praktikant
12. april 2003 - 15:20 #12
det gør man da alligevel :)
Jeg ligger lige et svar i tilfæde af at jeg har ret... jeg hopper nemlig af nu
Avatar billede hossein Nybegynder
12. april 2003 - 15:28 #13
oh, nej du har også kaldt begge dine recordset til rs:

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

strSQL = "SELECT * FROM forside"
set rs = conn.execute(strSQL)

if not rs.eof then
do while not rs.eof
%>

<tr>
    <td class="text" width="190px">Forside</td>
    <td class="rodtext" width="50px" align="right"><a href="redigerforside.asp?id=<%= rs("ID") %>" class="rod">Rediger</a></td>
</tr>
<%
rs.movenext
loop
end if
%>


<%
strSQL1 = "SELECT * FROM sjov"
set rs1 = conn.execute(strSQL1)

if not rs1.eof then
do while not rs1.eof
%>

<tr>
    <td class="text" width="190px">Sjov</td>
    <td class="rodtext" width="50px" align="right"><a href="redigersjov.asp?id=<%= rs1("ID") %>" class="rod">Rediger</a></td>
</tr>
<%
rs1.movenext
loop
end if
%>

<%
conn.close
set conn = nothing
%>

prøv den.
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
ASP classic kopiere database fil på server Af bsn i ASP 7 31/10/202610:20 01/11/202620:28
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
IT-JOB

Capgemini Danmark A/S

AI/Data Engineer

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Cyberdivisionen søger IT-supporter til lokal IT Korsør

KMD A/S

Senior SAP Architect

Netcompany A/S

Test Consultant

BEC Financial Technologies

Development Manager for Core Banking
Seneste spørgsmål Seneste aktivitet
I går 08:39 Produktnøgle Af hkv i Office & Kontorpakker
13/1116:59 Bitlocker Af nico i Windows
12/1116:30 Wlan i windows 11 home Af dcedata1977 i Windows
11/1121:19 Irriterende ikon på proceslinjen Af ErikHg i Windows
11/1116:33 Kan man slippe af med "msn" ? Af Ikke-ekspert i Windows
White papers
Flere white papers »