你可以通过调用opentextfile方法来读取一个文本文件。opentextfile方法的第一个参数是指定打开的文件名；第二个参数是指定文件是读取，增添，或者写入；第三个参数决定当指定的文件名不存在时新的文件是否要建立；第四个参数指定文件的格式是ascii 还是unicode。 这一方法返回的是一个textstream对象。
下面的代码段将一个文本文件中的内容读入一个textbox控件。textstream中的readall方法用于读出文件的内容，然后使用close方法来关闭文件。
dim objfso as filesystemobject
dim objtext as textstream
set objfso = new filesystemobject
set objtext = objfso.opentextfile(app.path & "\temp.txt", _
forreading, false, tristateusedefault)
text1.text = objtext.readall()
call objtext.close
为了能够在一个文本文件中写入内容，可以先打开文件，然后使用textstream中的write方法输入需要的值。
set objtext = objfso.opentextfile(app.path & "\temp.txt", _
forwriting, false, tristateusedefault)
call objtext.write(text1.text)
call objtext.close
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器
