здрасти всем!!!
<---------мне нужен Скрипт для Контактформуляра в PHP или CGI, где можно скачать его с инета и переделать для моей страницы?? в google.de ничего пут╦вого не нашел.
спасиба саранее!

Формы бывают разные,
поэтому наверно такую какая бы отвечала твоим условиям и не найдешь.
ищи гостевую книгу, а их много, и переделай.
******

К примеру здесь:
http://wp1003203.wp006.webpack.hosteurope.de/homepage/scripte/scripte/kontaktscr...
IT-Service Wittmann
www.its-wittmann.de
info@its-wittmann.de

наш╦л один скрипт в PERL ну я здеса ничего не понимаю.
Вот "resdme.txt - Datei"
Mailer
------
Installation
------------
- Öffnen der mailer.pl und setzen der Variablen, siehe Kommentare
- Hochladen (im ASCII-Mode)
- chmod 755 mailer.pl
- Formulare schreiben, siehe unten
Formulare
---------
Form-Tag:
<form action="/cgi-bin/mailer.pl" method="post">
sonstige Felder:
<input name="Feldname">
spezielle Feldnamen (ohne ""):
- alle Feldnamen, die mit "." (Punkt) beginnen, werden nicht übermittelt
- "von" - Absender-E-Mail
- "betreff" - Betreff-Zeile
- ".id" - Wird vor die Betreffzeile gesetzt
- ".titel" - Titel der Bestätigungs / Fehleranzeige
- "an" - Kurzname des Empfängers
- ".fehler" - Fehler-URL, wird bei Fehler statt der internen Seite angezeigt
- ".ok" - Ok-URL, wird als Bestätigung angezeigt
- ".nichtleer" - Liste der Feldnamen, die nicht leer sein dürfen
- Die Feldnamen mit "," (Komma) trennen und keine Leerzeichen dazwischen verwenden !
- Beispiel: <input type="hidden" name=".nichtleer" value="name,betreff,text">
- ".email" - Liste der Feldnamen, die eine E-Mail Adresse enthalten müssen, s.o.
- ".url" - Liste der Feldnamen, die eine URL enthalten müssen, s.o.
A вот и сам Скрипт(mailer.pl):
#!/usr/bin/perl
use CGI ':standard';
my %to=(,0);
my $fehler_url="";
my $ok_url="";
# Konfiguration
# Bei allen E-Mail Adressen ein \ vor @ !
# Pfad zu sendmail
my $mailprg = "/usr/sbin/sendmail";
# Absendermail
my $from = "absender\@domain.de";
# Empfängeradressen, können beliebig erweitert werden
# Einfach die Zeile Kopieren, für "ich" einen anderen
# Kurznamen eintragen und dahinter die E-Mail Adresse
# schreiben
# Die 'def' muss bleiben, die wird genommen, wenn keine
# andere passt.
# Im Formular ist dann das, was vorn steht (z.B: ich) im
# an-Feld einzutragen, nicht die E-Mail Adresse
$to{'def'} = "ziel1\@doamin.de";
$to{'ich'} = "ziel2\@domain.de";
# Betreffzeile
my $subject = "Formularantwort";
# Überschrift falls interne Bestätigung
my $title = "Formularübermittlung";
# Fehlerseite, das # am Anfang entfernen und URL eintragen, wenn sie
# verwendet werden soll, sonst interne Seite
#$fehler_url = "http://.../fehler.html";
# Bestätigungsseite, das # am Anfang entfernen und URL eintragen, wenn sie
# verwendet werden soll. Wenn kein Eintrag, wird eine interne Seite ausgegeben.
#$ok_url= "http://.../ok.shtml";
# Für interne Seite: Farben / Hintergrund
#Textfarbe
my $textcolor = "black";
#Hintergrundfarbe
my $bgcolor = "white";
# URL Hintergrundbild
my $background = "";
##################################################################################
# Ab hier nichts mehr ändern !
$from = param('von')?param('von'):$from;
$subject = param('betreff')?param('betreff'):$subject;
$subject =param('.id').":".$subject if (param('.id'),0);
$title = param('.titel')?param('.titel'):$title;
my $to1 = $to{param('an')};
$to1 = $to{'def'} if (!$to1,0);
$fehler_url = param('.fehler')?param('.fehler'):$fehler_url;
$ok_url = param('.ok')?param('.ok'):$ok_url;
my $fehler="";
my $ok = 1;
if (param('.nichtleer')) {
my @nl = split(/,/, param('.nichtleer'),0);
foreach(@nl) {
if (param($_) eq '') {
$ok = 0;
$fehler.= "Feld $_ muß ausgefüllt werden !
";
};};
};
if (param('.email')) {
my @nl = split(/,/, param('.email'),0);
foreach(@nl) {
if (param($_) !~ /^[^@]{2,}@[^@]{3,}\.[a-zA-Z]{2,4}$/) {
$ok = 0;
$fehler.= "Feld $_ enthält keine gültige E-Mail Adresse !
";
};};
};

if (param('.url')) {
my @nl = split(/,/, param('.url'),0);
foreach(@nl) {
if (param($_) !~ /^http:\/\/.{3,}\.[a-zA-Z]{2,4}\/?.*$/) {
$ok = 0;
$fehler.= "Feld $_ enthält keine gültige URL (muß mit http:// beginnen) !
";
};};
};
my @p = param(,0);
if (!$ok) {
if ($fehler_url) { print redirect($fehler_url,0); } else {
print header, start_html(-title=>$title, -background=>$background, -text=>$textcolor, -bgcolor=>$bgcolor), h1($title), h2('Fehler beim Senden des Formulars !'), "<p>$fehler</p><p>Bitte benutze den <b>Zurück</b>-Button des Browsers, um zurück zum Formular zu gelangen !", end_html; };
} else {
if ($ok_url) { print redirect($ok_url,0); } else {
print header, start_html(-title=>$title, -background=>$background, -text=>$textcolor, -bgcolor=>$bgcolor), h1($title), h2('Die Daten wurden übermittelt.',0);
foreach(sort @p) {
next if (substr($_,0,1) eq ".",0);
my $x = param($_,0);
$x =~ s/<[^>]*>//g;
$x =~ tr/<>//d;
print "<p><b>$_:</b>
$x</p>";
};
print end_html;
};

#Mail senden
open(MAIL, "|$mailprg -t") or die $!;
print MAIL "To: $to1\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n\n";
print MAIL "Formulareintrag vom ", scalar localtime(time), ":\n\n";
foreach(sort @p) {
next if (substr($_,0,1) eq ".",0);
print MAIL "\n$_:\n", param($_), "\n";
};
close MAIL or die $!;
};

Подскажите пожалуйста что здеся надо поменат и как етот CHMOD на 755 посадить?

>>>Подскажите пожалуйста что здеся надо поменат и как етот CHMOD на 755 посадить?
ищи в твоем фтп клиенте, это то чем на сервер датаи заливаешь
Для Total Commander к примеру, смотри картинку
<<<<<<
******

<form action="/cgi-bin/mailer.pl" method="post">
вопрос появился: ето теперь надо Орднер с cgi-bin создать и туда mailer.pl заталкать?
<input name="Feldname"> а ето зачем??? что с Feldname надо делать? на какой Pfad поменять?
Зарания благадарю!

Лучше сделай отдельную папочку для всего, что связано с мылом - чуть больше повозишься, зато потом будет меньше гемороя...
<--- nobody harmed in this action -->

создал я папку называется cgi-bin туда заталкал етото перл скрипт mailer.pl. В Kontakt.htm поставил ето-> <form action="/cgi-bin/mailer.pl" method="post">. Ну он нихочет отсылать , Вот что показывает при нажатии на Аbsenden:
error 403: Forbidden!
Verboten!
Es sind nur ungenügende Zugriffsrechte gesetzt. Bitte ändern Sie die Rechte mit Ihrem FTP-Programm.

я ето все на CHMOD 755 поставил.
Что я неправилно делаю???

Смотри администрирование сервера. На ту папку, которую ты создал, нужно дать права на чтение и выполнение. Ну и интерпритатор Перла должен быть доступен.
Чтобы понять что именно ты делаешь не правильно, надо знать, и в деталях, как сконфигурена та система, на которой это все крутится. А разбираться с деталями - долго... Так что попинай хостера - попроси наладить хоть одну страницу с Перлом или ПХП... дальше проще станет.
<--- nobody harmed in this action -->

".....ту папку, которую ты создал, нужно дать права на чтение и выполнение. Ну и интерпритатор Перла должен быть доступен..."
а как ето зделать я в етом ничего непонимаю. Я етот Орднер(cgi-bin) тоже на 755 посадил где перл скрипт лежит. В Хостинг свой званил и емаил тоже писал ничего до сих пор не сделали.

а как ето зделать я в етом ничего непонимаю.
------
Представь себе - я тоже.
Т.е. что надо сделать я знаю и тебе написал, а вот как это должно прикручиваться к системе твоего хостера - не представляю. Так что тебе его мучить, пока не сжаляться и не наладят все как тебе надо.
Хотя - если тебе для учебы - можешь настроить все у себя на компе, отладить работу сайта и потом мучать хостера, ссылаясь на то, что у тебя все живое...
Я етот Орднер(cgi-bin) тоже на 755 посадил где перл скрипт лежит.
------
Его, ПЕРЛ-процессор, еще надо к WEB-серверу подстегивать... мучай хостера - без него это не пойдет. По крайней мере на своем хостинге я бы такое юзерам делать самостоятельно ни за что не разрешил...
<--- nobody harmed in this action -->

пуйня какая то получается .
сегодня позванил туда(1und1.de) сказали что Perl и PHP мой Пакет не принемают надо другой брать за 12,99EUR ну там и 500МБ Webspace а за чем мне столко????? а я сейчас плачу 2,99 EUR. Мож кто из вас знает другова Providera которий гдето до 20МБ за примерно 5,00EUR предлагает????

Для разработки - поставь все у себя и не майся...
Ну и попутно - ищи хостера... я вот тоже ищу... но обязательно - мелкомягкого, чтобы давал SQL-сервер и .NET-RTE ...
<--- nobody harmed in this action -->

> и .NET-RTE
Извращенство.
---
Идиотов и фриков перевоспитать невозможно!

Угу... Но писать SOAP-сервер под Луня с Апачем мне некогда...
<--- nobody harmed in this action -->

http://www.funpic.de вообще бесплатно
Одна голова - хорошо, а в тюбетейке лучше!
http://www.urasbajew.de

не "Funpics" ето не сeрь╦зно, мне для фирмы надо Wеbspace поетому бесплатные и дорогие > 10EUR я нeхочу. Ну вс╦ равно спасиба за предложения.

если в немецкой зоне, то зайди на www.kontent.de
Никогда не говори никогда