Kun 15 tegn ?
Hej!På min hjemmeside har jeg et nyheds system som viser de 10 sidste nyheder. Men der mangler bare en ting. Den må max vise 15 tegn af overskriften til nyheden.
Her er min kode:
---------------------------------
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"../nyheder/yepss-mobil/news.mdb\")
SQLstmt = \"select top 1 * FROM news ORDER BY ID desc;\"
Conn.Execute (SQLstmt)
Set vis = conn.Execute(SQLstmt)
%>
<%
DO WHILE NOT vis.EOF
overskrift = vis(\"overskrift\")
\'besked = vis(\"besked\")
ID = vis(\"ID\")
link = vis(\"link\")
%>
<font face=\"Verdana\" size=\"1\">
<b><a target=\"body\" href=\"../mobil/mobilnews-vis.asp?id=<%=ID%>\"><%=overskrift%></b></a>
</font>
<%
vis.MoveNext
LOOP
vis.Close
conn.Close
Set conn = nothing
Set SQLstmt = nothing
%>
---------------------------------
Hvordan laves det ?
