---
title: "Varför ökar värdet i strReplies för varje rad?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/163626-varför-ökar-värdet-i-strreplies-för-varje-rad"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "bigsky"
published: "2007-08-19T14:21:01.000Z"
updated: "2007-08-19T18:16:00.000Z"
replies: 3
views: 449
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/databaser-sql/163626-varför-ökar-värdet-i-strreplies-för-varje-rad"
---

# Varför ökar värdet i strReplies för varje rad?

## #1 — bigsky, 2007-08-19T14:21Z

Tanken är ju att strReplies ska räkna antalet poster i tabellen tblComments som hör ihop med respektive post i tblBlog. Just nu ökar bara värdet i strReplies med 1 för varje rad i For ... Next.

```
Set rsGetBlogs = ConnBlog.Execute("SELECT a.*, (SELECT Count(SubId) FROM tblComments AS b WHERE b.SubId = a.Id) AS strReplies FROM tblBlog a ORDER BY a.Published DESC")
```

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

## #2 — Fredde Mannen, 2007-08-19T14:37Z

Så vitt jag kan se så hämtar du din bloggar och räknar antalet comments kopplat till respektiv blogg.

Då kommer den intressanta frågan, hur ser koden som används tillsammans med detta?

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

## #3 — bigsky, 2007-08-19T14:42Z

Bla. Palle's paging-script, men det är väl inte det som är problemet.

```
If Not rsGetBlogs.EOF Then arrRecSet = rsGetBlogs.GetRows()
    
	If IsArray(arrRecSet) Then
	intPostsPerPage = 10
    
	If Len(Trim(Request.QueryString("n"))) > 0 Then intPage = cInt(Trim(Request.QueryString("n"))) Else intPage = 1
	intFirstPost = (intPage - 1) * intPostsPerPage
	intTotalPosts = UBound(arrRecSet, 2)
	intPages = ((intTotalPosts)\intPostsPerPage) + 1
    
	If intFirstPost + (intPostsPerPage - 1) >= UBound(arrRecSet,2) Then
	  intLastPost = UBound(arrRecSet, 2)
	Else
	  intLastPost = intFirstPost + (intPostsPerPage - 1)
	  strNext = True
	End If

For i = intFirstPost To intLastPost
  Response.Write arrRecSet(strReplies,i)
Next
End If
```

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

## #4 — bigsky, 2007-08-19T18:16Z

Upptäckte att jag nog borde ha skrivit ut värdet i strReplies med:

```
Response.Write arrRecSet(6,i)
```

istället för:

```
Response.Write arrRecSet(strReplies,i)
```

Men visst borde det egentligen fungera iaf?

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

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/163626-varför-ökar-värdet-i-strreplies-för-varje-rad