Hi,
I am trying to remake an existing forum in ASP.
Please see my NOT WORKING result at
http://testforum.franl.dk, and the forum I am trying to remake at
http://www.prikpagina****/list.php?f=446
I cannot make the layout, as the original forum have.
Technical background:
My forum is based on a .mdb / JET database.
Administrative fields in the table are ID (AutoNumber), ReplyID (which is 0 if a new message is posted, and gets the ID of the original message, if it is a reply), BaseID (which gets the ID of the first message in a line) and Position (which is the number of reply's in ONE line).
Here is a part of the code, I used to make a list of ID's, in which order they should be shown. But somewhere I am making a big mistake, because it doesn't work.
Note: To avoid heavy network traffic, at load of the ASP-file, the complete Database will be read, and all values will be recorded in arrays as IDs, ReplyIDs, BaseIDs, Subjects, Names, IPs, and so on
Dim ArOrder(99999)
Dim CurrentRecord
Dim Counter
CurrentRecord = 1
Dim J
Counter = 1
Dim NewRecord
Sub FindRecord()
ArOrder(Counter) = ids(CurrentRecord)
CurrentRecord = CurrentRecord + 1
Counter = Counter + 1
For J = CurrentRecord To RecordCounter
If replyids(J) = CurrentRecord then
CurrentRecord = ids(J)
J = RecordCounter
End if
Next
End Sub
Sub FindRecord2()
ArOrder(Counter) = ids(CurrentRecord)
CurrentRecord = CurrentRecord + 1
Counter = Counter + 1
For J = CurrentRecord To RecordCounter
If replyids(J) = CurrentRecord then
CurrentRecord = ids(J)
J = RecordCounter
End if
Next
response.write Counter & ". Albert zegt: " & CurrentRecord & "<br>"
End Sub
For I = 1 To RecordCounter
If ReplyIDs(I) = 0 then FindRecord
If ReplyIDs(I) <> 0 then FindRecord2
Next
Please, WHO can help me setting up a forum like
http://prikpagina****/list.php?f=446
Thanks in advance!