Avatar billede realone Nybegynder
27. juni 2001 - 23:37 Der er 1 kommentar og
1 løsning

Svar i forum skal gå nedad!!

Daw igen..
Jeg har lige fået et nyt forum.. Det er ligesom på eksperten hvor indlæggende står på samme side som spørgsmålet..
Problemet er bare, at indlæggende \"går opad\", dvs. at den oprindelige besked går længere og længere ned..
Jeg ville gerne have det sådan, at den oprindelige besked bliver stående i toppen og indlæggende går nedad (ligesom eksperten)..
Håber I kan hjælpe..

Her er koden:

<!--#include file=\"tools.asp\"-->
<SCRIPT language=\"JavaScript\">
<!-- hide from JavaScript-challenged browsers
function openNewWindow(url, name, width, height)
{  popupWin = window.open(url, name, \'width=\' + width + \',height=\' + height + \', noscrollBars\')
}
// done hiding -->
</SCRIPT>
<table>
<tr>
    <td><h2><font color=\"#000080\">UltimateASP Bulletin Board V2.0</font></h2></td>
</tr>
<tr>
    <td class=\"RegTextTitle\"><a href=\"java script:history.go(-1);\">Back >></a></td>
</tr>
</table>
<table width=\"468\" cellpadding=\"0\" cellspacing=\"0\">
<tr>
    <td bgcolor=\"#B1B1B1\">
<table cellpadding=\"1\" cellspacing=\"1\" width=\"100%\">
<%
intID = Request(\"ID\")
If intID = \"\" OR NOT IsNumeric(intID) Then
    response.END
End if
OpenDB conB
SQL = \"SELECT * FROM tblBulletin WHERE fldGroupID = \" & Request(\"GID\") & \" ORDER BY fldAuto DESC\"
Set rs = Server.CreateObject(\"ADODB.Recordset\")
rs.Open SQL, conB, 3, 1

If rs.EOF Then
        response.write \"Error.\"
        response.END
End If

While Not rs.EOF
If IsNull(rs(\"fldFace\")) OR rs(\"fldFace\") = -1 Then
    strFace = \"-\"
Else
    strFace = \"<img src=\"\"images/face/\" & rs(\"fldFace\") & \".gif\"\">\"
End If

body = Replace(Server.HTMLEncode(rs(\"fldMessage\")), vbCrLf, \"<br>\")
body = Replace(body, \"&lt;%\", \"<font class=AspCode>&lt;%\")
body = Replace(body, \"%&gt;\", \"%&gt;</font>\")
%>
<tr bgcolor=\"#EBEBD8\">
    <td><Font face=Arial size=2><B><%=strFace%>&nbsp;<%=Server.HTMLEncode(rs(\"fldTitle\"))%></b></font></td>
</tr>
<tr bgcolor=\"#F2F2F2\">
    <td><table width=\"100%\"><tr><td><font face=verdana size=1><b>Posted By: <a href=\"mailto:<%=rs(\"fldEmail\")%>\"><%=rs(\"fldName\")%></a></b></font></td><td align=\"right\"><font face=verdana size=1><b>Posted At: <font color=\"#CC3300\"><%=rs(\"fldTime\")%>, <%=rs(\"fldDate\")%></b></font></td></tr></table></td>
</tr>
<tr bgcolor=\"#ffffff\">
    <td><Font face=Arial size=2><%=body%></font><br><a href=\"java script:openNewWindow(\'post.asp?reply=<%=rs(0)%>&PgNo=<%=Request(\"PgNo\")%>&GID=<%=Request(\"GID\")%>&CID=<%=Request(\"CID\")%>&title=<%=Server.URLEncode(Replace(rs(\"fldTitle\"), \"\'\", \"\"))%>\', \'remote\',\'480\',\'460\');\"><img src=\"images/reply.gif\" border=\"0\" align=\"right\"></a></td>
</tr>
<%
rs.MoveNext
Wend
rs.Close
Set rs = Nothing
%>
</table>
    </td>
</tr>
</table>

Avatar billede zoidberg Nybegynder
27. juni 2001 - 23:40 #1
ORDER BY fldAuto ASC
Avatar billede realone Nybegynder
27. juni 2001 - 23:45 #2
zoidberg --- Thank U.. Det var lige det rigtige.. :))
</RealOne>
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester