Just nu i M3-nätverket
Jump to content

Forum Upplägg


mr Loco

Recommended Posts

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?

Link to comment
Share on other sites

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.

 

Link to comment
Share on other sites

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?

 

Link to comment
Share on other sites

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 %>

 

Link to comment
Share on other sites

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?

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...