<! DOCTYPE html PUBLIC "-// W3C // dtd xhtml 1.0 Transitional // EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <Html xmlns = "http://www.w3.org/1999/xhtml"> <Head> <Meta http-equiv = "Content-Type" content = "text/html; charset = UTF-8"/> <Title> untitled document </title> </Head> <Body> <Script type = "text/javascript"> // JavaScript Document // Run the code Function doRunCode (cod1 ){ Cod = document. getElementById (cod1) Var code = cod. value; If (code! = ""){ Var newwin = window. open ('','',''); Newwin. opener = null Newwin.doc ument. write (code ); Newwin.doc ument. close (); } } // Copy the code Function doCopyCode (ID ){ If (document. all ){ TextRange = document. getElementById (ID). createTextRange (); TextRange.exe cCommand ("Copy "); } Else { // Alert ("this function is only valid on IE "); CopyToClipboard (document. getElementById (ID). value ); } } // Save as code Function doSaveCode (cod1 ){ Cod = document. getElementById (cod1) Var code = cod. value; If (code! = ""){ Var winname = window. open ('', '_ blank', 'top = 10000 '); Winname.doc ument. open ('text/html ', 'replace '); Winname.doc ument. write (code ); Winname.document.execcommand('saveas', '', 'code.htm '); Winname. close (); } } Function copyToClipboard (txt ){ If (window. clipboardData ){ Window. clipboardData. clearData (); Window. clipboardData. setData ("Text", txt ); } Else if (navigator. userAgent. indexOf ("Opera ")! =-1 ){ Window. location = txt; } Else if (window. netscape ){ Try { Netscape. security. PrivilegeManager. enablePrivilege ("UniversalXPConnect "); } Catch (e ){ Alert ("rejected by the browser! N enter 'about: config' in the address bar of the browser, press ENTER n, and set 'signed. applets. codebase_principal_support 'to 'true '"); } Var clip = Components. classes ['@ mozilla.org/widget/clipboard=1'mirror.createinstance (Components. interfaces. nsIClipboard ); If (! Clip) Return; Var trans = Components. classes ['@ mozilla.org/widget/transferable00001').createinstance (Components. interfaces. nsITransferable ); If (! Trans) Return; Trans. addDataFlavor ('text/unicode '); Var str = new Object (); Var len = new Object (); Var str = Components. classes ["@ mozilla.org/supports-string1_1"]. createInstance (Components. interfaces. nsISupportsString ); Var copytext = txt; Str. data = copytext; Trans. setTransferData ("text/unicode", str, copytext. length * 2 ); Var clipid = Components. interfaces. nsIClipboard; If (! Clip) Return false; Clip. setData (trans, null, clipid. kGlobalClipboard ); } } </Script> <Div class = "UBBContainer"> <Div class = "UBBTitle"> The following is the program code </div> <Div class = "UBBContent"> <Textarea class = "UBBText" id = "CodeText62670" rows = "8"> here is the html code to be run. </textarea> <Br> <Input type = "button" value = "Running code" onclick = "doRunCode ('codetext62670')"> <Input type = "button" value = "Copy code" onclick = "doCopyCode ('codetext62670')"> <Input type = "button" value = "other code" onclick = "doSaveCode ('codetext62670')"> <Br> [Ctrl + A select all tips: you can modify some code and then press run] </div> </Div> </Body> </Html> |