arkadaşlar bir önceki mesajımdada olduğu gibi ziyaret defteri yapmak için kitaptaki örneği uygulamak istedim ama bu kitap(çok sinirliyim şu an kitabın yazarına) izin verme olayını sadece söyleyerek geçiştirmiş..
ziyaretci_defteri3.asp;
Kod: Tümünü seç
<html>
<head>
<meta http-equiv="Content-Language" content="tr">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<title>New Page 1</title>
</head>
<% @ language=vbscript codepage=1254 %>
<!--#include virtual="/kitap2/sayfatop.htm"-->
<%
oneri=server.htmlencode(request.form("oneri"))
ad=server.htmlencode(request.form("ad"))
soyad=server.htmlencode(request.form("soyad"))
tarih=date()
%>
<body topmargin="0" marginwidth="0">
<p style="margin-top: 0; margin-bottom: 0">lütfen sayfamız hakkında
değerlendirme ve önerilerinizi belirtiniz:<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" U-File="../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" -->
<p style="margin-top: 0; margin-bottom: 0"> Adınız :
<input type="text" name="ad" size="12">
</p>
</form>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" U-File="../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" -->
<p style="margin-top: 0; margin-bottom: 0">Soyadınız :
<input type="text" name="soyad" size="12"></p>
</form>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" U-File="../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" -->
<p style="margin-top: 0; margin-bottom: 0">Önerileriniz :
<input type="text" name="oneri" size="50"></p>
</form>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" U-File="../_private/form_results.csv" S-Format="TEXT/CSV" S-Label-Fields="TRUE" -->
<p style="margin-top: 0; margin-bottom: 0">
<input type="submit" value="GÖNDER" name="submit1" id="submit1"></p>
</form>
<%
set dn=server.createobject("scripting.filesystemobject")
set setdn=dn.opentextfile(server.mappath("ziyaretci_oneri.txt"),8)
if oneri="" then
response.write"lütfen isminizi giriniz"
else
if ad="" then
response.write"adınızı giriniz"
else
if soyad="" then
response.write"soyadınızı giriniz"
else
setdn.writeline ""&ad&" "&soyad&" <br>"
setdn.writeline ""&tarih&" <br>"
setdn.writeline oneri
setdn.writeline"<br><hr>"
response.redirect"oneri.asp"
response.write"teşekkür ederiz"
setdn.close
set setdn=nothing
set dn=nothing
end if
end if
end if
%>
<p>
<font color=orangered size=4><strong>
daha önceki görüş ve öneriler</strong>
</font>
</p>
<!--#include virtual="/kitap2/ziyaretci_oneri.txt"-->
</body>
</html>
Kod: Tümünü seç
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<title>New Page 1</title>
</head>
<% @ language=vbscript codepage=1254 %>
<!--#include virtual="/kitap2/sayfatop.htm"-->
<body>
<%
response.write"önerileriniz kayıtlarımıza geçmiştir <br>"
response.write"teşekkür ederiz <br>"
%>
<a href="ziyaretci_defteri3.asp">
öneri sayfasına geri dön</a>
</body>
</html>
Kod: Tümünü seç
Sayfa görüntülenemiyor
Erişmeye çalıştığınız sayfayla ilgili bir sorun olduğundan sayfa görüntülenemiyor.
--------------------------------------------------------------------------------
Lütfen aşağıdakileri deneyin:
Yenile düğmesini tıklatın ya da daha sonra yeniden deneyin.
cihanozturk anasayfasını açın ve istediğiniz bilgilere ilişkin bağlantıları arayın.
HTTP 500.100 - İç Sunucu Hatası - ASP hatası
Internet Information Services
--------------------------------------------------------------------------------
Teknik Bilgiler (destek personeli için)
Hata Tipi:
Microsoft VBScript çalışma hatası (0x800A0046)
İzin verilmedi
/kitap2/ziyaretci_defteri3.asp, line 45
Tarayıcı Tipi:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727)
Sayfa:
GET /kitap2/ziyaretci_defteri3.asp
set setdn=dn.opentextfile(server.mappath("ziyaretci_oneri.txt"), 8 )
adres olarak: http://cihanozturk/kitap2/ziyaretci_defteri3.asp yazıyorum üstteki hata yazıları çıkıyor..
arkadaşlar yardımlarınızı ve fikirlerinizi bekliyorum asp yi öğrenmek istiyorum ve yardımlarınızı bekliyorum.. Allaha emanet olun..