Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(Server.MapPath("../menu/menu.htm"),2,true)
objFile.write strHtml '将内容写到一个文件里
Set objFile = Nothing
Set objFSO = Nothing
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(Server.MapPath("../menu/menu.htm"),2,true)
objFile.write strHtml '将内容写到一个文件里
Set objFile = Nothing
Set objFSO = Nothing