--- parser3/src/www/htdocs/Attic/index.html 2001/09/26 15:43:59 1.333 +++ parser3/src/www/htdocs/Attic/index.html 2001/10/07 14:40:10 1.363 @@ -1,89 +1,5 @@ -@main[] -#^fori[] -#^connect[mysql://hren]{^void:sql{nothing}} -#$response:content-type[$.value[text/html] $.charset[utf-8]] -^xslt[] -OK - -@fori[][i] -^for[i](1;3){... =$i= ...} - -@xslt[] -$xdoc[^xdoc::set{ - - - - PAF - - - دبش - - -}] - -^show-xdoc2[$xdoc]
-#^show-xnode1[$xdoc]
-$people[^xdoc.select[*/man]] -#^show1[] -^show-xnodes1[$people]
-#^people.0.owner.hren[] - -^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]
- -@show1[] -^for[i](0;^people._count[]-1){ - $x[$people.$i] - $x.firstChild.nodeValue: - $pattributes[$x.parentNode.attributes] - ^if(^pattributes._count[]){ - $pattributes.id.name=$pattributes.id.nodeValue - } -
-} -
- -@show-xnodes1[array][i] -^for[i](0;^array._count[]-1){ - ^show-xnode1[$array.$i;0;1] -} - -@show-xnode1[x;level;single][l] -^if(def $x){ - ^for[l](0;$level-1){ ^; ^; ^; ^;} - ^if($x.nodeType == $xnode:ELEMENT_NODE){ - <^;$x.nodeName - $pairs[$x.attributes] - ^if(def $pairs){ - $names[^pairs._keys[]] - ^names.menu{$names.key=$pairs.[$names.key].nodeValue } - } - >^; - }{ - [$x.nodeType] - } - - ^if(def $x.nodeValue){$x.nodeValue}
- ^show-xnode1[$x.firstChild]($level+1) - ^if(!$single){ - ^show-xnode1[$x.nextSibling]($level) - } - - ^if($x.nodeType == $xnode:ELEMENT_NODE){ - ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;
- } -} - -@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] -#]] +@frameset[] + + + +