Arama butonu
Bu konudaki kullanıcılar: 1 misafir
18
Cevap
11700
Tıklama
0
Öne Çıkarma
html siteye form ekleme?
E
21 yıl
Teğmen
Konu Sahibi

selam arkadaşlar,

frontpage ile yaptığım siteye mail formu ilave etmek istiyorum front page in kendi formu çalışmıyor.nasıl ilave edebilirim.kodlarını verebilirmisiniz?

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil



M
21 yıl
Yarbay

formmail.cgi dosyasının içeriği



#!/usr/local/bin/perl
# üstteki ilk satır perl in konumudur.
# gerekiyorsa serverinize göre değiştirin.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# FormMail
# coded by Mesut Akcan © Ekim 1999
#http://makcan.cjb.net
# Güncelleme 13/9/2000
# Yukardaki satırları değiştirmeyiniz.
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
$kime = 'info@hostinghizmeti.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ĞİŞTİRİN!!!
$sureekle = 0; # 0 yazılırsa server saatine 0 saat eklenir

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# BUNDAN SONRASINI DEĞİŞTİ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 doğru olarak $msj2");
}
print "Content-type:text/html\n\n";
open (MAIL, "|$mailprog") or &bitti("$mailprog isimli programa ulaşı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 değerler:\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>İşlem Tamam</h2>
<p>Formumuzu doldurduğunuz için teşekkür ederiz.<br>
Form gerekli kişiye postalanmıştı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 data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=909636&url=http://www.hostinghizmeti.com" data-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","Çrş","Prş","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";
}


Bu mesaja 1 cevap geldi.
T
13 yıl
Çavuş

arkadaşlar bende web sitemize küçük bir forum eklemek istiyorum iki başlıklı bir forum aslında canlı destek tarzında üye girip sorusunu soracak altına cevap yazılacak vs. gibi birşey,örneğin web sayfamwww.patipet.net sol sütunda aşağıya dosru eğitmenimize sorun diye bir resim var tıkanınca o sayfada açılacak küçük bir forum olabilir.birde oraya bir soru yazıldığında msn e düşmasi gibi bir durum varmıdır acaba birinden duydum :/


Bu mesaja 1 cevap geldi.
M
13 yıl
Binbaşı

quote:

Orijinalden alıntı: TylerDurden®

arkadaşlar bende web sitemize küçük bir forum eklemek istiyorum iki başlıklı bir forum aslında canlı destek tarzında üye girip sorusunu soracak altına cevap yazılacak vs. gibi birşey,örneğin web sayfamwww.patipet.net sol sütunda aşağıya dosru eğitmenimize sorun diye bir resim var tıkanınca o sayfada açılacak küçük bir forum olabilir.birde oraya bir soru yazıldığında msn e düşmasi gibi bir durum varmıdır acaba birinden duydum :/


2006 konusunu bunun ıcın mı hortlattın


Bu mesaja 1 cevap geldi.
C
11 yıl
Yüzbaşı

quote:

Orijinalden alıntı: mrt__gl

quote:

Orijinalden alıntı: TylerDurden®

arkadaşlar bende web sitemize küçük bir forum eklemek istiyorum iki başlıklı bir forum aslında canlı destek tarzında üye girip sorusunu soracak altına cevap yazılacak vs. gibi birşey,örneğin web sayfamwww.patipet.net sol sütunda aşağıya dosru eğitmenimize sorun diye bir resim var tıkanınca o sayfada açılacak küçük bir forum olabilir.birde oraya bir soru yazıldığında msn e düşmasi gibi bir durum varmıdır acaba birinden duydum :/


2006 konusunu bunun ıcın mı hortlattın

2006 mı 2004 dostum



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.