Hvor satan er fejlen!

Please det er lidt vigtig ;) 200 points lægges gerne oven i!

Nu er jeg ikke helt vildt ekspert på HTML...
Men hvorfor har du 2 </html>'er

Sleizer

Hvor henne?

Der er selfølgelig en </html> i slutningen..
og så er der en lidt over <% og ikke så langt fra bunden...

Sleizer

Blander mig lige lidt

</html> 'den første her'
<%
myConn.Close
Set myConn = Nothing
%>




</td></tr></table>
<!--- end left column --->

</td></tr>
<tr><td colspan=5><img src="images/space.gif" height=8></td></tr>
<!--- menu starts here --->
<!--#include file="bund.asp"-->

</center>
</body>
</html> 'den anden her'

Hmm ved ikke, der slutter HTML kodningen, ogsp kommer der noget asp

jeg akn simpelhen ikkke se fejlen, den virker godt hvis det ikke er langt ind i designet

Det ville ikke give en 500 fejl.

Har du ASP kode i bund.asp og top.asp ?
Hvis ja, så prøv at poste det.

Ja tror du ikke det er fejlen???

Sleizer

jeghar ikke ASP kode i de to filer

Nu når du har sat det ind i dit design, har du så husket at se efter om stien til databasen er der stadigvæk er rigtig?

Jo jeg har ASP kode i Bund.asp

Bund.asp ser sådan ud:

<table border=0 cellpadding=1 cellspacing=1 bgcolor="666666" width=600><tr><td>

<table border=0 cellpadding=1 cellspacing=0 bgcolor="333333" width=600>
<tr>
<td><a href="index.asp">Index</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">News-page</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">Members</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">Join Infliction</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">Tagwall</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="#">Links</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="#">Admin</a></td>

</tr></table>

</td></tr></table>

</td></tr>

<!--- menu ends here --->
</tr>


<tr><td colspan=5><img src="images/space.gif" height=8></td></tr>
<center><font face="Verdana" size="1">Copyright Jan Hartmann aka Snebold <br> Users online right now: <% Response.Write Application("BrugereOnline") %>
</center>






</table>


</center>
</BODY>
</HTML>

Så post det lige.

Er gjordr

Hvis <% Response.Write Application("BrugereOnline") %> ikke giver en fejl og stien til databasen er rigtig, så ved jeg ikke, hvad det kan være. Du havde tjekket stien til databasen ik'?

Jo, den er rigtig.. :(

Denne linie:
<% Response.Buffer = True %>
Må ikke være i linie: 39 den skal flyttes op som første linie om så det betyder at den skal flyttes til top.asp. !!

Det virker heller ikke

Okay her er min kode på CW.asp:


<html>
<head>
<title>.:Infliction - Clan-System:.</title>

<link rel="stylesheet" type="text/css" href="default.css">



</head>
<body BGCOLOR="#333333" text="ececec" link="F76B08" alink="ffffff" vlink="ececec" background="images/bg.gif" bgproperties="fixed">

<center>
<table border="0" width=600 cellpadding=0 cellspacing=0>



<tr><td align=left><img src="images/Top2.jpg"></td></tr>


<tr><td><img src="images/space.gif" height=8></td></tr>


<tr><td valign=top>

<!--- menu starts here --->

<!--#include file="http://www.vindtitusind.dk/infliction/top.asp"-->

<!--- menu ends here --->
<tr><td><img src="images/space.gif" height=8></td></tr>

<tr>
<td bgcolor="333333" valign=top colspan=3>


<!--- left column --->

<table border=0 cellpadding=5 cellspacing=1><tr><td><U>Clan-System</U><p>
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database/clanwars.mdb")
    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM Played_War"
    rs.Open strSQL, myConn, 1, 3
   
    Set rs1 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT Count(*) AS ItemCount1 FROM Played_War"
    rs1.Open strSQL, myConn, 1, 3
   
    Set rs2 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT Count(*) AS ItemCount2 FROM Played_War WHERE Result = 'Won'"
    rs2.Open strSQL, myConn, 1, 3
   
    Set rs3 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT SUM(uspoints) AS Points FROM Played_War"
    rs3.Open strSQL, myConn, 1, 3
   
    Set rs4 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM Scheduled_War"
    rs4.Open strSQL, myConn, 1, 3
   
    Set rs5 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT Count(*) AS ItemCount3 FROM Played_War WHERE Result = 'Lost'"
    rs5.Open strSQL, myConn, 1, 3

    Set rs6 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT Count(*) AS ItemCount4 FROM Played_War WHERE Result = 'Draw'"
    rs6.Open strSQL, myConn, 1, 3
   
    Set rs7 = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT SUM(thempoints) AS Points2 FROM Played_War"
    rs7.Open strSQL, myConn, 1, 3
%>


<p align="center">

<table border="0" cellpadding="3" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" bgcolor="#000000">
  <tr>
    <td colspan="2"><b><font size="2">Statistics</font></b></td>
  </tr>
  <tr>
    <td background="images/back.gif"><b><font size="2">Total wars:</font></b></td>
    <td background="images/back.gif"><font size="2"><%=RS1("ItemCount1")%></font></td>
  </tr>
  <tr>
    <td background="images/back.gif"><b><font size="2">Wars Won:</font></b></td>
    <td background="images/back.gif"><font size="2"><%=RS2("ItemCount2")%></font></td>
  </tr>
  <tr>
    <td background="images/back.gif"><b><font size="2">Wars Lost:</font></b></td>
    <td background="images/back.gif"><font size="2"><%=RS5("ItemCount3")%></font></td>
  </tr>
  <tr>
    <td background="images/back.gif"><b><font size="2">Wars Draw:</font></b></td>
    <td background="images/back.gif"><font size="2"><%=RS6("ItemCount4")%></font></td>
  </tr>
  <tr>
    <td background="images/back.gif"><b><font size="2">Points We Scored:</font></b></td>
    <td background="images/back.gif"><font size="2"><%=RS3("Points")%></font></td>
  </tr>
  <tr>
    <td background="images/back.gif"><font size="2"><b>Other Clans </font><b>
    <font size="2">Scored:</font></b></b></td>
    <td background="images/back.gif"><font size="2"><%=RS7("Points2")%></font></td>
  </tr>
</table>
<p align="center"><b><font size="3">ClanWars For <%=RS("ClanName")%></font></b></p>
<div align="center">
  <center>
  <table border="0" cellpadding="3" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber2" width="90%" bgcolor="#000000">
    <tr>
      <td colspan="6">
      <p align="center"><b><font size="2">Played Wars</font></b></td>
    </tr>
    <tr>
      <td background="images/back2.gif"><b><font size="2">Result:</font></b></td>
      <td background="images/back2.gif"><b><font size="2">Date:</font></b></td>
      <td background="images/back2.gif"><font size="2"><b>Opponent:</b></font></td>
      <td background="images/back2.gif"><b><font size="2">Maps:</font></b></td>
      <td background="images/back2.gif"><b><font size="2">Score:</font></b></td>
      <td background="images/back2.gif"><b><font size="2">Report:</font></b></td>
    </tr>
    <% Do While Not rs.EOF %>
    <tr>
      <td background="images/back.gif"><font size="2">
      <%
If RS("Result") = "Won" Then
response.write("<img border=""0"" src=""images/won.gif"" alt=""We Won This One"">")
END IF
%> <%
If RS("Result") = "Lost" Then
response.write("<img border=""0"" src=""images/lost.gif"" alt=""We Lost This One"">")
End If
%> <%
If RS("Result") = "Draw" Then
response.write("<img border=""0"" src=""images/Draw.gif"" alt=""We Draw This One"">")
End If
%> </font></td>
      <td background="images/back.gif"><font size="2"><%=RS("mday")%>/<%=RS("mmonth")%>
      - <%=RS("myear")%></font></td>
      <td background="images/back.gif"><font size="2"><%=RS("opponent")%></font></td>
      <td background="images/back.gif"><font size="2"><%=RS("Maps")%></font></td>
      <td background="images/back.gif"><font size="2"><b><%=RS("uspoints")%></b>
      - <%=RS("thempoints")%></font></td>
      <td background="images/back.gif"><font size="2">
      <%
If RS("Report") = "Nope" Then
Response.Write("<Center>")
Response.Write("Nope")
Response.Write("</Center>")
Else
Response.Write("<Center>")
Response.Write("<a href=""Go.asp?Url=http://" & RS("Report") & """><img src=""images/homepage.gif"" border=""0""></a>")
Response.Write("</Center>")
END IF
%></font></td>
      <%rs.Movenext
    Loop   
%>
    </tr>
  </table>
  <p><br>
  <br>
  </p>
  </center>
</div>
<div align="center">
  <center>
  <table border="0" cellpadding="3" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="90%" id="AutoNumber3" bgcolor="#000000">
    <tr>
      <td width="100%" colspan="5">
      <p align="center"><b><font size="2">Scheduled Wars</font></b></td>
    </tr>
    <tr>
      <td background="images/back2.gif"><strong><font size="2">Time</font></strong></td>
      <td background="images/back2.gif"><strong><font size="2">Date:</font></strong></td>
      <td background="images/back2.gif"><strong><font size="2">Opponent:</font></strong></td>
      <td background="images/back2.gif"><strong><font size="2">Maps:</font></strong></td>
      <td background="images/back2.gif"><strong><font size="2">Type:</font></strong></td>
    </tr>
    <tr>
      <% Do While Not rs4.EOF %>
      <td background="images/back.gif"><font size="2"><%=RS4("mtime")%>:<%=RS4("mminute")%>
      </font></td>
      <td background="images/back.gif"><font size="2"><%=RS4("mday")%>/<%=RS4("mmonth")%>
      - <%=RS4("myear")%></font></td>
      <td background="images/back.gif"><font size="2"><%=RS4("opponent")%></font></td>
      <td background="images/back.gif"><font size="2"><%=RS4("maps")%></font></td>
      <td background="images/back.gif"><font size="2"><%=RS4("league")%></font></td>
    </tr>
    <%rs4.Movenext
    Loop   
%>
  </table>
  </center>
</div>
<p><br>
</p>
<div align="center">
  <center>
  <table border="0" cellpadding="2" cellspacing="0" style="border-collapse: collapse" id="AutoNumber4">
    <tr>
      <td><img border="0" src="images/lost.gif" alt="Lost"></td>
      <td>=</td>
      <td>&nbsp;Lost</td>
    </tr>
    <tr>
      <td><img border="0" src="images/won.gif" alt="Won"></td>
      <td>= </td>
      <td>Won</td>
    </tr>
    <tr>
      <td><img border="0" src="images/Draw.gif" alt="Draw"></td>
      <td>=</td>
      <td>Draw</td>
    </tr>
  </table>
  </center>
</div>

</body>
<!-- Do not remove this copyright notice -->
<p align="center">Bemærk: Dette script er ikke et Infliction har lavet. - ClanWar Script™ 0.3 Beta 2<br>
By FireWall<br>
Copyright 2001© <br>
<!-- Do not remove this copyright notice -->

<p align="center">


<%
myConn.Close
Set myConn = Nothing
%>




</td></tr></table>
<!--- end left column --->

</td></tr>
<tr><td colspan=5><img src="images/space.gif" height=8></td></tr>
<!--- menu starts here --->

<!--#include file="http://www.vindtitusind.dk/infliction/bund.asp"-->

</center>
</body>
</html>


Og her er Top.asp:


<% Response.Buffer = True %>
<table border=0 cellpadding=1 cellspacing=1 bgcolor="666666" width=600><tr><td>

<table border=0 cellpadding=1 cellspacing=0 bgcolor="333333" width=600>
<tr>
<td><a href="index.asp">Index</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">News-page</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">Members</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">Join Infliction</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="index.asp">Tagwall</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="#">Links</a></td>
<td><img src="images/space.gif" width=8></td>
<td><a href="#">Admin</a></td>

</tr></table>

</td></tr></table>
</td></tr>




</td></tr>

Ja så mangler vi kun en DB - det er umuligt at konstruere alle de tabeller som koden bruger. Lav et link så jeg kan downloade den.

Downloade hvad?

jamen, hvis jeg bare lægger koden for sig så den ikke har et design end nogle tabeller som tingene står i virker den fint

Fandt ud af noget andet.. Jeg opretter et spm. om noget andet..

Så lav lige link til dette spm.