--- parser3/src/www/htdocs/Attic/index.html 2001/09/20 10:28:54 1.321 +++ parser3/src/www/htdocs/Attic/index.html 2001/09/26 13:39:57 1.332 @@ -1,12 +1,18 @@ @main[] -^xslt[] +^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[] -$dom[^dom::set{ +$xdoc[^xdoc::set{ - + PAF @@ -15,14 +21,14 @@ $dom[^dom::set{ }] -^show-dom2[$dom]
-#^show-dnode1[$dom]
-$people[^dom.select[*/man]] +^show-xdoc2[$xdoc]
+#^show-xnode1[$xdoc]
+$people[^xdoc.select[*/man]] #^show1[] -^show-dnodes1[$people]
+^show-xnodes1[$people]
#^people.0.owner.hren[] -^show-dnode1[^dom.select-single[*/man[2]/name];0;1]
+^show-xnode1[^xdoc.select-single[*/man[2]/name];0;1]
@show1[] ^for[i](0;^people._count[]-1){ @@ -36,52 +42,48 @@ $people[^dom.select[*/man]] }
-@show-dnodes1[array][i] +@show-xnodes1[array][i] ^for[i](0;^array._count[]-1){ - ^show-dnode1[$array.$i;0;1] + ^show-xnode1[$array.$i;0;1] } -@show-dnode1[dnode;level;single][l] -^if(def $dnode){ +@show-xnode1[xnode;level;single][l] +^if(def $xnode){ ^for[l](0;$level-1){ ^; ^; ^; ^;} - ^if($dnode.type eq element){ - <^;$dnode.name - $pairs[$dnode.attributes] + ^if($xnode.type eq element){ + <^;$xnode.name + $pairs[$xnode.attributes] ^if(def $pairs){ $names[^pairs._keys[]] ^names.menu{$names.key=$pairs.[$names.key].value } } >^; }{ - $dnode.name + [$xnode.type] } - ^if(def $dnode.value){$dnode.value}
- ^show-dnode1[$dnode.first-child]($level+1) + ^if(def $xnode.value){$xnode.value}
+ ^show-xnode1[$xnode.first-child]($level+1) ^if(!$single){ - ^show-dnode1[$dnode.next-sibling]($level) + ^show-xnode1[$xnode.next-sibling]($level) } - ^if($dnode.type eq element){ - ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$dnode.name>^;
+ ^if($xnode.type eq element){ + ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$xnode.name>^;
} } -@show-dom2[dom] -^dom.save[save.xml; - $.encoding[windows-1251] - $.method[html] -] -^dom.save[save3.xml; - $.encoding[windows-1251] +@show-xdoc2[xdoc] +^xdoc.save[save.xml; +# $.encoding[windows-1251] $.method[xml] ] -$file[^dom.file[ - $.encoding[windows-1251] +$file[^xdoc.file[ +# $.encoding[windows-1251] $.method[html] ]] -^file.save[text;save2.xml] -^taint[^dom.string[ - $.encoding[windows-1251] - $.method[html] -]] \ No newline at end of file +^file.save[text;save_file.html] +^taint[^xdoc.string[]] +# $.encoding[windows-1251] +# $.method[xml] +#]]