hjælp til gæstebog
Jeg er ved at lave denne hjemmeside http://www.taarupgaardringen.dkjeg har fundet en gæstebog som jeg mangler lidt hjælp til.
jeg vil gerne have den således at indlæg kommer til at stå i højre side af gæstebogen, hvor man skriver er til venstre. SÅ skal der vises 3 beskeder af gangen og mulig for at bladre.
som gæstebogen er nu kommer man over i et andet design billede,
når man skriver en hilsen, hvor jeg kunne tænke mig at det blev i mit design
Hvem er frisk på at hjælpe mig?
**** guest.asp ****
<!-- #include file="databaseforbindelse.asp" -->
<html>
<body>
<center><h2><br>Gæstebog for Taarupgaardringen</h2></center><hr>
<table>
<form name="guest" action="guest.asp?mode=new" method="post">
<tr>
<td colspan=2>Skriv et indlæg i vores gæstebog</td>
</tr>
<tr>
<td>Titel</td>
<td><input type="text" name="title">
</tr>
<tr>
<td>Dit Navn</td>
<td><input type="text" name="name"></td>
</tr>
<tr>
<td>Din E-Mail</td>
<td><input type="text" name="mail"></td>
</tr>
<tr>
<td colspan=2>Din besked<br><textarea cols=27 rows=10 name="besked"></textarea></td>
</tr>
<tr>
<td colspan=2>Alle felter skal udfyldes !<br>
<input type="submit" value="send"> <input type="reset" value="Reset">
</form>
</td>
</tr>
</table>
<%
'DBPATH="DBQ=" & server.mappath("") & ";Driver={Microsoft Access Driver (*.mdb)}"
'Set conn = Server.CreateObject("ADODB.Connection")
'conn.Open DBPATH
if request("mode")="new" then
title=request.form("title")
xfrom= request.form("name")
xname=request.form("name")
mail=request.form("mail")
msg=request.form("besked")
if title="" or xfrom="" or xname="" or mail="" or msg="" then
response.write "<b>You did not type data in all the fields!!</b>"
else
sql="insert into messages (from_name,from_mail,msg,title) values('" & xname & "','" & mail & "','" & msg & "','" & title & "')"
conn.execute(sql)
end if
end if
sql="select * from messages order by id DESC"
set rs=conn.execute(sql)
response.write "<hr>"
do while rs.eof=false
%>
<table cellspacing=0 cellpadding=1 border=0 bgcolor="000000" width="300">
<tr>
<td>
<table bgcolor="ffffff" width="100%">
<tr bgcolor="a0a0a0">
<td colspan=2><center><b><%=rs("title")%></b></td>
</tr>
<tr>
<td>Fra navn:</td>
<td><%=rs("from_name")%></td>
</tr>
<tr>
<td>Fra E-mail:</td>
<td><a href="mailto:<%=rs("from_mail")%>"><%=rs("from_mail")%></td>
</tr>
<tr>
<td>Modtaget:</td>
<td><%=rs("dato")%></td>
</tr>
<tr>
<td colspan=2><hr></td>
</tr>
<tr>
<td colspan=2><%=rs("msg")%></td>
</tr>
</table>
</td>
</tr>
</table>
<br><br>
</body>
</html>
<%
rs.movenext
loop
set conn=nothing
%>
/Remo
