Jeg har kommenteret al database-koden (fordi jeg ikke har databasen) og #include..
Det virker fint:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"
http://www.w3.org/TR/html4/loose.dtd"><html>
<head>
<%
Dim A2CChoice
A2CChoice = Request.QueryString("choice")
if A2CChoice ="" then
A2CChoice = "home"
end if
%>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="A2C.css" rel="stylesheet" type="text/css">
<script type="text/javascript" language="javascript" src="js/sniffer.js"></script>
<script type="text/javascript" language="javascript1.2" src="js/style.js"></script>
<!-- Include file="js/custom.asp" -->
</head>
<body onresize="document.location.reload();">
<script type="text/JavaScript">
var tmp;
tmp = new Date();
document.write (tmp);
</script>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="2" rowspan="5" class="border-left"> </td>
<td height="71" class="logo"> </td>
<td width="2" class="border-right"> </td>
</tr>
<tr>
<td height="33" class="menu"> </td>
<td width="2" class="border-right"> </td>
</tr>
<tr>
<td height="25" class="time">Her er du: </td>
<td width="2" class="border-right"> </td>
</tr>
<tr>
<td>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" class="main" style="border-collapse: collapse">
<tr>
<td valign="top" bgcolor="#FFFFFF">
<table border="0" width="100%" cellspacing="0" cellpadding="0" style="border-collapse: collapse">
<tr>
<td>
</tr>
<tr>
<td valign="bottom" style="padding-bottom: 4px">
</td>
</tr>
<tr>
<td height="55" class="main-heading">
<%strSQL = "SELECT hTekst, alt, src, col1Tekst, col2Tekst FROM ((heading LEFT JOIN flash ON heading.headingID=flash.headingID) LEFT JOIN main1 ON flash.flashID=main1.flashID) LEFT JOIN main2 ON main1.main1ID=main2.main1ID WHERE heading.choice = '"& A2CChoice &"' ORDER BY heading.headingID"
'Set Rs = Conn.Execute(strSQL)%>
<p class="textnormal"><%'= "" Rs("hTekst") %></td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0" style="border-collapse: collapse">
<tr>
<td bgcolor="#FFFFFF">
<DIV class="textnormal"><img alt="<%'= Rs("alt") %> " src="<%'= Rs("src") %>" border="0" /><br />
<br /><table width="66%" align="center" cellpadding="0" cellspacing="0" style="WIDTH: 95%; BORDER-COLLAPSE: collapse">
<tbody><tr><td width="50%" valign="top" style="BORDER-RIGHT: #5e6a6c 1pt solid; PADDING-RIGHT: 10px; BORDER-TOP: medium none; PADDING-LEFT: 1px; PADDING-BOTTOM: 1px; VERTICAL-ALIGN: top; BORDER-LEFT: medium none; WIDTH: 50%; PADDING-TOP: 1px; BORDER-BOTTOM: medium none">
<script type="text/JavaScript">
var tmp;
tmp = new Date();
document.write (tmp);
</script>
<%'= Rs("col1Tekst") %> <br>
</td>
<td width="50%" valign="top" style="PADDING-RIGHT: 1px; PADDING-LEFT: 10px; PADDING-BOTTOM: 1px; VERTICAL-ALIGN: top; WIDTH: 50%; PADDING-TOP: 1px">
<%'= Rs("col2Tekst") %>
</td>
</tr>
</tbody>
</table><br />
</DIV></td></tr>
</table>
<td valign="top" class="column-bottom">
<table width="200" height="55" border="0" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" style="border-collapse: collapse">
<tr>
<td width="100%" class="column-top">
</td>
</tr>
<tr>
<td width="100%" height="55" class="column-top"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td height="20" class="column-heading">Nyheder</td>
</tr><tr>
<td class="column-bottom">
<table border="0" cellpadding="2" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td width="100%" class="column-heading"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td width="100%" height="96" valign="top" class="column-main"><br>
<%strSQL = "SELECT newsTekst, newsLink FROM news LEFT JOIN heading ON news.newsID=heading.newsID WHERE online = 'yes' ORDER BY heading.newsID "
'Set Rs3 = Conn.Execute(strSQL)%>
<%'Do While Not Rs3.EOF%>
<a href="default.asp?choice=<%'= Rs3("newsLink") %>" class="column-main"><%'= Rs3("newsTekst") %></a><br><br>
<%'Rs3.MoveNext
'Loop%>
</td>
</tr>
</table>
</table>
<table border="0" cellpadding="0" cellspacing="0" height="22" style="border-collapse: collapse" width="100%">
<tr>
<td width="100%" class="column-bottom"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td height="20" class="column-heading">Løsninger</td>
</tr>
<tr>
<td class="column-bottom">
<table border="0" cellpadding="2" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td width="100%" class="column-heading"></td>
</tr>
</table>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td width="100%" height="96" valign="top" class="column-main">
<p><a href="default.asp?Action=Details&Item=83" onMouseOver=" window.status='Ofte stillede spørgsmål (FAQ)'; return true" onMouseOut="window.status=' '; return true" class="column-main"><br>
Produkt 1<br>
<br>
Produkt 2<br>
<br>
Produkt 3
</a><a href="default.asp?Action=Details&Item=81" onMouseOver=" window.status='Ofte stillede spørgsmål (FAQ)'; return true" onMouseOut="window.status=' '; return true" class="column-main"></a></td>
</tr>
</table>
</table>
<p> </p></td>
</table> </td>
<td class="border-right"> </td>
</tr>
<tr>
<td height="33" class="bottom"> <div align="center">Copyright © Active Communication - All Rights Reserved. <br>
</div></td>
<td width="2" class="border-right"> </td>
</tr>
</table>
<script type="text/javascript" language="javascript1.2" src="js/menu.js"></script>
<%'conn.close
'Set Conn = Nothing
%>
</body>
</html>
Ny bruger
Nybegynder
Opret
Preview
