[BACK]Return to index.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / www / htdocs

Diff for /parser3/www/htdocs/Attic/index.html between versions 1.192 and 1.205

version 1.192, 2002/11/29 08:06:59 version 1.205, 2002/12/19 10:17:42
Line 20  $body Line 20  $body
 OK  OK
   
 @main[]  @main[]
   $form:a=
 #$a(123)  #$a(123)
 #^a.format[%.10u]  #^a.format[%.10u]
 #$result[111]  #$result[111]
Line 295  OK Line 296  OK
 #^test_exif[jpg]  #^test_exif[jpg]
 #^http_prefix[]  #^http_prefix[]
 #^http_prefix_table[]  #^http_prefix_table[]
 ^http_prefix_xml[]  #^http_prefix_xml[]
 #^imagefont[]  #^imagefont[]
 #^downloadtest[]  #^downloadtest[]
 #^cachebug[]  #^cachebug[]
 #^quickregexatend[]  #^quickregexatend[]
 #^docsamplehttpfileload[]  #^docsamplehttpfileload[]
   #^datecreatecolon[]
   #^exifdocsample[]
   #^rusagetv[]
   #^varmethnameconflict[]
   #^mimeold[]
   #^mimenew[]
   #^doctableclonesample[]
   #^manyto[]
   #^strangewrite[]
   #^badexceptiontype[]
   
   @badexceptiontype[]
   ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
   ^void:sql{b}
   }
   
   
   @strangewrite[]
   $a[$form:a]
   $ax.b[2]
   $ax.b=
   
   @manyto[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[паф <paf@design.ru>, паф дома <pafhome@design.ru>]
   #       $.bcc[pafhome@design.ru]
   #       $.cc[pafhome@design.ru]
           $.subject[проверка два в to]
           $.text[привет]
   ]
   
   @manyto[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[паф <paf@design.ru>]
           $.bcc[паф дома <pafhome@design.ru>]
   #       $.cc[pafhome@design.ru]
           $.subject[проверка to,bcc]
           $.text[привет]
   ]
   
   @manyto[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[паф <paf@design.ru>]
   #       $.bcc[паф дома <pafhome@design.ru>]
           $.cc[паф дома <pafhome@design.ru>]
           $.subject[проверка to,cc]
           $.text[привет]
   ]
   
   @doctableclonesample[]
   $orig[^table::create{name
   Вася
   Коля
   Лена
   Маша
   }]
   
   #сдвигает текущую запись таблицы from на <Коля>
   ^orig.offset(1)
   
   #копирует начиная стекущей записи во from, 10 записей максимум
   $copy[^table::create[$orig;
       $.offset[cur]
       $.limit(10)
   ]]
   
   ^copy.menu{$copy.name}[,]
   
   @mimeold[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[paf@design.ru]
           $.text[1
           
           2
           
           
                   3]
   ]
   
   @mimenew[]
   ^mail:send[
           $.from[paf@design.ru]
           $.to[paf@design.ru]
           $.body[1
           
           2
           
           
                   3]
   ]
   
   @varmethnameconflict[]
   $varmethnameconflict[1]
   ^varmethnameconflict.format[%03d]
   
   @rusagetv[]
   $s[$status:rusage]
   ^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f]
   
   @exifdocsample[]
   $image[^image::measure[jpg/DSC00003.JPG]]
   $exif[$image.exif]
   ^if($exif){
       Производитель фотоаппарата, модель: $exif.Make $exif.Model<br>
       Время съемки: ^exif.DateTimeOriginal.sql-string[]<br>
       Выдержка: $exif.ExposureTime секунды<br>
       Диафрагма: F$exif.FNumber<br>
       Использовалась вспышка: ^if(def $exif.Flash){^if($exif.Flash){да;нет};неизвестно}<br>
   }{
       нет EXIF информации<br>
   }
   
   @exif_value[value][i]
   ^if($value is date){
           ^value.sql-string[]
   }{
           ^if($value is hash){
                   ^for[i](0;$value-1){$value.$i}[,]
           }{
                   $value
           }
   }
   
   
   
   
   @datecreatecolon[]
   #$date[^date::create[2002-12-02 14:30]]
   #$date[^date::create[2002-12-02]]
   #$date[^date::create[2002:12:02 13:30]]
   $date[^date::create[2002:12:02]]
   #$date[^date::create[12:02]]
   ^date.sql-string[]
   
 @docsamplehttpfileload[]  @docsamplehttpfileload[]
 $file[^file::load[text;http://parser.ru/]]  $file[^file::load[text;http://parser.ru/]]
Line 407  $file[^file:list[$dir;\.(jpe?g|JPE?G)^$] Line 545  $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]
 </table>  </table>
   
 @show_exif_value[value][i]  @show_exif_value[value][i]
 ^if($value is hash){  ^if($value is date){
         ^for[i](0;$value-1){$value.$i}[,]          ^value.sql-string[]
 }{  }{
         $value          ^if($value is hash){
                   ^for[i](0;$value-1){$value.$i}[,]
           }{
                   $value
           }
 }  }
   
   
 @message-id-test[]  @message-id-test[]
 ^mail:send[  ^mail:send[
         $.from[paf@mail]          $.from[paf@mail]
Removed from v.1.192  
changed lines
  Added in v.1.205

E-mail: