Søg
Avatar billede Slettet bruger
24. september 2002 - 14:53 Der er 9 kommentarer og
1 løsning

Vis poster fra database,men kortet lidt af hvis de er for lange..

Hejsa, er der nogen her der ved:

hvordan jeg sætter mine poster til at være max f.eks 15tegn lange, når de vises på min asp-side - dvs at de automatisk bliver afkortet - og så efter de f.eks 15tegn vises der istedet"...klik for at læse mere"?
Nedenfor har jeg kopieret det stykke kode jeg sidder og rodder med.


************ vis 5 nyeste ad's i databasen **********
For t = 1 to 5

  ' Titel på AD
  strNavn = rs("AD_TITLE")

  ' laver et link til detaljeret AD

  strLink = "<a href='Addetail.asp?cat_id=" & rs("cat_id")& ("&sub_id=")& rs("sub_id") & ("&ad_id=") & rs ("ad_id")& "'>" & strNavn & "</a>"

  ' skriver listen med de 5 nyeste
  Response.Write "<li>" & strLink & "</li>"

  rs.MoveNext
 
next
Avatar billede n!nja Nybegynder
24. september 2002 - 14:56 #1
left(rs("xxx"),15)
Avatar billede exp-ralle Nybegynder
24. september 2002 - 15:00 #2
If Len(strLink) > 15 Then
'Læs mere
End if

Dette burde kunne vise linket hvis sætningen er strørre end 15 tegn.
Men hvordan du laver sådan at den kun viser ved jeg sq ikke lige.
Avatar billede longshanks Nybegynder
24. september 2002 - 15:14 #3
Dette burde virke:

Do
  Response.Write left(rs("Fornavn"), 15) & "<a href='noget.html'>Tryk her for at læse mere</a><br>"
  rs.MoveNext

Du skal så bare udskifte rs("Fornavn") med et tabelnavn fra din db....
Loop While Not rs.EOF
Avatar billede exp-ralle Nybegynder
24. september 2002 - 15:18 #4
longshanks --> det går jo ikke helt da kun de første 5 skal vises.
Dette burde gå:

For I = 1 to 5

Response.Write Left(rs("Tabelnavn"), 15)
If Len(strLink) > 15 Then
Response.Write "<a href='laes.asp'>Læs mere...</a>"
End if

rs.MoveNext

Next
Avatar billede exp-ralle Nybegynder
24. september 2002 - 18:27 #5
Er du gået død thomasw22?
Avatar billede Slettet bruger
24. september 2002 - 18:46 #6
lidt, sidder stadig og rodder med din kode..
prøver at få den til også at kunne lave et link hvis den er mindre end 15...  men det virker ikke rigtigt endnu..
Avatar billede Slettet bruger
24. september 2002 - 18:50 #7
nåja hvis den er mindre end 15 skal det være et andet link...
ellers er koden yderst brugbar...
Avatar billede longshanks Nybegynder
24. september 2002 - 19:36 #8
Nåeh ok, det missede jeg lige, who needs asp anyway when jsp is out there.....
Avatar billede exp-ralle Nybegynder
24. september 2002 - 20:29 #9
Har du fundet ud af det ellers kan du vel bruge flg.:

For I = 1 to 5

Response.Write Left(rs("Tabelnavn"), 15)
If Len(strLink) > 15 Then
Response.Write "<a href='laes.asp'>Læs mere...</a>"
Elseif Len(strLink) < 15 Then
Response.Write "<a href='laes2.asp'>Læs mere...</a>"

rs.MoveNext

Next
Avatar billede Slettet bruger
24. september 2002 - 21:51 #10
Yes, det virker nu... tak for hjælpen, har givet dig de 30 point :-)
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
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
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
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 dag 13:35 Bruger på Win11 Af lurup i Browsere
07/1022:52 Google beskeder har/havde en bug, så den sendte tilfældige gamle beskeder gemt indeni nye beskeder efter skifte til ny Samsungtelefon via Samsung Smart Switch Af KennethLykke i Apps til Android
05/1010:31 Min IPAD vil ikke oplade. Af Nørdnot i Mac
04/1018:04 Findes der et "Papir-kurv" symbol, man kan sætte på Firefox og Google Chrome ? (For oven) Af Ikke-ekspert i Browsere
03/1012:14 Ang udskrift Canon mb5050 Af made18 i Printere
White papers
Flere white papers »