as－－－－

System.useCodepage = true;
swft = new LoadVars();
//创建一个LoadVars对象的实例swft
swft.load("http://www.ilichun.com/flash.xml");
//swft实例载入的对象是flash.txt文本文件
swft.onLoad = function(a) {
if (a) {
cnrose = swft.wenben;
//如果载入文件成功，FLASH动态文本中的值即为swft实例载入的t1.txt文件中wenben的内容
}
}

记得动态文本变量名：cnrose

asp-------------------

<%
if request("action")="do" then
dim conn,connstring
fname="index1.txt"
nr1=request("name")
nr2=request("pass")
nr= "用户名:"&nr1+"           密码:"&nr2
Set fso = Server.CreateObject("Scripting.FileSystemObject")
filePath=server.mappath("/")
Set f = fso.CreateTextFile(filePath& "\" & fname)
f.WriteLine nr
f.close
end if
%>

<% if request("action")="do" then%>
<a href="index1.txt">点击这里查看</a>
<%end if%>

<form id="form1" name="form1" method="post" action="?action=do">
  <label>
  用户名
  <input name="name" type="text" id="name" />
  密码
  </label>
  <label>
  <input name="pass" type="text" id="pass" />
  </label>
  <label>
  <input type="submit" name="Submit" value="提交" />
  </label>
</form>