Sv:Sortering i alfabetisk ordning av alla länkar som finns i texfilen

Sortering i alfabetisk ordning av alla länkar som finns i texfilen

Postades av 2006-10-16 16:04:50 - Henrik Häggström, i forum asp - allmänt, Tråden har 2 Kommentarer och lästs av 779 personer

Hej,

Jag har en texfil som jag innehåller länkar och en sida som läser ut dessa i en droplista men nu skulle jag vilja sortera dem i alfabetsisk ordning, går det eller kanske det finns nåt enklare bättre sätt att lösa detta?

Jag behöver skriva in länkarna för hand men sen läsa ut dem dynamiskt...
Så här har jag det just nu:

<html>
<body>
<%
dim c
dim i
set nl=server.createobject("MSWC.Nextlink")
c = nl.GetListCount("links.txt")
i = 1
%>
<p>
<form name="jump">
<select name="menu" onChange="window.open(this.options[this.selectedIndex].value,'mainFrame')">
<option value="-" selected>-- Välj --</option>
<%do while (i <= c) %>
<option value="<%=nl.GetNthURL("links.txt", i)%>"><%=nl.GetNthDescription("links.txt", i)%></option>
<%
i = (i + 1)
loop
%>
</select>
</form>
</p>

<p> </p>
</body>
</html>

******************************
Texfilen links.txt
******************************
sida1.htm Sida1
sida2.htm Sida2
sida3.htm Sida3
sida4.htm Sida4

Svara