예제 #1
0
 if (Is_Error($Result)) {
     return $Link->GetError();
 }
 #-----------------------------------------------------------------------------
 $dDomainsOrders = MySQL::Result($Result);
 if (Is_Error($dDomainsOrders)) {
     return ERROR | @Trigger_Error(500);
 }
 #-----------------------------------------------------------------------------
 $DomainsOrders = new Tag('DomainsOrders');
 #-----------------------------------------------------------------------------
 foreach ($dDomainsOrders as $dDomainsOrder) {
     #---------------------------------------------------------------------------
     $Domain = $dDomainsOrder['domen'];
     #---------------------------------------------------------------------------
     $DomainOrder = new Tag('DomainOrder', new Tag('CreateDate', $dDomainsOrder['dateorder']), new Tag('ExpirationDate', (string) JulianDayToGregorian($dDomainsOrder['reg'])), new Tag('DomainName', SubStr($Domain, 0, $Index = StrRpos($Domain, '.'))));
     #---------------------------------------------------------------------------
     $Zone = SubStr($Domain, $Index);
     #---------------------------------------------------------------------------
     $Result = $Link->Query(SPrintF("SELECT * FROM `tarifdom` WHERE `name` = '%s'", $Zone));
     if (Is_Error($Result)) {
         return $Link->GetError();
     }
     #---------------------------------------------------------------------------
     $dDomainScheme = MySQL::Result($Result);
     if (Is_Error($dDomainScheme)) {
         return ERROR | @Trigger_Error(500);
     }
     #---------------------------------------------------------------------------
     $dDomainScheme = Current($dDomainScheme);
     #---------------------------------------------------------------------------
예제 #2
0
 #---------------------------------------------------------------------------
 $Domain = $dDomainsOrder['domen'];
 #---------------------------------------------------------------------------
 $DomainOrder = new Tag('DomainOrder');
 #---------------------------------------------------------------------------
 $DomainOrder->AddChild(new Tag('OrderDate', $dDomainsOrder['dateorder']));
 $DomainOrder->AddChild(new Tag('ExpirationDate', (string) JulianDayToGregorian($dDomainsOrder['reg'])));
 #---------------------------------------------------------------------------
 $Parse = WhoIs_Parse($Domain);
 #---------------------------------------------------------------------------
 switch (ValueOf($Parse)) {
     case 'error':
         return ERROR | @Trigger_Error(500);
     case 'false':
         #-----------------------------------------------------------------------
         $DomainName = SubStr($Domain, 0, $Index = StrRpos($Domain, '.'));
         $DomainZone = SubStr($Domain, $Index + 1);
         break;
     case 'array':
         #-----------------------------------------------------------------------
         $DomainName = $Parse['DomainName'];
         $DomainZone = $Parse['DomainZone'];
         break;
     default:
         return ERROR | @Trigger_Error(101);
 }
 #---------------------------------------------------------------------------
 $DomainOrder->AddChild(new Tag('DomainName', $DomainName));
 #---------------------------------------------------------------------------
 $Result = $Link->Query(SPrintF("SELECT * FROM `tarifdom` WHERE `name` = '.%s'", $DomainZone));
 if (Is_Error($Result)) {