--- title: "Nytt Script på wF Script!" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/13579-nytt-script-på-wf-script/page3" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "PatrikB" published: "2001-05-03T22:22:00.000Z" updated: "2002-01-05T19:09:00.000Z" replies: 95 views: 786 page: 3 pages: 5 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/13579-nytt-script-på-wf-script" --- # Nytt Script på wF Script! _Sida 3 av 5._ ## #41 — Cogo, 2001-06-14T14:34Z Patrik B hur gör jag för att hämta ur en annan tabell i ditt paging script. när man hämtade med typ 1,I 4,I osv men om jag skriver dit en tabell till i select satsen så hämtar den ju från den som står först. Hur hämtar jag ur en ny tabell som jag lagt till? Permalänk: https://www.webforum.nu/p/302873 ## #42 — Cogo, 2001-06-14T14:34Z Dbl post \[Redigerat av Cogo den 14 jun 2001\] Permalänk: https://www.webforum.nu/p/302874 ## #43 — PatrikB, 2001-06-14T14:47Z ordningen för fälten i sql-utrycket är det som styr ordningen på hur de hamnar i arrayen. Så har du tex: ``` strSQL = "SELECT * FROM kontaktpersoner, kontor ``` så kommer det att beroende på hur många fält som finns i varje tabell arrayen att se ut så här: arrArray(0,I)'## -- innehåller det först fältet i tabellen kontaktperson arrArray(1,I)'## -- innehåller det andra fältet i tabellen kontaktperson arrArray(n,I)'## -- innehåller det n fältet i tabellen kontaktperson(eller kontor) etc. Sedan att den byter tabell spelar ingen roll, det är ett recordset som du får tillbaka. Alltså, det är bara att bygga på arrayen så "hamnar" du snart på posterna för kontor. cya, PatrikB Permalänk: https://www.webforum.nu/p/302875 ## #44 — Cogo, 2001-06-14T15:08Z Ok nu fattar jag tackar så mycket för hjälpen Patrik Permalänk: https://www.webforum.nu/p/302876 ## #45 — Cogo, 2001-06-14T15:08Z Ok nu fattar jag tackar så mycket för hjälpen Patrik Permalänk: https://www.webforum.nu/p/302877 ## #46 — Cogo, 2001-06-15T12:43Z Hej har ett litet problem med att skicka med en variabel till en nästa sida i din pagingkod kan du se vad det är för fel ? Det är variabeln kontor. ``` '## -- skriv ut en länk till föregående sida -- If CInt(WichPage) > 1 Then Response.Write "Nästa

http://www.bengtdahlgren.se/bilder/pilar/left.gif>" ``` Permalänk: https://www.webforum.nu/p/302878 ## #47 — PatrikB, 2001-06-15T14:29Z Hello, i querystringen så behöver du stoppa in ett "och" tecken framför page: ``` '## -- skriv ut en länk till föregående sida -- If CInt(WichPage) > 1 Then Response.Write "Nästa

http://www.bengtdahlgren.se/bilder/pilar/left.gif>" ``` cya, PatrikB Permalänk: https://www.webforum.nu/p/302879 ## #48 — Method, 2001-06-18T07:40Z Jag har tagit över efter Cogo....Han fixa med detta scriptet ett tag Jag får följande felmedelande när jag la in koden du gav till Cogo Microsoft VBScript runtime error '800a000d' Type mismatch: 'kontor' /paging/paging3.asp, line 256 hur kommer detta sig? Jag hämtar frågesträngen längst upp på sidan. ``` kontor = Request.Querystring("kontor") ``` Då kan jag väl använda mig av variabeln i frågesträngen och använda mig av? Hur skriver jag urlEncode strängen då?? Permalänk: https://www.webforum.nu/p/302880 ## #49 — Method, 2001-06-18T13:24Z Jag fick ordning på det....:) Permalänk: https://www.webforum.nu/p/302881 ## #50 — Macce, 2001-07-14T11:35Z Jag försöker använda ditt script men får Felaktigt matrisindex: '15' Såg dessa rader: m_intTotalPages = Cint((HowManyRecords / PageSize) + 0.5) 'm_intTotalPages = CInt(((HowManyRecords / PageSize) + 1) - 1) Den ena är ju utkommenterad.... hmm Är det bara jag som får problem Jag läste här att man får samma problem när man bara har en post men det är ju löst. Det skapas ingen ny 'Page' vid första extraposten utan efter några st. beroende på vad jag har för pagesize Om jag har pagesize 10 och har tio poster skapas ändå en '2'länk vilket ger ett fel... Förstår du mitt problem eller ska jag förklara mer vad jag menar ? Mvh \[Redigerat av Macce den 14 jul 2001\] Permalänk: https://www.webforum.nu/p/302882 ## #51 — PatrikB, 2001-07-14T17:21Z Hello, har ingen lösning för tillfället. Försöker att komma med en i nästa vecka när man e tillbaks på sin egen maskin igen. cya, PatrikB Permalänk: https://www.webforum.nu/p/302883 ## #52 — PatrikB, 2001-07-14T20:12Z Fixade till en lösning. Om det är någon som har en bättre lösning så posta den gärna här eller skicka ett mail till mig. Ni som redan laddat ned paging scriptet BÖR uppdatera denna funktion: ``` '## ------------------------------------------------------------- '## -- räkna ut hur många sidor som ska visas -- '## -- updated: July 14, 2001 '## -- update by: Patrik Berggren, mrwize@mrwize.nu '## ------------------------------------------------------------- '## '## -- vid vissa tillfällen returnerades fel sidantal. '## Felet/Buggen berodde på avrundningen med CInt() '## och CLng(). '## -- Avrundningen som jag gjorde: '## '## m_intTotalPages = CInt((HowManyRecords / PageSize) + 0.5) '## '## vart i vissa fall fel och sid antalet vart fler än '## vad det egentligen skulle vara. '## Lösningen, hoppas jag, är att kolla hur stor resten '## blir vid avrundning. '## Om resten är större än 0 eller mindre än 0.5 så ska en sida '## läggas till. '## I annat fall så gäller avrundningen. '## Har testat flera olika kombinationer med olika records antal '## och sidstorlekar och ej hittat några buggar. '## Så nu hoppas jag att denna paging är buggfri *ler* '## ------------------------------------------------------------- Function countPages(ByVal HowManyRecords, ByVal PageSize) Dim m_intTotalPages, m_intRest m_intTotalPages = HowManyRecords / PageSize If m_intTotalPages < 1 Then m_intTotalPages = 1 Else m_intRest = m_intTotalPages - CLng(m_intTotalPages) If m_intRest > 0 AND m_intRest < 0.5 Then m_intTotalPages = CLng(m_intTotalPages) + 1 Else m_intTotalPages = CLng(m_intTotalPages) End If End If '## -- return how many pages -- countPages = m_intTotalPages End Function ``` Hoppas nu att scriptet blivit buggfritt. cya, PatrikB Permalänk: https://www.webforum.nu/p/302884 ## #53 — Macce, 2001-07-15T06:29Z Man tackar :D Nu fungerar det kanon ! Mvh Permalänk: https://www.webforum.nu/p/302885 ## #54 — Lukaspojken, 2001-07-17T18:13Z Hej PatrikB När du gör db-kopplingen så lägger du allt i getrow...är det en bra lösning? Är det inte bättre att räkna upp antal poster jämföra dessa med antal poster per sida och sedan skapa antal sidor utifrån det. Eller det är kanske så det fungerar, men då borde det väl stå tex Select TOP 50... En fundering bara Permalänk: https://www.webforum.nu/p/302886 ## #55 — PatrikB, 2001-07-17T18:30Z Anledningen till att detta script kom till är att jag hjälpte en kompis som kör chilliASP och inte fick andra liknande pagingscript att funka. Efter en hel del turer så testade man lite varianter och denna va den smidigaste som jag kunde komma på efter flera olika varianter. Fast, kan du fixa en smigigare som även funkar i chilliASP så blir jag mer än nöjd \*ler\* cya, PatrikB Permalänk: https://www.webforum.nu/p/302887 ## #56 — Lukaspojken, 2001-07-17T18:55Z Om man skulle flytta upp variabeln intPageSize före SQL-satsen så att det blir så här: ``` '## -- hur många poster ska visas per sida -- intPageSize = 50 '## -- sql-fråga för att hämta alla poster -- '## -- denna ska du ändra så att den stämmer '## med det som du vill hämta -- m_strSQL = "SELECT TOP " & intPageSize & "blabla" ``` Fungerar inte det på ChilliAsp? Permalänk: https://www.webforum.nu/p/302888 ## #57 — PatrikB, 2001-07-17T19:01Z jo, men hur hade du tänkt dig sen? Permalänk: https://www.webforum.nu/p/302889 ## #58 — PatrikB, 2001-07-17T19:03Z prova att utveckla detta lite mer ... fast du får EJ använda ADODB.Recordset för vissa av "providerserna" har inte fullt stöd för den. cya, PatrikB Permalänk: https://www.webforum.nu/p/302890 ## #59 — Lukaspojken, 2001-07-17T19:12Z Ska göra det...hinner inte riktigt nu men kommer jag på något så kan jag skicka det till dig... Men på något sätt bygger man upp en funktion som genererar följande värden 50 (som är page 1) 50-100 (som är page 2) 100-50 (som är page 3) etc. Det borde inte vara så svårt egentligen. Ska tänka lite hur man kan göra, återkommer. Permalänk: https://www.webforum.nu/p/302891 ## #60 — PatrikB, 2001-07-17T19:18Z \[r\] Det är ju det jag gjort, bygggt upp en funktion för att veta att page 3 börjar med id x \[/r\] alla idn står ju inte i följd, en del saknas tex efter att man deletat ngt etc. Men med subqueries går det att lösa utan denna funktion, fast när jag testade det så gick det mega segt mot Access dbn, men hade man kört en ms-sql server så hade man kunna gjort det med sp och snabbat upp det lite granna, men i Access va det ingen bra lösning. cya, PatrikB Permalänk: https://www.webforum.nu/p/302892 --- Tråden på webben: https://www.webforum.nu/amne/asp/13579-nytt-script-på-wf-script/page3 Föregående sida: https://www.webforum.nu/amne/asp/13579-nytt-script-på-wf-script/page2.md Nästa sida: https://www.webforum.nu/amne/asp/13579-nytt-script-på-wf-script/page4.md