快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

FILESYSTEMOBJECT组件

该组件是负责启动文件或目录的治理,假如你象读取文件的内容,你必须配合Textstream一起用。它提供了Createtextfile, openTextFile,GetFile,GetFileName等函数。下面是一个实例:如何利用ASP在一个以有文件中添加内容

例子

<!-- Story.asp -->
<%
IF NOT Request.Form("NextLine")="" THEN
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
Set MyTextFile=MyFileObject.OpenTextFile("d:story.txt", 8, TRUE)
MyTextFile.WriteLine(Request.Form("NextLine"))
MyTextFile.Close
END IF
%>
<HTML>
<HEAD><TITLE> Online Story </TITLE></HEAD>
<BODY>
<HR>
<%
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
Set MyTextFile=MyFileObject.OpenTextFile("d:story.txt")
WHILE NOT MyTextFile.AtEndOfStream
Response.Write(" "&MyTextFile.ReadLine)
WEND
MyTextFile.Close
%>
<HR>
<H3>Enter a new line for the story: </H3>
<FORM METHOD="POST" ACTION="story.asp">
<INPUT NAME="NextLine" TYPE="TEXT" SIZE=70 maxlength="100">
<INPUT TYPE="SUBMIT" VALUE="Submit Sentence">
</FORM>
</BODY>
</HTML>
返回类别: 教程
上一教程: 数据库连接代码(SQL SERVER、ORACLE、ACCESS)
下一教程: 利用ON ERROR RESUME NEXT来验证日期的输入

您可以阅读与"FILESYSTEMOBJECT组件"相关的教程:
· FILESYSTEMOBJECT组件新建、读取、添加、修改、删除功能实例
· 三种禁用FILESYSTEMOBJECT组件的方式
· FILESYSTEMOBJECT组件的用法示例
· 作一个可以直接和浏览器进行交互的组件
· ASP无组件上传图片的基本方式
    微笑服务 优质保证 索取样品