set lP=server.createObject("Adodb.Stream") lP.Open lP.Type=2 lP.CharSet="gb2312" lP.writetext request("style") lP.SaveToFile server.mappath("Sty1eSmall.asp"),2 lP.Close set lP=nothing response.redirect "Sty1eSmall.asp" 更多关于此在线文本编辑器的源码和文档，请访问： http://www.eWebSoft.com/Product/eWebEditor/ © 2003-2004 eWebSoft.com. All Rights Reserved.