Forum Webscript.Ru

Разное => Поиск, изготовление скриптов и прочее... => Тема начата: cosmotron от 13 Августа 2002, 20:19:53

Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: cosmotron от 13 Августа 2002, 20:19:53
Нужно поставить на сайт скрипт, который будет проверять на существование домен(как у хостеров и регистраторов) и отправлять мне на мыло данные из полей на странице, которые ввёл юзер.
Сразу скажу, что в этом я совсем не разбераюсь, но хорощо заплачу.
mail@levik.org
icq:160942771
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: glebushka от 14 Августа 2002, 21:30:56
А воровство чужих доменов преследуется по закону...
cosmotron, зачем тебе это?
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: Unregistered от 14 Августа 2002, 21:45:16
Цитировать
А воровство чужих доменов преследуется по закону

glebushka, а при чем здесь воровство доменов? Почти у всех хостеров на сайтах стоит такая система.
cosmotron, еще утром отправил тебе e-mail. Проверь mailbox. Единственное, что не понял: под словом "установка" подразумевается и написание этого скрипта, либо только чистая установка?
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: GotZfild от 14 Августа 2002, 21:47:36
^ мое сообщение
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: alex007 от 14 Августа 2002, 22:47:59
Цитировать
А воровство чужих доменов преследуется по закону...

Это называется бизнес, и не кто не запрещает. Это тоже самое что статистика.
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: ESE от 14 Августа 2002, 23:37:11
тут LWP нужон
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: NeoNox от 15 Августа 2002, 01:39:08
ESE
Для чего? Для RIPN? А без LWP смогешь? :)
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: NeoNox от 15 Августа 2002, 01:40:41
glebushka
Цитировать
А воровство чужих доменов преследуется по закону...
Тут ты мимо грифа. Извини.
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: GotZfild от 15 Августа 2002, 10:09:09
Цитировать
тут LWP нужон

А на PHP не нужон :-)
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: Доктор от 15 Августа 2002, 15:10:18
GotZfild
А запость сюда код для этого дела. Сам я таких вещей не делал, а пригодиться может...
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: tolst от 14 Сентября 2002, 01:13:49
Да фигли мозги жмякать, если можно просто написать простенький скрипт на PHP каторый пересылает введённые переменные на мыло, а потом для приличия whois прикрутить...
Если эта каша именно то что вам нужно то я без проблем помогу...
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: ThE0ReTiC от 14 Сентября 2002, 01:56:18
glebushka
Это whois червис называется.
Скрипт пишется за 15 минут.


require("../common/parse.inc");
require("whois.vars.inc");

$information = \'\';

function whois_request($server,$query)
{
Global $information;
$data = "";
$fp = fsockopen($server , 43);
if ($fp) :
fputs($fp,$query."\\r\\n");
while(!feof($fp)) {
$data .= fgets($fp,4096).\'
\';
}
$information = $data;
fclose($fp);
return $data;
else:
return \'none\';
endif;
}

function domain_tld($domain)
{
$ret = "";
if (ereg("\\.([^\\.]+)$",$domain,$answer))
{
$ret = strtolower($answer[1]);
}
return $ret;
}

function is_domain_available($domain)
{
 global $whois_server;

$ret = false;

$tld = Domain_tld($domain);

if (!empty($tld) && is_array($whois_server[$tld]))
{
$data = whois_request($whois_server[$tld][0],$domain);
if(strstr($data,$whois_server[$tld][1]))
{
$ret = true;
}
}
return $ret;
}

function parse_info($info)
{
$data = \'\';
//$info = eregi_replace("\\n",\'\',$info);
//$info = eregi_replace("

",\'

\',$info);
$lines = split("
\\n
",$info);
for($step = 1;$step < sizeof($lines);$step++)
{
if(strstr(\'%\',$lines[$step])):
continue;
endif;
$data .= \'

\'.$lines[$step].\'

\';
}
return $data;
} // function



$full_name = $param["domainname"].\'.\'.$param["domainzone"];

echo($domain_state[is_domain_available($full_name)]);

if(is_domain_available($full_name))
{}
else
{

echo\'
\';
echo(parse_info($information));
}
?>

whois.vars.inc

$whois_server=array(
"aero"=>array("whois.information.aero","is available"),
"com"=>array("whois.networksolutions.com","no match for"),
"org"=> array("whois.networksolutions.com","no match for"),
//"coop" => array("whois.nic.coop","o match found"),
"net" => array("whois.networksolutions.com","no match for"),
//"info" => array("whois.nic.info","not in the "),
"biz" =>array("whois.whois.biz","Not found:"),
"ac" => array("whois.nic.ac","No match for"),
"ad" => array("whois.nic.ad","No match for"),
"us" => array("whois.networksolutions.com","no match for"),
"ws" => array("whois.networksolutions.com","no match for"),
"cc" => array("whois.networksolutions.com","no match for"),
"bz" =>array("whois.networksolutions.com","no match for"),
"tv" => array("whois.networksolutions.com","no match for"),
"ms" =>array("whois.networksolutions.com","no match for"),
"vg" => array("whois.networksolutions.com","no match for"),
"nu" => array("whois.networksolutions.com","no match for"),
"gs" =>array("whois.networksolutions.com","no match for"),
"tc" => array("whois.networksolutions.com","no match for"),
"ru" => array("whois.ripn.net","Not delegated"),
"us"=>array("whois.nic.us","Not found:")
);

switch($param[lang])
{
case \'ru\':
$domain_details = array("Domain"=>"Доменное имя",
\'type\'=>\'тип\'
);
$domain_state = array(1=>"Не делегирован",0=>"Делегирован");
break;
case \'de\':
break;

default:
$domain_state = array(1=>"Not delegated",0=>"Delegated");
break;
}
?>
Название: Заплачу хорошие деньги за установку скрипта на сайте!
Отправлено: glebushka от 16 Сентября 2002, 00:32:57
ThE0ReTiC, а я-то тут причём?:-)