|
|
| version 1.26, 2001/03/20 06:45:22 | version 1.331, 2001/09/26 11:24:07 |
|---|---|
| Line 1 | Line 1 |
| $t[^table:load[проверка.cfg]] | @main[] |
| $t.a | #^connect[mysql://hren]{^void:sql{nothing}} |
| #$response:content-type[$.value[text/html] $.charset[utf-8]] | |
| ^xslt[] | |
| OK | |
| <form method=post enctype=multipart/form-data> | @xslt[] |
| <input name=photo type=file> | $xdoc[^xdoc::set{<?xml version="1.0" encoding="windows-1251"?> |
| <input type=submit> | |
| </form> | <people> |
| <man id="1"><![CDATA[ ment here]]> | |
| <name>PAF</name> | |
| </man> | |
| <man id="2"> | |
| <name>ПИФ</name> | |
| </man> | |
| </people> | |
| }] | |
| ^show-xdoc2[$xdoc]<hr> | |
| #^show-xnode1[$xdoc]<hr> | |
| $people[^xdoc.select[*/man]] | |
| #^show1[] | |
| ^show-xnodes1[$people]<hr> | |
| #^people.0.owner.hren[] | |
| ^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]<hr> | |
| @show1[] | |
| ^for[i](0;^people._count[]-1){ | |
| $node[$people.$i] | |
| $node.first-child.value: | |
| $pattributes[$node.parent.attributes] | |
| ^if(^pattributes._count[]){ | |
| $pattributes.id.name=$pattributes.id.value | |
| } | |
| <br> | |
| } | |
| <hr> | <hr> |
| ^if($form:photo){ | |
| <pre> | @show-xnodes1[array][i] |
| ^$form:photo.name='$form:photo.name' | ^for[i](0;^array._count[]-1){ |
| ^$form:photo.size='$form:photo.size' | ^show-xnode1[$array.$i;0;1] |
| ^$form:photo.text='$form:photo.text' | |
| ^form:photo.save[-вовка.txt] | |
| </pre> | |
| } | } |
| @show-xnode1[xnode;level;single][l] | |
| ^if(def $xnode){ | |
| ^for[l](0;$level-1){ ^; ^; ^; ^;} | |
| ^if($xnode.type eq element){ | |
| <^;$xnode.name | |
| $pairs[$xnode.attributes] | |
| ^if(def $pairs){ | |
| $names[^pairs._keys[]] | |
| ^names.menu{$names.key=$pairs.[$names.key].value } | |
| } | |
| >^; | |
| }{ | |
| [$xnode.type] | |
| } | |
| ^if(def $xnode.value){$xnode.value}<br> | |
| ^show-xnode1[$xnode.first-child]($level+1) | |
| ^if(!$single){ | |
| ^show-xnode1[$xnode.next-sibling]($level) | |
| } | |
| ^if($xnode.type eq element){ | |
| ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$xnode.name>^;<br> | |
| } | |
| } | |
| @show-xdoc2[xdoc] | |
| ^xdoc.save[save.xml; | |
| # $.encoding[windows-1251] | |
| $.method[xml] | |
| ] | |
| $file[^xdoc.file[ | |
| # $.encoding[windows-1251] | |
| $.method[html] | |
| ]] | |
| ^file.save[text;save_file.html] | |
| ^taint[^xdoc.string[]] | |
| # $.encoding[windows-1251] | |
| # $.method[xml] | |
| #]] |