08. januar 2003 - 14:33
Der er
19 kommentarer og 1 løsning
response write Max 200 eller lignende antal tegn
Jeg skal have lavet et nyhedssystem hvor den max skriver f.eks 200 tegn, og hvis der er flere tegn i DBen, så laver den et "read more" link hvor man kan læse det hele... Any ideas? :)
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
08. januar 2003 - 14:37
#1
If Len(dintekst) > 200 Then Response.Write Left(dintekst, 200) & "... <a href='mere.asp?id=xxx'>Read More</a>" Else Response.Write dintekst End If Noget i den stil - skal sikkert pudses lidt af, og tilpasses dit system!
08. januar 2003 - 14:38
#2
strText = objRs("Felt") If Len(strText) > 200 Then strText = Left(strText, 200) & "..." End If Response.Write(strText) //>Rune
08. januar 2003 - 14:50
#3
Testede begge to, og vil sige at medions er den der går bedst i min kode ;) Hvordan kan jeg smække en "class" på det Response.Write(strText) egentlig?
08. januar 2003 - 14:53
#4
Fair nok :-) Response.Write("<span class=""din_klasse"">" & strText & "</span>") //>Rune
08. januar 2003 - 14:55
#5
takker ;)
08. januar 2003 - 14:58
#6
Anytime ;o) Thx 4 Poinz //>Rune
08. januar 2003 - 15:00
#7
http://www.uo-dan.dk/tcm2/ kan du sige mig hvorfor den laver et større mellemrum ved den nederste linie? og evt hvordan jeg fixer det
08. januar 2003 - 15:02
#8
? Det forstår jeg ikke lige helt? //>Rune
08. januar 2003 - 15:04
#9
Kan du ikke se den nederste linie lissom har større afstand til den ovenover, end de andre
08. januar 2003 - 15:08
#10
Hmm det kan jeg ikke lige se hvorfor den gør :-/ Men prøv lige at ret: <td width="335" valign="top"> <font class="Tekst01"> Til <td width="335" valign="top" class="Tekst01"> Og fjern den sidste </font> //>Rune
08. januar 2003 - 15:10
#11
min kode ser sådan her ud: <td width="335" valign="top"> <!--#include file="dbconn.asp" --> <% strSQL = "select top 5 * from news order by ID DESC" Set rs = Conn.Execute(strSQL) strText = rs("nyhed") If Len(strText) > 200 Then strText = Left(strText, 200) & "... <a href=""#"" class=""Tekst01"">Read More</a>" End If Response.Write("<font class=""Tekst01"">" & strText & "</font>") %> <!--#include file="dbclose.asp" --> </td>
08. januar 2003 - 15:11
#12
jeg byttede span ud med font for at se om det hjalp, men det har samme effekt :-/
08. januar 2003 - 15:12
#13
Kan jeg prøve at se din stylesheet for din Tekst01 class? //>Rune
08. januar 2003 - 15:14
#14
ok, jeg satte <> rundt om read more, og så klappede den på plads, men read moer forsvandt jo ;) dvs. det er et sted i det kode ved if len den er gal
08. januar 2003 - 15:14
#15
Hmm gør den det stadivæk hvis det er du fjerner din StyleSheet? //>Rune
08. januar 2003 - 15:16
#16
nej den gør det ikke når classen er pillet af...
08. januar 2003 - 15:17
#17
Så prøv lige at post din Stylesheet her på eksperten! //>Rune
08. januar 2003 - 15:18
#18
08. januar 2003 - 15:19
#19
men ved du hvad, det er faktisk ligemeget, for jeg probber sku bare en class på selve den tabel... det gider det resultat jeg ønsker :)
08. januar 2003 - 15:20
#20
Fair nok :) //>Rune
Kurser inden for grundlæggende programmering