Søg
Avatar billede dtc Nybegynder
14. juli 2004 - 12:50 Der er 13 kommentarer og
1 løsning

Hvis ingen records, så skulle den gerne indsætte en bestemt tekst

Jeg har en tabel hvor jeg trækker nogle data ud fra - men jeg ville meget gerne have at hvis der ikke er nogle records der opfylder mine krav at den så viser en tekst "Der er desværre ingen MC´ere på vej hjem i øjeblikket"

HVORDAN gør man det?

Her er min kode:

<%
                      set rs=server.CreateObject("ADODB.Recordset")
                      rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn
                      %>
              <%
               
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
Avatar billede Slettet bruger
14. juli 2004 - 12:59 #1
Regner med det er sådan her du mener:

<%
' Opret forbindelse til databasen
set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn

If Not (rs.BOF OR rs.EOF) Then
Do While Not rs.EOF
' Resultaterne
rs.MoveNext
Loop
Else
Response.Write "Fejlmeddelelse hvis ingen records er fundet"
End If
Avatar billede dtc Nybegynder
14. juli 2004 - 13:27 #2
Ja næsten....kunne man lave det så snedigt at hvis der ingen records er - at den så slet ikke viser den tabel hvor de ellers bliver listet i????

mere kode...

<table width="640" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td><div align="right"><font color="#FFFFFF" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>
                          MC&acute;ere p&aring; vej hjem</strong></font></div></td>
                    </tr>
                  </table></td>
              </tr>
              <tr bgcolor="000000" class="teksthvidbold">
                <td height="20">&nbsp;M&aelig;rke</td>
                <td height="20">&nbsp;Model</td>
                <td height="20">&nbsp;&Aring;rg</td>
                <td height="20"> <div align="right">KM&nbsp;</div></td>
                <td height="20"> <div align="right">Pris&nbsp;</div></td>
                <td height="20"> <div align="center">Foto</div></td>
              </tr>
              <%
                    set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn

If Not (rs.BOF OR rs.EOF) Then
Do While Not rs.EOF
' Resultaterne
rs.MoveNext
Loop
Else
Response.Write "Der er pt. ingen MC´ere på vej hjem!"
End If
                      %>
              <%
               
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
            </table>
Avatar billede Slettet bruger
14. juli 2004 - 13:38 #3
Jo, det var egentlig det jeg mente, men kan da godt sætte det jeg skrev ind i din kode :D

<%
If Not (rs.BOF OR rs.EOF) Then
%>

<table width="640" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td><div align="right"><font color="#FFFFFF" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>
                          MC&acute;ere p&aring; vej hjem</strong></font></div></td>
                    </tr>
                  </table></td>
              </tr>
              <tr bgcolor="000000" class="teksthvidbold">
                <td height="20">&nbsp;M&aelig;rke</td>
                <td height="20">&nbsp;Model</td>
                <td height="20">&nbsp;&Aring;rg</td>
                <td height="20"> <div align="right">KM&nbsp;</div></td>
                <td height="20"> <div align="right">Pris&nbsp;</div></td>
                <td height="20"> <div align="center">Foto</div></td>
              </tr>
              <%
                    set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn


               
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
            </table>
<%
Else
Response.Write "Der er pt. ingen MC´ere på vej hjem!"
End If
%>
Avatar billede Slettet bruger
14. juli 2004 - 13:41 #4
Ups, er det ikke sådan her du mener:

<table width="640" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td><div align="right"><font color="#FFFFFF" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>
                          MC&acute;ere p&aring; vej hjem</strong></font></div></td>
                    </tr>
                  </table></td>
              </tr>
              <tr bgcolor="000000" class="teksthvidbold">
                <td height="20">&nbsp;M&aelig;rke</td>
                <td height="20">&nbsp;Model</td>
                <td height="20">&nbsp;&Aring;rg</td>
                <td height="20"> <div align="right">KM&nbsp;</div></td>
                <td height="20"> <div align="right">Pris&nbsp;</div></td>
                <td height="20"> <div align="center">Foto</div></td>
              </tr>

<%
If Not (rs.BOF OR rs.EOF) Then
                    set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn


               
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
            </table>
<%
Else
Response.Write "Der er pt. ingen MC´ere på vej hjem!"
End If
%>
Avatar billede dtc Nybegynder
14. juli 2004 - 13:49 #5
Det virker ikke.... se her:

http://www.a-vision.dk/test/mc/paavej.asp
Avatar billede Slettet bruger
14. juli 2004 - 13:51 #6
Virker koden nedenunder heller ikke?
Avatar billede Slettet bruger
14. juli 2004 - 13:55 #7
Har fundet fejlen, et lille stykke tekst skulle rykkes lidt længere ned:

<table width="640" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td><div align="right"><font color="#FFFFFF" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>
                          MC&acute;ere p&aring; vej hjem</strong></font></div></td>
                    </tr>
                  </table></td>
              </tr>
              <tr bgcolor="000000" class="teksthvidbold">
                <td height="20">&nbsp;M&aelig;rke</td>
                <td height="20">&nbsp;Model</td>
                <td height="20">&nbsp;&Aring;rg</td>
                <td height="20"> <div align="right">KM&nbsp;</div></td>
                <td height="20"> <div align="right">Pris&nbsp;</div></td>
                <td height="20"> <div align="center">Foto</div></td>
              </tr>

<%
                    set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn
If Not (rs.BOF OR rs.EOF) Then

               
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
            </table>
<%
Else
Response.Write "Der er pt. ingen MC´ere på vej hjem!"
End If
%>

- burde virke nu! :D
Avatar billede dtc Nybegynder
14. juli 2004 - 13:59 #8
Nej nu gør den sådan:

http://www.a-vision.dk/test/mc/paavej.asp
Avatar billede Slettet bruger
14. juli 2004 - 14:04 #9
Okay, vi prøver igen:

<table width="640" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td><div align="right"><font color="#FFFFFF" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>
                          MC&acute;ere p&aring; vej hjem</strong></font></div></td>
                    </tr>
                  </table></td>
              </tr>
<%
set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn
If Not (rs.BOF OR rs.EOF) Then
%>
              <tr bgcolor="000000" class="teksthvidbold">
                <td height="20">&nbsp;M&aelig;rke</td>
                <td height="20">&nbsp;Model</td>
                <td height="20">&nbsp;&Aring;rg</td>
                <td height="20"> <div align="right">KM&nbsp;</div></td>
                <td height="20"> <div align="right">Pris&nbsp;</div></td>
                <td height="20"> <div align="center">Foto</div></td>
              </tr>

<%   
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
            </table>
<%
Else
Response.Write "Der er pt. ingen MC´ere på vej hjem!"
End If
%>

Så burde det virke (men det gør det sikkert ikke ;))
Avatar billede dtc Nybegynder
14. juli 2004 - 14:08 #10
Det virker NÆSTEN....take a look!
Avatar billede Slettet bruger
14. juli 2004 - 14:17 #11
Fejlen har noget med de der tabeller at gøre, men jeg plejer at bruge div's så er ikke god til tables...

Det jeg bare skal finde ud af er hvor teksten skal stå for at den kommer til at stå mellem den orange og den sorte tabel...

Ved du hvor teksten skal stå, hvis den skal mellem de to tabeller...?
Avatar billede Slettet bruger
14. juli 2004 - 14:26 #12
NU har jeg vist fundet ud af hvordan:

<table width="640" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td><div align="right"><font color="#FFFFFF" size="3" face="Verdana, Arial, Helvetica, sans-serif"><strong>
                          MC&acute;ere p&aring; vej hjem</strong></font></div></td>
                    </tr>
                  </table></td>
              </tr>
<%
set rs=server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM mcbrugt where paavej='Y' order by tblmark ASC ",conn
If Not (rs.BOF OR rs.EOF) Then
%>
              <tr bgcolor="000000" class="teksthvidbold">
                <td height="20">&nbsp;M&aelig;rke</td>
                <td height="20">&nbsp;Model</td>
                <td height="20">&nbsp;&Aring;rg</td>
                <td height="20"> <div align="right">KM&nbsp;</div></td>
                <td height="20"> <div align="right">Pris&nbsp;</div></td>
                <td height="20"> <div align="center">Foto</div></td>
              </tr>

<%   
                      do while not rs.eof %>
              <tr bgcolor="cccccc" class="tekst" onmouseover="co(this,'in');" onmouseout="co(this,'out');" height="20">
                <A HREF="image2.asp?image=<%=rs("billede1")%>&id=<%=rs("id")%>">
                <td height="25">&nbsp;<%=rs("tblmark")%></td>
                <td height="25">&nbsp;<%=rs("tblmodel")%></td>
                <td height="25">&nbsp;<%=rs("tblyear")%></td>
                <td height="25"> <div align="right"><%=rs("tblkm")%>&nbsp;</div></td>
                <td height="25"> <div align="right">Kr.&nbsp;<%=rs("tblpris")%>&nbsp;</div></td>
                <td height="25"> <div align="center">
                    <% if rs("Billede1") <> "" then %>
                    <img src="images/kamera.jpg"> <br>
                    <% else %>
                   
                    <% end if %>
                  </div></td>
                </A> </tr>
              <%
               
                      rs.movenext
                      loop  %>
            </table>
<%
Else
%>
<tr>
<td>Der er pt. ingen MC´ere på vej hjem!</td>
</tr>
<%
End If
%>
Avatar billede dtc Nybegynder
14. juli 2004 - 14:35 #13
Det var stadig ikke helt rigtigt...men jeg har fået det hen!
Smid lige et svar - jeg kunne ikke have klaret det uden din hjælp!

TAK
Avatar billede Slettet bruger
14. juli 2004 - 14:37 #14
Velbekomme...

Et svar :)
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 5 I går 10:20 I går 19:22
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
Seneste spørgsmål Seneste aktivitet
I går 13:01 Måned og år på graf Af mort1 i Excel
I går 12:28 2 diske Af dcedata1977 i Andet hardware
I går 12:06 Ekstra til TV 2 : "Tilkøb" + "TV2 Ude" Af Ikke-ekspert i Fjernsyn & projektorer
I går 10:20 ASP classic kopiere database fil på server Af bsn i ASP
30/1015:04 Kan Medie Player overspille en CD ? - Hvordan Af Ikke-ekspert i Musik & videoafspillere
White papers
Flere white papers »