UPIS.ASP :
<!--#include file="common.asp" -->
<%
strPoruka
strIme = Request.Form("Ime")
strPoruka = Request.Form("Poruka")
'Sprijecavanje upisa HTML-a kroz polje ime
strIme = Replace(strIme, "<", "<")
strIme = Replace(strIme, ">", ">")
strIme = Replace(strIme, "'", "''")
'Sprijecavanje upisa HTML-a kroz polje poruka
strPoruka = Replace(strPoruka, "<", "<")
strPoruka = Replace(strPoruka, ">", ">")
strPoruka = Replace(strPoruka, "'", "''")
'otvaranje objekta
Set rsUpis = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblPoruke.* FROM tblPoruke;"
rsUpis.CursorType = 2
rsUpis.LockType = 3
rsUpis.Open strSQL, strCon
rsUpis.AddNew
rsUpis.Fields("IME") = strIme
rsUpis.Fields("PORUKA") = strPoruka
'Provjera dali je neko o polja neispunjeno
if strIme = "" then
response.redirect("shout.asp?error=da")
end if
if strPoruka = "" then
response.redirect("shout.asp?error=da")
end if
if strIme = "ime" then
response.redirect("shout.asp?error=da")
end if
if strPoruka = "msg" then
response.redirect("shout.asp?error=da")
end if
'zapisivanje cookie-a autoru poruke
Response.Cookies("shoutbox")("
www.toxiclab.org")= strIme
Response.Cookies("shoutbox").Expires = Now() + 365
'upis
rsUpis.Update
rsUpis.Requery
'redirekcija
Response.Redirect("SHOUT.ASP")
%>
Index.htm :
<html>
<head>
<title>Stald Kanehøj</title>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<style type="text/css">
a { text-decoration:none }
</style>
<style type="text/css">
BODY{
scrollbar-3d-light-color: #bbbb88;
scrollbar-arrow-color: #000000;
scrollbar-base-color: #ffffff;
scrollbar-dark-shadow-color: #ffffff;
scrollbar-face-color: #bbbb88;
scrollbar-highlight-color: #ffffff;
scrollbar-shadow-color: #ffffff;
}
</style>
<base target="main">
</head>
<body bgcolor="#999966" topmargin="20" leftmargin="0" link="#000000" vlink="#000000" alink="#000000">
<div align="center">
<center>
<table border="1" cellpadding="0" cellspacing="0" bordercolor="#000000" width="800" height="500">
<tr>
<td>
</center>
<table border="0" width="800" cellspacing="0" cellpadding="0" bgcolor="#CCCC99">
<tr>
<td width="799" valign="top" colspan="3">
<p align="center"><img border="0" src="hest03.jpg" width="694" height="80">
</td>
</tr>
<tr>
<td width="171" valign="top" align="center">
<div align="right">
<table border="0" width="154" cellspacing="1">
<tr>
<td width="146">
<div align="right">
<table border="0" style="filter:alpha(opacity=100)" width="120" bgcolor="#000000" cellspacing="1" cellpadding="0">
<tr>
<td width="100%">
<p align="center"><img border="0" src="menu.jpg" width="150" height="18"></p>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" onmouseover="co(this,'in');" onmouseout="co(this,'out');" align="center" width="150" height="16">
<span class="small"><a href="
file:///C:/Documents and Settings/krc/Skrivebord/dogs/show.htm">
<font face="Tahoma" size="1">
<b> Forsiden</b>
</font></a>
</span>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" onmouseover="co(this,'in');" onmouseout="co(this,'out');" align="center" width="150" height="16">
<span class="small"><a href="
file:///C:/Documents and Settings/krc/Skrivebord/dogs/show.htm">
<font face="Tahoma" size="1">
<b> Stald Kanehøj</b>
</font></a>
</span>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" onmouseover="co(this,'in');" onmouseout="co(this,'out');" align="center" width="150" height="16">
<span class="small"><a href="
file:///C:/Documents and Settings/krc/Skrivebord/dogs/show.htm">
<font face="Tahoma" size="1">
<b> Terapeutisk ridning</b>
</font></a>
</span>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" onmouseover="co(this,'in');" onmouseout="co(this,'out');" align="center" width="150" height="16">
<span class="small"><a href="
file:///C:/Documents and Settings/krc/Skrivebord/dogs/show.htm">
<font face="Tahoma" size="1">
<b> Hestene</b>
</font></a>
</span>
</td>
</tr>
<tr>
<td bgcolor="#FFFFFF" onmouseover="co(this,'in');" onmouseout="co(this,'out');" align="center" width="150" height="16">
<span class="small"><a href="
file:///C:/Documents and Settings/krc/Skrivebord/dogs/show.htm">
<font face="Tahoma" size="1">
<b> Kontakt</b>
</font></a>
</span>
</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="146" height="15">
</td>
</tr>
<tr>
<td width="146">
<div align="right">
<table border="0" style="filter: alpha(opacity=100)" bgcolor="#000000" cellspacing="1" cellpadding="0">
<tr>
<td width="100%" bgcolor="#999966" height="18">
<p align="center"><img border="0" src="nyheder.jpg" width="150" height="18"></p>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" valign="middle" align="center">
<font face="Tahoma" size="1">Nyheder
</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td width="146" height="15">
</td>
</tr>
<tr>
<td width="146">
<div align="right">
<table border="0" style="filter:alpha(opacity=100)" width="152" bgcolor="#000000" cellspacing="1" cellpadding="0">
<tr>
<td width="100%" bgcolor="#999966" height="15">
<p align="center"><img border="0" src="opdtatlene.jpg" width="150" height="18"></p>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" height="105">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="98%">
<tr>
<td>
<p align="center"><font size="1" face="Tahoma">22-11-2003
Nyt design på hele siden</font></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<!-- Vote frame -->
</tr>
</table>
</div>
</td>
<!-- Nyheder -->
<td valign="top" width="481">
<div align="center">
<center>
<table border="0" cellpadding="0" width="480">
<tr>
<td height="48" width="496">
<div align="center">
<table border="0" style="filter: alpha(opacity=100)" width="94%" bgcolor="#000000" cellspacing="1" cellpadding="0" height="445">
<tr>
<td width="100%" bgcolor="#999966" height="15">
<p align="center"><img border="0" src="main.jpg" width="150" height="18"></p>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#BBBB88" valign="middle" align="center">
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="left">
<IFRAME id=news name=main marginWidth=0 marginHeight=0 src="show.htm" frameBorder=0 width=460 height=425>
<!--
<ilayer name="main" id="name" width="470" height="440" frameborder=0 marginheight=0 marginwidth=0 src="news.php">
</ilayer>
-->
</IFRAME>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</center>
</div>
</td>
<td width="173" valign="top">
<div align="left">
<table border="0" width="141" cellspacing="1">
<tr>
<td width="133">
<div align="left">
<table border="0" style="filter: alpha(opacity=100)" width="150" cellspacing="1" cellpadding="0" bgcolor="#000000">
<tr><td width="100%" bgcolor="#999966" height="15">
<p align="center"><img border="0" src="tage.jpg" width="150" height="18"></p>
</td></tr>
<tr><td width="100%" bgcolor="#FFFFFF">
<iframe src=shout/shout.asp width="150" height="200" id="poruke"></iframe>
<table border="0" width="100%" cellspacing="1" cellpadding="0">
<tr><td width="100%">
</td>
</tr>
<tr><td width="100%">
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<!-- Vote frame -->
</tr>
<tr>
<td width="146" height="15">
</td>
</tr>
<tr>
<td width="146">
<div align="right">
<table border="0" style="filter:alpha(opacity=100)" width="152" bgcolor="#000000" cellspacing="1" cellpadding="0">
<tr>
<td width="100%" bgcolor="#FFFFFF" height="105">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="98%">
<tr>
<td>
<iframe src=shout/shoutbox.asp width="100%" height="120"></iframe>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<script type="text/javascript">function maxlength(largefield) {if (largefield.value.length>100) {largefield.value = largefield.value.substring(0,100);}}</script>
<script language="JavaScript">
function co(element,mode) {
if (mode=="in") {
cursortype = 'hand'
colorval = '#bbbb88'
} else if (mode=="out") {
cursortype = ''
colorval = '#ffffff'
}
element.style.background=colorval;
element.style.cursor=cursortype;
}
</script>
</body></html>
</script>