Skriva från tecken till slut

[red]
Response.Write Mid(objRS("fält"), 250)
[/red]

mvh icaaq

Response.Write Right(strExempel, Len(strExempel) - 250)

RED: Icaqs metod är bättre.

funkar kanon men om jag nu inte vill att det ska bryta mitt i ett ord... finns det nåt bra sätt då. Man vill ju helst inte bryta texten mitt i ett ord eller hur....

är det någon som har nån idé på det sista problemet??

strVar = inStrRev(objRS("fält")," ")
strVar = mid(objRS("fält"), 250)
Response.Write strVar

Kanske fungerar?

response.write mid(rs("f"),250+instr(mid(rs("f"),250)," "))

ok... nu ser sidan 2 ok ut... den börjar med ett helt ord... men sidan ett där klipper den också rakt av utan hänsyn till hela ord... hur gör jag då.... så här ser koden ut nu

<%
if not isnull(rs("besk")) then
if rs("besk") <> "" then
sbesk = trim(rs("besk"))
if len(sbesk) > 600 then
response.write (left(sbesk,450) & "<a href=""varor_mer2.asp?prodid=" & rs("prodid") &"""><b>...</b></a>")
else
response.write(sbesk)
end if
else response.write " "
end if
end if
%>

pellsäter skrev:

ok... nu ser sidan 2 ok ut... den börjar med ett helt ord... men sidan ett där klipper den också rakt av utan hänsyn till hela ord...

Använd LarsGs kod! Det är bara att byta ut rs("f") mot en annan sträng.

jag använde den koden och stoppade in delar av den i min kod... men det fungerar int den klagar på mina fnuttar och dom är jag itne bra på.....

Hur stoppar jag in LarsG´s kod på rätt sätt...

kan inte nån hjälpa mig skriva ihop den sida kodsnutten......skulle var gott att bli klar innan helgen börjar... se det som en tidig födelsedagspresent *ler*

Hjälp!!!
Idag fyller jag år och behöver ha en kodsnutt i hjälp!!

Läs tråden här ovan!

Ha en trevlig dag

Om jag förstått problemet kanske det här kan hjälpa?

<% 
if not isnull(rs("besk")) then 
if rs("besk") <> "" then 
sbesk = trim(rs("besk")) 
if len(sbesk) > 600 then 
response.write (mid(sbesk,450+instr(mid(sbesk,450)," ")) & "<a href=""varor_mer2.asp?prodid=" & rs("prodid") &"""><b>...</b></a>") 
else 
response.write(sbesk) 
end if 
else response.write " " 
end if 
end if 
%>

Grattis på födelsedagen! :)

Mvh,

 
If NOT isNull(rs("besk")) AND not len(rs("besk")) = 0 Then 
sbesk = trim(rs("besk")) 

If len(sbesk) > 600 then 
response.write "<a href=""varor_mer2.asp?prodid=" & rs("prodid") &""">"& (left(sbesk,450) & "..."& mid(rs("f"),250+instr(mid(rs("f"),250)," "))) &"</a>"
Else 
Response.Write(sbesk) 
End If

Else
Response.Write " " 
End If

Är du såhär du vill ha det? Jag har inte riktigt förstått

I Anders kod så skriver den ut de sista tecknen.. och dessa har jag redan på sidna 2 i produktpresentationen.. vad jag är ute efter är det första 450 tecknen och att det inte bryter mitt i ett ord.

I den andra koden så kommer hela texten med...

Hm. Jag vet inte om det är jag som läser slarvigt. Jag får se om jag hinner sätta mig in i detta senare.

Mvh,