Den er jo ret lang - men her er den:
<%@ Language=VBScript %>
<!--#include file="conn_open.asp"-->
<!--#include file="ADOVBS.inc"-->
<!--#include file="IASUtil.asp"-->
<%
SQLStmt = "Select max(news_id) as MaxId From news Where news_catid=1"
Set RS = Connection.Execute(SQLStmt)
SQLStmt = "Select news_id,news_catid,headline,intro,body1 From news Where news_id=" & RS("MaxId")
Set RS1 = Connection.Execute(SQLStmt)
SQLStmt = "Select text_id,headline,intro,body From text Where text_id=11"
Set RS3 = Connection.Execute(SQLStmt)
CurrentRecord = 0
SQLStmt = "Select text_id,body From text Where text_id=9"
Set RS4 = Connection.Execute(SQLStmt)
CurrentRecord = 0
SQLStmt = "Select text_id,body From text Where text_id=15"
Set RS6 = Connection.Execute(SQLStmt)
CurrentRecord = 0
%>
<!-- I ovenstående har jeg indsat den sidste del af koden - den er ny ift oprindelig - den skal bruges til at kalde teksten som skal ind i det nye felt hvor der skal staa om publikationer -->
<!-- Filnavn på dette dokument er forside.asp -->
<html>
<head>
<title>Det Sociale Indeks</title>
<link rel="stylesheet" href="css/dsi.css" type="text/css">
<script language="JavaScript" src="js/print.js"></script>
</head>
<body topmargin="0" leftmargin="0" marginheight="0" marginwidth="0" bgcolor="white"
background="images/bg.gif">
<table border="0" cellpadding="0" cellspacing="0" width="580">
<tr>
<td valign="top" width="10"><img src="/images/1x1pix_trans.gif" width="10" height="14"
border="0"></td>
<td width="345" valign="top"></td>
<td valign="top" width="12"><img src="/images/1x1pix_trans.gif" width="12" height="14"
border="0"></td>
<td width="1"></td>
<td width="12" valign="top"><img src="/images/1x1pix_trans.gif" width="12" height="14"
border="0"></td>
<td width="210" valign="top"></td>
</tr>
<tr>
<td width="10" rowspan="3" valign="top"></td>
<td valign="top" width="345"><img src="images/imagecontent/arbejde_121.jpg" width="130"
height="159" border="0" align="left"> <%
intro = Replace(RS3("body"),VBcRLF,"<br>" & VBcRLF)
%> <%=intro%><br>
<br>
</td>
<td valign="top" width="12" rowspan="2"></td>
<td valign="top" width="1" bgcolor="#cacaca" rowspan="2"><img
src="/images/1x1pix_trans.gif" width="1" height="1" border="0"></td>
<td valign="top" width="12" rowspan="2"></td>
<td valign="top" width="210" rowspan="2"><table border="0" cellpadding="0" cellspacing="0"
width="210">
<tr>
<td><img src="images/header/spacer_header_nyheder.gif" width="210" height="17" border="0"></td>
</tr>
<tr>
<td><img src="images/1x1pix_trans.gif" width="10" height="7" border="0"></td>
</tr>
<tr>
<td><img src="images/stemp_lille.jpg" width="65" height="65" border="0" align="left"> <span
id="small"><b><%=RS1("headline")%></b><br>
<%body =Left( Replace(RS1("body1"),VBcRLF,"<br>" & VBcRLF),98)%> <br>
<%=body%> ... </span></td>
</tr>
<tr>
<td align="right"><img src="/images/1x1pix_trans.gif" width="10" height="7" border="0"></td>
</tr>
<tr>
<td align="right"><a href="nyheder.asp?news_id?news_id=<%=RS1("news_id")%>"
target="content"><img src="images/laes_mere.gif" width="80" height="17" border="0"></a></td>
</tr>
<!-- Her har jeg indsat tre nye tabeldefinitioner -->
<tr>
<td align="right"><img src="images/greyspacer.gif" width="210" height="7" border="0"></td>
</tr>
<tr>
<td><span id="small"><%body = Replace(RS6("body"),VBcRLF,"<br>" & VBcRLF)%> <%=Left(body,294)%>...</span></td>
</tr>
<tr>
<td align="right"><img src="images/greyspacer.gif" width="210" height="7" border="0"></td>
</tr>
<!-- Her vi tilbage til det oprindelige - bortset fra at jeg har byttet om på øverste og nederste tabel indhold -->
<tr>
<td><span id="small"><img src="images/the_social_index.gif" width="55" height="54"
border="0" align="left"> <%body = Replace(RS4("body"),VBcRLF,"<br>" & VBcRLF)%> <%=Left(body,294)%>...</span></td>
</tr>
<tr>
<td align="right"><img src="/images/1x1pix_trans.gif" width="10" height="7" border="0"></td>
</tr>
<tr>
<td align="right"><a href="eng_version.asp" target="content"><img
src="images/read_more.gif" width="80" height="17" border="0"></a></td>
</tr>
<tr>
<td><img src="/images/1x1pix_trans.gif" width="10" height="7" border="0"></td>
</tr>
<!-- her slutter den overste tabel som jeg har flyttet herned -->
</table>
</td>
</tr>
<tr>
<td valign="top" width="345" align="right"><img src="/images/1x1pix_trans.gif" width="10"
height="10" border="0"></td>
</tr>
<tr>
<td valign="top" colspan="5"><table border="0" cellpadding="0" cellspacing="0"
width="100%">
<tr>
<td><img src="/images/1x1pix_trans.gif" width="10" height="10" border="0"></td>
</tr>
<tr height="1">
<td bgcolor="#cacaca" height="1"><img src="/images/1x1pix_trans.gif" width="1" height="1"
border="0"></td>
</tr>
<tr>
<td><img src="/images/1x1pix_trans.gif" width="10" height="5" border="0"></td>
</tr>
<tr>
<td align="center"><span id="adrbar">Sekretariatet for Det Sociale Indeks • Peder
Hvitfeldts Stræde 16, stuen • 1173 København K<br>
Tlf: 33 91 97 96 • Fax: 33 14 29 14 • <a href="mailto:info@detsocialeindeks.dk"
class="front">info@detsocialeindeks.dk</a><br>
</span></td>
</tr>
<tr>
<td align="right"><img src="/images/1x1pix_trans.gif" width="10" height="5" border="0"></td>
</tr>
<tr>
<td align="right"><a href="
http://www.navigent.dk/" target="_new"><img
src="images/by_navigent.gif" width="58" height="10" border="0"></a></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
Ny bruger
Nybegynder
Opret
Preview
