---
title: "värden mellan properties i class"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/87658-värden-mellan-properties-i-class"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "LR^evil.sid"
published: "2003-10-05T05:36:32.000Z"
updated: "2003-10-05T09:42:19.000Z"
replies: 1
views: 163
page: 1
pages: 1
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/87658-värden-mellan-properties-i-class"
---

# värden mellan properties i class

## #1 — LR^evil.sid, 2003-10-05T05:36Z

Hejsan! Jag sitter och pysslar med en paginclass och har stött på ett för mig obegriplit problem. Vissa variabler, eller alla, det vet jag inte är liksom inte där i classen. Jag kan skriva ut propertyn men inte använda den i själva classen.

Koden, om det har någon betydelse, kommer i den ordningen jag skrivit här.

I clsPagin.asp

```
[red]Public Property Let PageSize(n_IntPageSize)
	c_PageSize = n_IntPageSize
End Property
Public Property Get PageSize()
	PageSize = c_PageSize
End Property[/red]

[blue]Public Property Let CurrentPage(n_IntCurrentPage)
	c_CurrentPage = n_IntCurrentPage
	If Not IsNumeric(n_IntCurrentPage) Then c_CurrentPage = 1
	If Int(n_IntCurrentPage) > TotalPosts() Then c_CurrentPage = TotalPosts()
	If Int(n_IntCurrentPage) < 1 Then c_CurrentPage = 1
End Property
Public Property Get CurrentPage()
	CurrentPage = c_CurrentPage
End Property[/blue]

[red]Public Property Let SQL(n_StrSQL)
	c_SQL = n_StrSQL
	c_SQL = c_SQL & " limit "&((c_PageSize * c_CurrentPage) - c_PageSize)&", "&c_PageSize
End Property
Public Property Get SQL()
	SQL = c_SQL
End Property[/red]

[blue]Public Sub InitConnection()
	Set ODB = Server.CreateObject("ADODB.Connection")
	ODB.Open(Connection)
End Sub[/blue]
```

I pagin.asp

```
[red]cPagin.InitConnection()
cPagin.SQL = "select id, usr from pagin order by id asc"
cPagin.PageSize = 6
cPagin.CurrentPage = Trim(Request.QueryString("page"))[/red]
[blue]Response.Write cPagin.SQL & "<br>"
Response.Write cPagin.CurrentPage & "<br>"
Response.Write cPagin.PageSize & "<br>"[/blue]
```

Och detta ger:

```
select id, usr from pagin order by id asc limit 0, [b]Här borde PageSize så med det gör det inte![/b]
1
6
```

Vilket blir en felaktig sql-fråga i och med att limit inte vet hur många poster som skall hämtas.

Permalänk: https://www.webforum.nu/p/87658

## #2 — Sebbe, 2003-10-05T09:42Z

Borde det inte stå i den här ordningen?

```
cPagin.InitConnection()
cPagin.PageSize = 6
cPagin.CurrentPage = Trim(Request.QueryString("page"))
cPagin.SQL = "select id, usr from pagin order by id asc"
```

Permalänk: https://www.webforum.nu/p/1174972

---

Tråden på webben: https://www.webforum.nu/amne/asp/87658-värden-mellan-properties-i-class