Forum Upplägg

[mr Loco]

Behöver lite hjälp.

Sitter och pysslar med ett forum, och ett upplägg ska se ut som sådan:

 

rubrik namn antal svar.

Hej världen 0

Hello world 4

Hola Sunshine 2

 

då har jag ju två sql kommandon som hämtar inlägg info, samt den som räknar ut antal svar.

 

men hur ska jag fixa så Count radas upp i "Do" kommandot?

eller är jag tvunget att skapa en kolumn för Antal svar i tabellen, som lägger till 1 för varje svar?

[Kristianstad]

Hej!

 

Hur ser koden ut i nuläget? Lättare att hjälpa då!

/ Kristoffer

Windows kunde inte hitta något tangentbord. Tryck F1 för att försöka igen eller F2 för att avbryta.

 

[TobiasT]

Om du har ett recordset som innehåller inlägg så kan du hämta ett nytt recordset i din loop som innehåller antal svar:

 

Do Until rstMessages.EOF

'Hämta antal svar med en ny sql-fråga

 

rstMessages.MoveNext

Loop

 

Eller hämta antal inlägg i samma SQL-fråga:

 

SELECT M.Header, M.Name, (SELECT COUNT(*) FROM Messages WHERE ParentID = M.ID) FROM Messages M

 

Hoppas du förstår hur jag menar ;-)

 

/TobiasT

 

http://webbhotell.theland.se - varför betala för mer än du har behov av?

 

[mr Loco]

Såhär ser den ut just nu, och som du ser så är den inte fungerande. Vet inte hur jag ska göra med Rakna kommandot.

 

<% Visa = "SELECT * FROM inlagg WHERE ForumID = '" & Request.QueryString("forumid") & "'"

Rakna = "SELECT COUNT (*) FROM svar WHERE svarsID = '" & Request.QueryString("ID") & "'"

Set RS1 = Connect.Execute(Visa)

Set RS2 = Connect.Execute(Rakna)

%>

<table border="1" cellpadding="0" cellspacing="0">

<tr>

<td width="400">Rubrik</td>

<td width="200">Insändare</td>

<td width="100">Antal svar</td>

</tr>

<% Do While Not RS1.EOF%>

<tr>

<td width="400"><a href="default.asp?forum=oppna&id=<% =RS1("ID") %>')"><% =RS1("Rubrik") %></a></td>

<td width="200"><a href="mailto:<% =RS1("email") %>"><% =RS1("Namn") %></a></td>

<td width="100"><% =RS2(0)%></td>

</tr>

<% RS1.MoveNext %>

<% RS2.MoveNext %>

<% Loop %>

 

[TobiasT]

Såhär ser den ut just nu, och som du ser så är den inte fungerande. Vet inte hur jag ska göra med Rakna kommandot.

 

<% Visa = "SELECT * FROM inlagg WHERE ForumID = '" & Request.QueryString("forumid") & "'"

 

Set RS1 = Connect.Execute(Visa)

%>

<table border="1" cellpadding="0" cellspacing="0">

<tr>

<td width="400">Rubrik</td>

<td width="200">Insändare</td>

<td width="100">Antal svar</td>

</tr>

<% Do While Not RS1.EOF

Rakna = "SELECT COUNT (*) FROM svar WHERE svarsID = '" & RS1("ID") & "'"

Set RS2 = Connect.Execute(Rakna)

%>

<tr>

<td width="400"><a href="default.asp?forum=oppna&id=<% =RS1("ID") %>')"><% =RS1("Rubrik") %></a></td>

<td width="200"><a href="mailto:<% =RS1("email") %>"><% =RS1("Namn") %></a></td>

<td width="100"><% =RS2(0)%></td>

</tr>

<% RS1.MoveNext %>

<% Loop %>

 

Testa ovanstående.

/TobiasT

 

http://webbhotell.theland.se - varför betala för mer än du har behov av?