Avatar billede no_doubt Nybegynder
26. juli 2001 - 23:32 Der er 18 kommentarer og
1 løsning

all i kolonnen

Jeg har en kolonne der hedder Username og en tabel der hedder users og databasen hedder db.mdb

Nu vil jeg gerne have udskrevet 10 Username\'s på hver side

Klares opgaven inden for 10 min er der 90 at hente
Avatar billede jakobandersen Nybegynder
26. juli 2001 - 23:34 #1
Prøv at se her det burde ikke være så svært at tilrette:

http://www.activeserverpages.dk/aspdigital/kapitel2/paging.asp
Avatar billede no_doubt Nybegynder
26. juli 2001 - 23:34 #2
ved jeg godt men kan ikke så beder det lavet
Avatar billede tdaugaard Nybegynder
26. juli 2001 - 23:36 #3
\"Klares opgaven inden for 10 min er der 90 at hente\" hvad hvis der går 20 ? det kan man da ikke sætte sådan en kort tidsfrist på ...
Avatar billede no_doubt Nybegynder
26. juli 2001 - 23:36 #4
der skal stå

\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"
\"Username\" - \"RigtigNavn\"

Også en ny side
Avatar billede jakobandersen Nybegynder
26. juli 2001 - 23:36 #5
Har du gjort et forsøg? Det er tre linier der skal ændres.
Avatar billede no_doubt Nybegynder
26. juli 2001 - 23:36 #6
for hver 10 min trækker jeg 15
Avatar billede eflow Nybegynder
26. juli 2001 - 23:37 #7
hmm..no_doubt.....jeg skulle jo lave det...jeg kan også godt lave det med paging....men den laver en fejl....jeg ved ikke om username er et reserveret ord :(
Avatar billede jakobandersen Nybegynder
26. juli 2001 - 23:37 #8
<html><head>
<title>Paging af et recordset</title>
</head><body>

<%
intPage = Request(\"page\")
If isNumeric(intPage) = False Or intPage < 1 Then
    intPage = 1
End If

Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"SELECT Username FROM users\"
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"db.mdb\")
rs.Open strSQL, strDSN, 1
If Not (rs.BOF Or rs.EOF) Then
    rs.PageSize = 10
    rs.AbsolutePage = intPage
    intRecCount = rs.PageSize
    intPageCount = rs.PageCount
    Response.Write \"<p><b>Side \" & intPage & \" af \" & intPageCount & \"</b></p>\"
    Do While Not rs.EOF And intRecCount > 0
        Response.Write rs(\"Username\") & \"<br>\"
    intRecCount = intRecCount - 1
    rs.MoveNext
    Loop
End If
rs.Close
Set rs = Nothing

Response.Write \"<p>Gå til side \"
For intNum = 1 To intPageCount
    Response.Write \"<a href=paging.asp?page=\" & intNum & \">\" & intNum & \"</a> \"
Next

Response.Write \"<p>\"
If Clng(intPage) > 1 Then
    Response.Write \"<a href=paging.asp?page=\" & intPage - 1 & \">&lt;&lt;</a>\"
Else
    Response.Write \"&lt;&lt;\"
End If

Response.Write \"&nbsp;\"

If Clng(intPage) < Clng(intPageCount) Then
    Response.Write \"<a href=paging.asp?page=\" & intPage + 1 & \">&gt;&gt;</a> \"
Else
    Response.Write \"&gt;&gt;\"
End If
%>

</body></html>
Avatar billede tdaugaard Nybegynder
26. juli 2001 - 23:39 #9
no_doubt:> du må da være dum ... du kan da ikke trække 15 point fra for hver 10 mins ... hvad tror du det er !?
Avatar billede eflow Nybegynder
26. juli 2001 - 23:40 #10
en børnehave hvad ellers....

EFloW over and out
Avatar billede no_doubt Nybegynder
26. juli 2001 - 23:47 #11
okay nu ser det sådan ud :
<%
intPage = Request(\"page\")
If isNumeric(intPage) = False Or intPage < 1 Then
intPage = 1
End If

Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"SELECT Username FROM users\"
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"db.mdb\")
rs.Open strSQL, strDSN, 1
If Not (rs.BOF Or rs.EOF) Then
rs.PageSize = 10
rs.AbsolutePage = intPage
intRecCount = rs.PageSize
intPageCount = rs.PageCount
Response.Write \"Side \" & intPage & \" af \" & intPageCount & \"<p>\"
Do While Not rs.EOF And intRecCount > 0
Response.Write rs(\"Username\") & \"<br>\"
intRecCount = intRecCount - 1
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing

Response.Write \"<p>Gå til side \"
For intNum = 1 To intPageCount
Response.Write \"<a href=allusers.asp?page=\" & intNum & \">\" & intNum & \"</a> \"
Next

Response.Write \"<p>\"
If Clng(intPage) > 1 Then
Response.Write \"<a href=allusers.asp?page=\" & intPage - 1 & \">&lt;&lt;</a>\"
Else
Response.Write \"&lt;&lt;\"
End If

Response.Write \"&nbsp;\"

If Clng(intPage) < Clng(intPageCount) Then
Response.Write \"<a href=allusers.asp?page=\" & intPage + 1 & \">&gt;&gt;</a> \"
Else
Response.Write \"&gt;&gt;\"
End If
%>

Alt skal være hex C0C0C0 str. 12 og arial
Avatar billede no_doubt Nybegynder
26. juli 2001 - 23:48 #12
moon p for you
Avatar billede jakobandersen Nybegynder
26. juli 2001 - 23:50 #13
Du indsætter vel bare:

<style type=\"text/css\">
P,A,BODY{
color:#C0C0C0;
font-size:12pt;
}

</style>

imellem <head> og </head>
Avatar billede hh_appel Nybegynder
27. juli 2001 - 09:19 #14
uh-oh... Tør ikke svare på det her, man bliver sgu bare trukket på pointkontoen...
Avatar billede jakobandersen Nybegynder
27. juli 2001 - 09:23 #15
Hvad snakker du om?
Avatar billede kornfreak Nybegynder
27. juli 2001 - 09:27 #16
Er det lovligt med den tidsfrist han sætter på? ..og så trække points fra ?..

Jeg synes iallefald det strider imod Eksperten\'s concept. Man stiller et spørgsmål, hvor nogen er så FLINKE at svare, man stiller ikke et spørgsmål og FORLANGER det ene og det andet, eller har jeg misforstået det hele?
Avatar billede jakobandersen Nybegynder
27. juli 2001 - 09:33 #17
Nåh, der blev jo ikke trukket point fra. Men selvfølgelig ville det nok have været mere korrekt at sætte spørgsmålet til 65 og så smide ekstra oveni hvis svaret faldt hurtigt.
Avatar billede hh_appel Nybegynder
27. juli 2001 - 09:35 #18
moonduck> Tja, spørgsmålet er stillet 23:32 i går aftes, og med -15 point pr. kvarter derefter, så går det jo ret hurtigt dernedad.. :-=

kornfreak> Jeg ved det ikke. Umiddelbart står der ikke noget i reglerne om dette, men det kunne måske være en sag for Eksperten at tage op - sådan for princippets skyld...
Avatar billede kornfreak Nybegynder
27. juli 2001 - 09:44 #19
hh_appel: Nok en god ide, synes det virker lidt lamt det der :(
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester