Dele script over to sider?!
Så lige en til natteravnene.Jeg har et gæstebog-script jeg gerne vil have til at køre over to forskellige sider hvilket vil sige at selve skrive delen skal lægge i en kollonne i en tabel på 'index.asp' mens selve visnings-delen skal gemmens på siden 'tekst.asp' der så lægger som en <iframe> på index.asp
jeg har siddet og rodet en del men får bare en 500 error.. måske noget <! include file/script> eller i den du??
*her er mit script:
<form name="guest" action="guest.asp?mode=new" method="post">
<table>
<tr>
<td colspan=2>Make new entry</td>
</tr>
<tr>
<td>Title</td>
<td><input type="text" name="title">
</tr>
<tr>
<td colspan=2>Your message<br><textarea cols=27 rows=10 name="besked"></textarea></td>
</tr>
</table>
All fields must be typed.<br>
<input type="submit" value="send"> <input type="reset" value="Reset">
</form>
<%
DBPATH="DBQ=" & server.mappath("../fpdb/kongemedlem.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open DBPATH
if request("mode")="new" then
title=request.form("title")
msg=request.form("besked")
if title="" or msg="" then
response.write "<b>You did not type data in all the fields!!</b>"
else
sql="insert into messages (msg,title) values('" & 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>From name:</td>
<td><%=rs("from_name")%></td>
</tr>
<tr>
<td>Recieved:</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
%>
|Krel
