if (Is_Error($Comp)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- $Form->AddChild($Comp); #------------------------------------------------------------------------------- $Comp = Comp_Load('Form/Input', array('name' => 'Domain', 'type' => 'hidden', 'value' => $Domain)); if (Is_Error($Comp)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- $Form->AddChild($Comp); #------------------------------------------------------------------------------- $Rows = array(); #------------------------------------------------------------------------------- $Parse = WhoIs_Parse($Domain); #------------------------------------------------------------------------------- switch (ValueOf($Parse)) { case 'error': return ERROR | @Trigger_Error(500); case 'false': #------------------------------------------------------------------------------- $Comp = Comp_Load('Form/Input', array('name' => 'DomainTypeID', 'type' => 'hidden', 'value' => 'Nothing')); if (Is_Error($Comp)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- $Form->AddChild($Comp); #------------------------------------------------------------------------------- $Table[] = new Tag('TD', array('colspan' => 2, 'class' => 'Standard', 'style' => 'border:1px solid #F07D00;'), SPrintF('Доменная зона вашего имени [%s] не поддерживается нашей организацией, домен просто будет связан с заказом хостинга', $Domain)); #-------------------------------------------------------------------------------
$DomainsOdd = Array_Diff($RegDomains['Domains'], $BillDomains); #------------------------------------------------------------------------------- if (SizeOf($DomainsOdd) > 0) { #------------------------------------------------------------------------------- foreach ($DomainsOdd as $DomainOdd) { #------------------------------------------------------------------------------- # ищщем этот домен в биллинге, безотносительно его статуса, но у того же регистратора $Where = array(SPrintF('CONCAT(`DomainOrdersOwners`.`DomainName`,".",`DomainSchemes`.`Name`) = "%s"', $DomainOdd), SPrintF('`DomainOrdersOwners`.`ServerID` = %u', $NowReg['ID']), '`DomainSchemes`.`ID` = `SchemeID`'); $Count = DB_Count(array('DomainOrdersOwners', 'DomainSchemes'), array('Where' => $Where)); if (Is_Error($Count)) { return ERROR | @Trigger_Error(500); } #------------------------------------------------------------------------------- if (!$Count) { #------------------------------------------------------------------------------- $Parse = WhoIs_Parse($DomainOdd); #------------------------------------------------------------------------------- switch (ValueOf($Parse)) { case 'error': return ERROR | @Trigger_Error(500); case 'false': return ERROR | @Trigger_Error(400); case 'array': #------------------------------------------------------------------------------- $IsCheck = WhoIs_Check($DomainName = $Parse['DomainName'], $DomainZone = $Parse['DomainZone']); #------------------------------------------------------------------------------- switch (ValueOf($IsCheck)) { case 'error': return ERROR | @Trigger_Error(500); case 'false': break;