View file parkerforum2/reg.php

File size: 4.63Kb
<?
$form = "
<form name=\"form1\" method=\"post\" action=\"reg.php\">
<input type=\"hidden\" name=\"seenform\" value=\"y\">
<table width=\"36%\" border=\"0\">
<tr>
<td width=\"21%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">Ник/Логин*:</font></td>
<td width=\"79%\"> <font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">
<input type=\"text\" name=\"name\">
</font></td>
</tr>
<tr>
<td width=\"21%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">Сайт:</font></td>
<td width=\"79%\"> <font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">
<input type=\"text\" name=\"site\">
</font></td>
</tr>
<tr>
<td width=\"21%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">E-mail:*</font></td>
<td width=\"79%\"> <font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">
<input type=\"text\" name=\"mail\">
</font></td>
</tr>
<tr>
<td width=\"21%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">ICQ:</font></td>
<td width=\"79%\"> <font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">
<input type=\"text\" name=\"icq\">
</font></td>
</tr>
<tr>
<td width=\"21%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\"></font></td>
<td width=\"79%\"><font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"2\">
<input type=\"submit\" name=\"Submit\" value=\"Войти!\">
</font></td>
</tr>
</table>";

if (seenform != "y")
print "$form";

if ($name == "" or $mail == "")
{
print "<BR><div align=\"center\"><font size=2>Заполните все поля, помеченные звёздочкой (*)!</font></div><BR>";
$er = 1;
}

if (strlen($name) > 40 and $name != "")
{
print "<BR><div align=\"center\"><font size=2>Имя не должно превышать 40 символов!</font></div><BR>";
$er = 1;
}

if (!eregi("^([_A-Za-z0-9А])", $name) and $name != "")
{
print "<BR><div align=\"center\"><font size=2>Имя должно состоять из латинский букв или цифр!</font></div><BR>";
$er = 1;
}

if (strlen($mail) > 40 and $mail != "")
{
print "<BR><div align=\"center\"><font size=2>E-mail не должен превышать 40 символов!</font></div><BR>";
$er = 1;
}

if (!eregi("^([0-9a-z]([-_.]?[0-9a-z])*@[0-9a-z]([-.]?[0-9a-z])*\\.[a-wyz][a-z](fo|g|l|m|mes|o|op|pa|ro|seum|t|u|v|z)?)$", $mail) and $mail != "")
{
print "<BR><div align=\"center\"><font size=2>Вы ввели некорректный E-mail адрес!</font></div><BR>";
$er = 1;
}

if (strlen($site) > 40 and $site != "")
{
print "<BR><div align=\"center\"><font size=2>Адрес сайта не должен превышать $maxforurl символов!</font></div><BR>";
$er = 1;
}

if (!eregi("^((http://)?)+((www)?)+(([a-z0-9_.-]+)?)[a-z0-9]+\.+[a-z]{2,4}$",$site) and $site!="")
{
print "<BR><div align=\"center\"><font size=2>Вы ввели некорректный адрес сайта!</font></div><BR>";
$er = 1;
}

if (!eregi("^([0-9])", $icq) and $icq != "")
{
print "<font face=\"Verdana, Arial, Helvetica, sans-serif\" size=\"1\">ICQ-номер должен состоять из цифр!</font><br>";
$er = 1;
}

if (strlen($icq) > 10 and $icq != "")
{
print "<BR><div align=\"center\"><font size=2>ICQ-номер не должен превышать 10 цифр!</font></div><BR>";
$er = 1;
}

if ($seenform=='y' and $er=="")
{
srand((double)microtime()*1000000);
$id=uniqid(rand());
$pass=substr($id,5,9);
$flag=substr($id,11,15);

$name = stripslashes($name);
$name = ereg_replace("<","&lt;",$name);
$name = ereg_replace(">","&gt;",$name);
$name = ereg_replace("::","&#58;&#58;",$name);
$name = ereg_replace("::::","&#58;&#58;&#58;&#58;",$name);
$name = ereg_replace("::::::","&#58;&#58;&#58;&#58;&#58;&#58;",$name);

$site = stripslashes($site);
$site = ereg_replace("::","&#58;&#58;",$site);
$site = ereg_replace("::::","&#58;&#58;&#58;&#58;",$site);
$site = eregi_replace("http://","",$site);
$site = eregi_replace("http:","",$site);
$site = eregi_replace("http","",$site);

$mail = eregi_replace("mailto:","",$mail);
$mail = eregi_replace("mailto","",$mail);

$fp = @fopen("users/$name.dat","a");
$info = "$name::$mail::$icq::$site::$pass::$flag::user::0";
fputs($fp,$info);
fclose($fp);

$subject="Регистрация прошла успешно!";
$from="Письмо от ParkerLab.\r\n";
$msg="Спасибо за регистрацию в нашем маленьком клубе БредPHP.\r\n Ваш логин: $name\r\nВаш пароль:$pass\r\n\r\nВойти в клуб Вы можете с главной страницы http://khoroshun.com, либо с http://bred.khoroshun.com/login.php!";
$message="$from $msg";
$headers="From: [email protected]";
//@mail($mail,$subject,$message,$headers)or die("Системное сообщение: не могу отправить e-mail!");
print"<div align='center'>Регистрация завершена!<BR>---<BR>Ваш логин: <b>$name</b><BR>Ваш пароль: <b>$pass</b><BR><BR>Эти данные были отправлены Вам на e-mail.</div>";
}
?>