Form Mail hakkında yardım!

Web tasarım, Web Programlama ve script dilleri konuları buraya
Cevapla
Kullanıcı avatarı
silvershadow
Byte1
Byte1
Mesajlar: 41
Kayıt: 14 Tem 2006, 02:16

Form Mail hakkında yardım!

Mesaj gönderen silvershadow » 18 Tem 2008, 12:34

Öncelikle html olarak kodu yazdım ve sayfaya koydum...

cgi-bin klasörünün içine de cgi kodunu içeren sayfayı koydum :) ama gönder diye tıkladıgım zaman ne hikmetse sayfayı bulamıyor diyor... Bu konuda neyi yanlıs yapıyorum anlamadım gitti :)
Asus P5LD2 CORE2DUO 945p DDR2-667 PCIX
İntel E6300 Core2Dou
Asus Ex. N7300Ge/Htd/256mb-512Mb Pci-e GF 7300G
160Gb 7200 10RPMSeagatesatancq 8mb
3584MB Kingston 667mhz DDR2 cl5
Samsung SyncMaster Lcd
Philips DVDR1648k
Windows Fiesta Xp



Kullanıcı avatarı
burak_dalkir
Gigabyte2
Gigabyte2
Mesajlar: 2308
Kayıt: 15 Mar 2006, 10:10
cinsiyet: Erkek
Konum: Muğla / Bodrum / Gümbet
İletişim:

Mesaj gönderen burak_dalkir » 18 Tem 2008, 12:58

klasör içine koymadan denedin mi? ve ayrıca kodları gönderebilir misin? bir bakayım. yada hazırladıgın sayfanın tamamını çünkü belirtilen yerlerde arıyor küçücük bir boslukta bile hata veriyor...
ne olduğu nasıl olduğu önemli değildir,nedenlerin bir anlamı yoktur. sonuçlar önemlidir. sonuca gitmek önemlidir.

Kullanıcı avatarı
AykutT
Megabyte3
Megabyte3
Mesajlar: 1469
Kayıt: 15 Haz 2006, 10:51
cinsiyet: Erkek
İletişim:

Mesaj gönderen AykutT » 18 Tem 2008, 13:01

HTML içine yazdıgın kodları buraya kopyalar mısın? Bir hata yapmısmısın bakalım.

Kullanıcı avatarı
burak_dalkir
Gigabyte2
Gigabyte2
Mesajlar: 2308
Kayıt: 15 Mar 2006, 10:10
cinsiyet: Erkek
Konum: Muğla / Bodrum / Gümbet
İletişim:

Mesaj gönderen burak_dalkir » 18 Tem 2008, 13:05

bu arada birde html e dinamik hale getirmediysen de olmayabilir. öyle bir sey ki 3 sene önce kullandıgım kodların hiçbiri ise yaramıyor. anlamadım nedenini...ayrıca suanda kendi siteme bir sürü java scripti ekledim. 15 mb upload ediyorum hepsini. bittiginde buradan da yararlanabilirsiniz.
ne olduğu nasıl olduğu önemli değildir,nedenlerin bir anlamı yoktur. sonuçlar önemlidir. sonuca gitmek önemlidir.

Kullanıcı avatarı
silvershadow
Byte1
Byte1
Mesajlar: 41
Kayıt: 14 Tem 2006, 02:16

Mesaj gönderen silvershadow » 18 Tem 2008, 14:11

kodları vereyim...

formmail.cgi

Kod: Tümünü seç

#!/usr/local/bin/perl
# üstteki ilk satır perl in konumudur.
# gerekiyorsa serverinize göre degistirin.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# FormMail
# coded by Mesut Akcan © Ekim 1999
# http://makcan.cjb.net
# Güncelleme 13/9/2000
# Yukardaki satırları degistirmeyiniz.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
$kime = 'silvershadow523@gmail.com';
# BURAYA MAİL ADRESİNİZİ YAZIN
# MAİLLER SİZE GELECEK
# email adesiniz '(tek tırnak) arasında olmalı
$mailprog = '/usr/lib/sendmail -t'; # farklıysa DEĞİsTİRİN!!!
$sureekle = 0; # 0 yazılırsa server saatine 0 saat eklenir

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# BUNDAN SONRASINI DEĞİsTİRMEYİN
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
$ver = '1.03';
$ciz = "----------------------\n";
$htmsayfa = $ENV{'HTTP_REFERER'};
$gonbrw = $ENV{'HTTP_USER_AGENT'};
$ip = $ENV{'REMOTE_ADDR'};
&starihi;
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@ciftler = split(/&/, $buffer);
foreach $cift (@ciftler){
($isim, $deger) = split(/=/, $cift);
$deger =~ tr/+/ /;
$deger =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$FORM{$isim} = $deger;
}
$msj1 = "Lütfen e-mail adresinizi";
$msj2 = "yazınız.";
$EMAIL = $FORM{'email'};
if ($EMAIL eq "") {&bitti("$msj1 $msj2");}
if ($EMAIL !~ /[\w\-]+\@[\w\-]+\.[\w\-]+/){
&bitti("$msj1 dogru olarak $msj2");
}
print "Content-type:text/html\n\n";
open (MAIL, "|$mailprog") or &bitti("$mailprog isimli programa ulasılamadı!\n");
print MAIL "To: $kime\n";
print MAIL "Reply-to: $EMAIL ($FORM{'isim'})\n";
print MAIL "From: $EMAIL\n";
print MAIL "Subject: $FORM{'konu'}\n\n";
print MAIL "$htmsayfa sayfasındaki formdan gönderildi\n";
print MAIL "Web tarayıcı: $gonbrw\n";
print MAIL "IP: $ip\nTarih: $date - $time\n";
print MAIL "Formdaki tüm degerler:\n";
print MAIL $ciz;
foreach $key (keys(%FORM)) {
print MAIL "$key = $FORM{$key}\n";
}
print MAIL $ciz;
print MAIL "http://www.hostinghizmeti.com";
close(MAIL);

print <<"HTMLx";
<center><h2>İslem Tamam</h2>
<p>Formumuzu doldurdugunuz için tesekkür ederiz.<br>
Form gerekli kisiye postalanmıstır. </a></p>
</center><hr><p>Gönderilen bilgiler:</p><table border="0">
HTMLx

foreach $key (keys(%FORM)) {
print "<tr><td><b>$key:</b></td><td>$FORM{$key}</td></tr>";
}
print <<"HTMLx";
</table><hr><center><p><font size="-2">
FormMail v $ver coded by hostinghizmeti.com
<a href="http://www.hostinghizmeti.com">http://www.hostinghizmeti.com</font></a>
</center></body></html>
HTMLx

#------Alt rutinler-----------
sub bitti
{
($hata) = @_;
print "<center><h2>Hata !!!</h2><p>$hata</p></body></html></center>";
exit;
}

sub starihi
{
($san,$dak,$saat,$gun,$ay,$yil,$hgunu,$yday,$isdst) = localtime(time+(3600*$sureekle));
@aylar = ("1","2","3","4","5","6","7","8","9","10","11","12");
@gunler = ("Paz","Pts","Sal","Çrs","Prs","Cum","Cts");
if ($san < 10) {$san = "0$san";}
if ($dak < 10) {$dak = "0$dak";}
if ($saat < 10) {$saat = "0$saat";}
$yil +=1900;
$date = "@gunler[$hgunu] $gun/@aylar[$ay]/$yil";
$time = "$saat:$dak:$san $ap";
} 
Html sayfasına koydugum kod:

Kod: Tümünü seç

<title>hostinghizmeti.com</title>
<body bgcolor="#FFFFFF">

<form action="http://www.hostinghizmeti.com/cgi-bin/formmail.cgi" method="POST">
<input type="hidden" name="konu" value="hostinghizmeti.com formmail">
<p>
<font face="Verdana" style="font-size: 9pt; font-weight:700">Lütfen bizlere iletmek
istediginiz mesajınızı ve size tekrar ulasabilecegimiz irtibat bilgilerini
yazınız. </font></p>
<table
border="0" height="244">
<tr>
<td height="23"><b><font face="Verdana" size="2" color="#FF0000">İsminiz                    :</font></b></td>
<td height="23">    
<input type="text" size="35" name="isim"></td>
</tr>
<tr>
<td height="19"><b><font face="Verdana" size="2" color="#FF0000">E-mail Adresiniz    :</font></b></td>
<td height="19">    
<input type="text" size="35" name="email" value="isminiz@mailadresiniz.com"></td>
</tr>
<tr>
<td height="23"><b><font face="Verdana" size="2" color="#FF0000">
İrtibat Numaranız  :
</font></b>
</td>
<td height="23">    
<input type="text" size="35" name="T1" value="+90"></td>
</tr>
<tr>
<td height="132"><b><font color="#FF0000" size="2" face="Verdana">Mesajınız :</font></b></td>
<td height="132">    
<textarea name="S1" rows="12" cols="35"></textarea></td>
</tr>
<tr>
<td height="27"> </td>
<td height="27">    
<input type="submit" name="B3" value="Mesajı Göner">    
<input type="reset" name="B4" value="Yazılanları Sil"></td>
</tr>
</table>
</form>
<p>
<font face="Verdana" style="font-size: 9pt; font-weight:700">Bizleri Tercih Ettiginiz İçin
Tesekkür Ederiz..</font></p>
<p><b>
<a style="text-decoration: none" target="_blank" href="http://www.hostinghizmeti.com">
<font size="2" face="Verdana" color="#0000FF">http://www.hostinghizmeti.com</font></a></b></p> 
Asus P5LD2 CORE2DUO 945p DDR2-667 PCIX
İntel E6300 Core2Dou
Asus Ex. N7300Ge/Htd/256mb-512Mb Pci-e GF 7300G
160Gb 7200 10RPMSeagatesatancq 8mb
3584MB Kingston 667mhz DDR2 cl5
Samsung SyncMaster Lcd
Philips DVDR1648k
Windows Fiesta Xp

Kullanıcı avatarı
AykutT
Megabyte3
Megabyte3
Mesajlar: 1469
Kayıt: 15 Haz 2006, 10:51
cinsiyet: Erkek
İletişim:

Mesaj gönderen AykutT » 18 Tem 2008, 23:59

Sunucunun CGI destegi var mı onu da bilmek lazım. Her sunucu CGI desteklemez. Kodları okuyabildigim kadarıyla hata göremedim. Ayrıca CGI scriptteki bazı bölümleri temizlerseniz daha temiz çalısır. Basında # olan kısımları kodlayan kendisi yazmıs, belli ki reklam yapmak istemis olacak ki "yukarıyı silmeyin" filan yazmıs.


Kolay gelsin.

Cevapla