HTML-Code

<form name="Quelltextform16" action=""> <table border="0" width="400"> <tr> <td width="100%" align="center"><font face="Arial" size="3"><b>Quelltext anzeigen</b></font></td> </tr> <tr> <td width="100%">&nbsp;</td> </tr> <tr> <td width="100%"> <script type="text/javascript"> <!-- /* © Valentin Hammer Originalversion auf http://www.supermario.homepage.eu */ var uScript16 = document.getElementsByTagName&&(document.nodeValue||document.nodeValue+""=="null")&&document.Quelltextform16.innerHTML ? true:false; var HTML_Header16 = new Array("%3Chtml>","%3C/html>"); if(!uScript16) document.write(unescape('%3Cfont face="Arial" size="2" color="#FF0000">'+'Der Browser kann dieses Javascript nicht ausführen'.bold()+'%3C/font>')); function anzeigen16() { if(uScript16) { with(document.Quelltextform16) { if(Aenderungen16.checked==true) Ausgabe16.value = ""; var Quelltext16 = document.getElementsByTagName("html")[0].innerHTML; var Doctype16 = ""; var Laenge16 = 0; with(Quelltext16) { if(charAt(indexOf(unescape("%3C"))+1).toUpperCase()==charAt(indexOf(unescape("%3C"))+1)) { for(var i=0;i<2;i++) HTML_Header16[i] = HTML_Header16[i].toUpperCase(); } } if(document.doctype) { with(document) Doctype16 = 'DOCTYPE HTML PUBLIC'+(doctype.publicId ? ' "'+doctype.publicId+'"':'')+(doctype.systemId ? ' "'+doctype.systemId+'"':''); } else if(Laenge16 = document.getElementsByTagName("!").length) { for(var i=0;i<Laenge16;i++) { Doctype16 = document.getElementsByTagName("!")[i].nodeValue; if(Doctype16.toLowerCase().substring(0,12)!="doctype html") Doctype16 = ""; else break; } } Ausgabe16.value = unescape((Doctype16 ? '%3C!'+Doctype16+'>%0A':'')+HTML_Header16[0]+'%0A'+Quelltext16+'%0A'+HTML_Header16[1]); } } } //--> </script></td> </tr> <tr> <td width="100%"><textarea name="Ausgabe16" rows="20" cols="45"></textarea></td> </tr> <tr> <td width="100%"><font face="Arial" size="2"><input type="checkbox" name="Aenderungen16" checked> dynamische Änderungen bei Ausgabe zurücksetzen</font></td> </tr> <tr> <td width="100%"><input type="button" value="Quelltext anzeigen" onclick="anzeigen16()"> <input type="button" value="Ausgabe löschen" onclick="document.Quelltextform16.Ausgabe16.value = ''"></td> </tr> </table> </form>