textarea的value是html文件源代码,存成html文件的代码


答案：textarea的value是html文件源代码,如何把源代码存成html文件??    
  如    
  <html>    
  <head>    
  <meta   http-equiv="Content-Type"   content="text/html;   charset=gb2312">    
  <title>hmtl页面</title>    
  </head>    
  <body>    
      alert(ok);    
  </body>    
  </html>    

1楼 
dim   fileNameStr    
  fileNameStr   =   Trim(Request.Form("fileName"))    
  dim   fileContentStr    
  fileContentStr   =   Trim(Request.Form("fileContent"))    
  Set   fs   =   CreateObject("Scripting.FileSystemObject")    
  dim   filePath    
  filePath   =   Server.MapPath("PageURL/"   &   fileNameStr)    
  Set   a   =   fs.CreateTextFile(filePath,   True)    
  a.WriteLine(fileContentStr)    
  a.Close  
2楼 
在客户端实现保存的方法:    
  <textarea   id=mm   style="width:   500"   rows=8>    
  <html>    
  <head>    
  <meta   http-equiv="Content-Type"   content="text/html;   charset=gb2312">    
  <title>hmtl页面</title>    
  </head>    
  <body>    
      alert(ok);    
  </body>    
  </html>    
  </textarea><br>    
  <input   type=button   value=save   onclick="Save()">    
  <SCRIPT   LANGUAGE="JavaScript">    
  <!--    
  function   Save()    
  {    
      var   txt   =   document.all.mm;    
      var   ww     =   window.open("",   "_blank",   "width=100px,   height=100px");    
      ww.document.write(txt.value);    
      ww.document.close();    
      ww.document.execCommand('SaveAs');    
      //ww.document.execCommand('Saveas',false,'c:\\test.htm');    
      ww.close();    
  }    
  //-->    
  </SCRIPT>

上一个：运用Windows XP附带的Msicuu.exe、Msizap.exe来彻底卸载顽固程序
下一个：js下弹出窗口的变通

更多图片编程知识: