7 svar · 158 visningar · startad av graf
Nu är det ett till problem med min gästbok :-) Fast förhoppningsvis det sista...
Det är såhär, att skriva inlägg rutan är överst på sidan som ni säkert märker i koden nedan, men vad ska jag klippa ut och klippa in om jag vill ha skriva inlägg rutan längst ner på sidan istället?
Provade lite men det gick inte så bra :-(
Tusen tack till den som hjälper mig!
just det den glömde jag :D
<%
Set db = Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("db/guestbook.mdb")
SQL = "SELECT * From Guestbook ORDER BY Datum DESC"
Set rs = db.Execute(SQL)
%>
<!--
0========================================================================0
0========================================================================0
//-->
<html>
<head>
<title>Graf</title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body>
<form action="check.asp" method="post">
<table width="400" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100"><b>Användarnamn:</b></td>
<td width="300"><input name="namn" id="input"></td>
</tr>
<tr>
<td width="100"><b>Epost:</b></td>
<td width="300"><input name="epost" value="@" id="input"></td>
</tr>
<tr>
<td width="100"><b>Hemsida:</b></td>
<td width="300"><input name="hemsida" value="http://" id="input"></td>
</tr>
<tr>
<td width="100"><b>Rubrik:</b></font></td>
<td width="300"><input name="icq" id="input"></td>
</tr>
<tr>
<td width="100" valign="top"><b>Meddelande:</b></td>
<td width="300"><textarea rows="5" cols="40" name="meddelande" id="input"></textarea></td>
</tr>
<tr>
<td colspan="2"> <input type="submit" value="Skicka" id="input"> <input type="reset" value="Rensa" id="input"></td>
</tr>
</table>
</form>
<br><br>
<img src="hr.gif">
<table width="400" border="0" cellspacing="0" cellpadding="0">
<%
Do Until rs.EOF
%>
<%
meddelande=Replace(rs("meddelande"),vbCrLf, "<br>")
%>
<tr>
<td width="400"><b>Användarnamn:</b> <%If Not rs("epost")="" Then%><a href="mailto:<%=rs("epost")%>"><%=rs("namn")%></a><%End IF%> (<%=rs("datum")%> )</td>
</tr><br>
<tr><%If Not rs("hemsida")="" Then%>
<td width="400"><b>Hemsida:</b> <a href="<%=rs("hemsida")%>" target="_blank"><%=rs("hemsida")%></a></td>
<%End IF%>
</tr><br>
<tr><%If Not rs("icq")="" Then%>
<td width="400"><b>Rubrik: <%=rs("icq")%></td></B>
<%End IF%>
</tr><br>
<tr>
<td width="400"><%=meddelande%></td>
</tr>
</table>
<p>
<img src="hr.gif">
<p>
<%
rs.MoveNext
Loop
%>
</body>
</html>
<html>
<head>
<title>Graf</title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body>
<img src="hr.gif">
<table width="400" border="0" cellspacing="0" cellpadding="0">
<%
Do Until rs.EOF
%>
<%
meddelande=Replace(rs("meddelande"),vbCrLf, "<br>")
%>
<tr>
<td width="400"><b>Användarnamn:</b> <%If Not rs("epost")="" Then%><a href="mailto:<%=rs("epost")%>"><%=rs("namn")%></a><%End IF%> (<%=rs("datum")%> )</td>
</tr><br>
<tr><%If Not rs("hemsida")="" Then%>
<td width="400"><b>Hemsida:</b> <a href="<%=rs("hemsida")%>" target="_blank"><%=rs("hemsida")%></a></td>
<%End IF%>
</tr><br>
<tr><%If Not rs("icq")="" Then%>
<td width="400"><b>Rubrik: <%=rs("icq")%></td></B>
<%End IF%>
</tr><br>
<tr>
<td width="400"><%=meddelande%></td>
</tr>
</table>
<p>
<img src="hr.gif">
<p>
<%
rs.MoveNext
Loop
%>
<br><br>
<form action="check.asp" method="post">
<table width="400" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100"><b>Användarnamn:</b></td>
<td width="300"><input name="namn" id="input"></td>
</tr>
<tr>
<td width="100"><b>Epost:</b></td>
<td width="300"><input name="epost" value="@" id="input"></td>
</tr>
<tr>
<td width="100"><b>Hemsida:</b></td>
<td width="300"><input name="hemsida" value="http://" id="input"></td>
</tr>
<tr>
<td width="100"><b>Rubrik:</b></font></td>
<td width="300"><input name="icq" id="input"></td>
</tr>
<tr>
<td width="100" valign="top"><b>Meddelande:</b></td>
<td width="300"><textarea rows="5" cols="40" name="meddelande" id="input"></textarea></td>
</tr>
<tr>
<td colspan="2"> <input type="submit" value="Skicka" id="input"> <input type="reset" value="Rensa" id="input"></td>
</tr>
</table>
</form>
</body>
</html>
------------------
essentitia preter non sans multiplicandum
Tackar!
Om man vill ha en länk till längst ner på sidan vad skriver man då? Behöver man nåt ankare?
Då man vill längst upp på sidan skriver man ju bara <A HREF="#top">Till toppen av sidan</A> men hur blir det om man vill ha en länk till längst ner på sidan?
Du måste ha ett ankare.
<a href="#down">Ner</a>
Sidkod...
<a name="down"></a>
Mer sidkod...
/Mika3l
------------------
Laddar... ;-)
LarsG: Skriv/markera gärna vad det är du ändrar så att vi andra kan ta del av svaren.
------------------
"Tål det inte att skämtas om, är det inte värt att ta på allvar."
