Members

<% Do Until RecSet.EOF %> <% RecSet.MoveNext Loop Recset.Close Connect.Close Set Recset = Nothing Set Connect = Nothing END IF %>

Namn:	<%=RecSet("namn")%>
E-Mail:	<%=RecSet("mail")%>
MSN:	<%=RecSet("msnmail")%>
Telefon:	<%=RecSet("telefon")%>
Mobil:	<%=RecSet("mobil")%>
Bil:	<%=RecSet("bil")%>
	"> Radera

``` Permalänk: https://www.webforum.nu/p/160313 ## #2 — Biasse, 2007-05-14T18:08Z Löste det.. ``` Members

Medlemar

<% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../../lagret/digelo.mdb") SQL = "SELECT * From members ORDER BY namn DESC" Set RecSet = Server.CreateObject("ADODB.Recordset") RecSet.Open SQL, Connect, 1, 3 RecSet.PageSize = 2 %>

<% X=0 If Request.QueryString("page") = "" OR NOT IsNumeric(Request.QueryString("page")) Then intPage = 1 Else intPage = CInt(Request.QueryString("page")) End If RecSet.AbsolutePage = intPage DO UNTIL RecSet.EOF OR X = RecSet.PageSize %> <% X=X+1 RecSet.MOVENEXT LOOP If RecSet.PageCount > 1 Then For i = 1 To RecSet.PageCount If i <> intPage Then Response.Write("" & i & " ") Else Response.Write("[" & i & "] ") End If Next End If RecSet.CLOSE Connect.CLOSE Set RecSet = nothing Set Connect = nothing %>

Namn:	<%=RecSet("namn")%>
E-Mail:	<%=RecSet("mail")%>
MSN:	<%=RecSet("msnmail")%>
Telefon:	<%=RecSet("telefon")%>
Mobil:	<%=RecSet("mobil")%>
Bil:	<%=RecSet("bil")%>
	"> Radera

``` Permalänk: https://www.webforum.nu/p/1977659 ## #3 — Biasse, 2007-05-14T19:08Z Måste krångla vidare på detta ändå.... Hittar inget om det jag undrar nu som funkar. I det övre härså fårjag allt att ligga i klickmeny från 1 och stigande. Men helst vill jag ha det så att det ligger en meny från a tillö såman kan välja på namn i bokstavs ordning. Hur ska det se ut då? Permalänk: https://www.webforum.nu/p/1977676 ## #4 — Snakes, 2007-05-14T19:22Z Menar du att du vill ha länkarna längst ner A B C D E F G H.. istället för 1 2 3 4 5 6... I så fall kan du kasta ditt paging system och bara välja namn som börjar på bokstaven a (tex) i SQL queryn. Ta en titt på denna: EDIT: Ville ge extra uppmärksamhet till det LarsG skrev: ``` sql = "select distinct left(username,1) from members order by 1" ``` Jag har aldrig testat något sånt, men om det funkar så är det ju perfekt. EDIT (igen): Markera tråden som olöst igen, jag kan se folk ignorera denna tråd då den är redan löst, då kan du förlora hjälp som kanske skulle hjälpa dig lösa ditt nya problem. Permalänk: https://www.webforum.nu/p/1977689 --- Tråden på webben: https://www.webforum.nu/amne/asp/160313-hämta-2-åt-gången