Avatar billede ste Nybegynder
02. november 2003 - 11:21 Der er 4 kommentarer og
1 løsning

Ingen linie skift i dtabase resultater

Jeg sidder og roder med lidt asp og database.Jeg ønsker at få en værdi returneret fra en database og få den udlæst på en linie. Så langt er jeg kommet at det virker.

Når jeg så prøver præsentere resultaterne i en rulle tekst med marquue bliver de returneret med linie skift. Hvordan undgår jeg linieskiftene.

Jeg vedlægger min kode her.

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

strSQL= "SELECT * FROM tblKursusNavn"
Set rs = Conn.Execute(strSQL)



        DO
               
                KursusNavn = rs("KursusNavn")
%>                           

    <marquee scrollamount="2"> <%=KursusNavn%>&nbsp;    </marquee>
   
   
<% rs.MoveNext
LOOP WHILE NOT rs.EOF
Conn.Close
Set Conn=Nothing %>
Avatar billede eagleeye Praktikant
02. november 2003 - 11:24 #1
Så skal du havde fjenet vbCrLf fra teksten.

Så denne linje:

KursusNavn = rs("KursusNavn")


Bliver til:
KursusNavn = Replace(rs("KursusNavn"),vbCrLf,"")
Avatar billede ste Nybegynder
02. november 2003 - 11:36 #2
Det dur ikke. Posterne bliver stadig returneret med linieskift.
Avatar billede eagleeye Praktikant
02. november 2003 - 11:39 #3
Prøv også at fjerne <br>, så det bliver til to linje som disse:

KursusNavn = Replace(rs("KursusNavn"),vbCrLf,"")
KursusNavn = Replace(KursusNavn ,"<br>","",1,-1,1)
Avatar billede ste Nybegynder
02. november 2003 - 12:01 #4
Desværre det hjælp heller ikke. Problemet opstår først når jeg indsætter marquee koden. Uden den bliver de lister efter hindanden.
Avatar billede ste Nybegynder
02. november 2003 - 12:08 #5
Jeg har selv løst det. Jeg flyttede marquee koden til før database tilslutningen og efter conn.close. Det ser nu sådan ud og virker.

    <marquee scrollamount="2">

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

strSQL= "SELECT * FROM tblKursusNavn"
Set rs = Conn.Execute(strSQL)



        DO
               
                  KursusNavn = rs("KursusNavn")
                 
                %>                           

                    <%=KursusNavn%>&nbsp;   
   
   
<% rs.MoveNext
LOOP WHILE NOT rs.EOF
Conn.Close
Set Conn=Nothing %>


</marquee>
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