<!--#include file="connoklin.asp" -->
<!--#include file="inc/CHAR.asp"-->
<%Dim rs,strsql,strname,strtel,strmail,straddr,strcontent
strname = request("name")
strtel = Request("tel")
strmail = Request("email")
straddr = Request("addr")
strcontent = HTMLEncode(Request("content"))

set rs=server.CreateObject("adodb.recordset")
strsql="SELECT * FROM guestbook"
rs.open strsql,conn,3,3
rs.addnew
rs("g_name")=strname
rs("g_tel")=strtel
rs("g_email")=strmail
rs("g_addr")=straddr
rs("g_content")=strcontent
rs.update
rs.close
set rs=nothing
response.write"<script>alert('ΑτΡΤ³ΙΉ¦£‘');</script>"
response.write"<script>location.href='contact.asp';</script>"
%>
