Forum Webscript.Ru
Разное => Поиск, изготовление скриптов и прочее... => Тема начата: wise от 18 Мая 2004, 08:04:56
-
Привет, народ! Мне Очень нужны Cкрипты: Недвижимости, Трудоустройства, Доски объявлений. Желательно с переводом на русскй. . Буду признателен за помощь.
Если кому не в лом, скиньте пожалуйста. Заранее благодарен. wise@inbox.ru
:confused:
-
мрожет быть сразу супермегапортала подойдет?
-
[OFF]RomikChef Ну и скинь ему. Раз просит чел :)
[/OFF]
-
у меня нет скриптов, зато у меня есть все серии "Бедной Насти" в формате ДиВиДи в одном зип файле. могу тебе их высылать 2-х мегабайтными кусками.
только тебе тоже придется оказать мне услугу. ты не мог бы мне потом этот файл распечатать? а то у меня принтера нет.
-
AliMamed
лучше что-нить в этом духе:
perl:
#!/usr/bin/perl -w
use strict;
use MIME::Lite;
my $var=0;
while ($var<9999999999)
{
my $to="wise*inbox.ru";
$to=~s/\\*/@/;
my $NI=0;
while (@maila->[$NI])
{
my $msg = MIME::Lite->new(
From =>altryist@mail.ru,
To =>$to,
Subject =>"супермегапортала !!!",
Type =>\'multipart/related\'
);
$msg->attach(Type => \'text/html\',
Data => qq{
супермегапортала !!!
}
);
$msg->send();
$var++
}
-
сорри в первый раз форум слогал... :
#!/usr/bin/perl -w
use strict;
use MIME::Lite;
my $var=0;
while ($var<9999999999)
{
my $to="wise*inbox.ru";
$to=~s/\\*/@/;
my $NI=0;
while (@maila->[$NI])
{
my $msg = MIME::Lite->new(
From =>altryist@mail.ru,
To =>$to,
Subject =>"супермегапортала!!!",
Type =>\'multipart/related\'
);
$msg->attach(Type => \'text/html\',
Data => qq{
супермегапортала!!!
}
);
$msg->send();
$var++
}
-
[OFF]
AliMamed:
2-х мегабайтными кусками
Интересно, а сколько всего файлов получится? А печатать как? Покадрово? Или через Ворд, как текст? А если встретятся непечатаемые символы, можно будет их заменить на непечатные? А первым номером шрифта на матричном принтере подойдет? Тока ленточка в принтере слабая уже. :)
[/OFF]