4 svar · 316 visningar · startad av pledge
Hejsan!
Jag har en länksida som jag bara har radat upp länkarna på men nu börjar dom bli så många så jag skulle vilja sortera som dom så att alla på "a" står i en rad och alla som börjar på "b" osv. Men jag fattar inte hur jag ska skriva när jag hämtar informationen från access. Nu har jag en vanlig SQL sats...
<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open Conn_String
annons = "SELECT * FROM links ORDER BY Lnamn"
set rs = Conn.Execute (annons)
do until rs.EOF%>
<a href="<%=rs("Ladress")%>" class="text14"><%=rs("Lnamn")%></a><span class="text14"> – <%=rs("Ltext")%></span><br>
<%rs.MoveNext
loop %>
Någon som vet hur man gör och kan hjälpa mig med detta.
Tack
// Peter
Är det något sånt här du menar?
<%
dim strLast, strNew
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open Conn_String
annons = "SELECT * FROM links ORDER BY Lnamn"
set rs = Conn.Execute (annons)
do until rs.EOF
strNew = ucase(left(rs("Lnamn"), 1))
if strNew <> strLast then
response.write "<h2>" & strNew & "</h2>"
strLast = strNew
end if
%>
<a href="<%=rs("Ladress")%>" class="text14"><%=rs("Lnamn")%></a><span class="text14"> – <%=rs("Ltext")%></span><br>
<%rs.MoveNext
loop %>
Jag får det här felmeddelandet när jag använder koden.
Feltyp:
Körningsfel i Microsoft VBScript (0x800A01C2)
Fel antal argument eller felaktig egenskapstilldelning.: 'left'
/saaf/undersidor/lankar.asp, line 39
Tack...