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

textarea的value是html文件源代码,如何把源代码存成html文件??   
  如   
     
     
     
     
     
     
      alert(ok);   
     
     

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楼
在客户端实现保存的方法:   
     
     
     
     
     
     
     
      alert(ok);