<%
%>
<%=ZiyaretciDefteriv3%> | <%=yazMesajYaz%>
<%=ZiyaretciDefteriv3%>
<% git = Request("git")
if git="mesajyaz" or git="" then
call mesajyaz
elseif git="mesajisle" then
call mesajisle
elseif git="tamam" then
call tamam
end if%>
<%sub mesajyaz%>
<%end sub%>
<% sub mesajisle %>
<%
'---Yazılan veriler database ekleniyor------------------------------------------------------------------------------
mesajlar.addnew
mesajlar("adsoyad")=adsoyad
mesajlar("email")=email
mesajlar("url")=url
mesajlar("icq")=icq
mesajlar("baslik")=baslik
mesajlar("renkbaslik")=renkbaslik
mesajlar("mesaj")=mesaj
mesajlar("renkmesaj")=renkmesaj
mesajlar("icon")=icon
mesajlar("tarih")=tarih
mesajlar("ip")=ip
mesajlar("admine")=admine
mesajlar("onay")=onay
mesajlar.update
%>
<%
'-------------------------------------------------------------------------------------------------------------------
end if
end sub%>
<%sub tamam%>
<%
if Request.Form("admine")="evet" then
Response.Write ""&yazAdmineGonderildi&""
elseif ayar("onayla")="acik" then
Response.Write ""&yazOnaylanacak&""
elseif ayar("onayla")="kapali" then
Response.Write yazMesajinizKaydedilmistirTesekkurler
end if
%>