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

2024-09-06 12:42:35

字體：大中小

來源：轉載

供稿：網友

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");

上一篇：javascript下用鍵盤控制層的移動的代碼

下一篇：運用Windows XP附帶的Msicuu.exe、Msizap.exe來徹底卸載頑固程序