新书推介：《语义网技术体系》
作者：瞿裕忠，胡伟，程龚
   XML论坛     W3CHINA.ORG讨论区     计算机科学论坛     SOAChina论坛     Blog     开放翻译计划     新浪微博  
 
  • 首页
  • 登录
  • 注册
  • 软件下载
  • 资料下载
  • 核心成员
  • 帮助
    		•   Add to Google

    >> 本版讨论.NET,C#,ASP,VB技术
    [返回] 中文XML论坛 - 专业的XML技术讨论区 → 计算机技术与应用 → 『 Dot NET,C#,ASP,VB 』 → [转帖]写入文本文件的过程函数(ASP) ◇查看新帖 ◇ 用户列表 ◇

      发表一个新主题  发表一个新投票  回复主题  (订阅本版) 您是本帖的第 6431 个阅读者浏览上一篇主题  刷新本主题   树形显示贴子　浏览下一篇主题
     * 贴子主题： [转帖]写入文本文件的过程函数(ASP) 举报  打印  推荐  IE收藏夹 
       本主题类别:     
     Qr 帅哥哟，离线，有人找我吗？
      
      
      威望：9
      等级：博士二年级(版主)
      文章：4392
      积分：29981
      门派：XML.ORG.CN
      注册：2004/5/15

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给Qr发送一个短消息 把Qr加入好友 查看Qr的个人资料 搜索Qr在『 Dot NET,C#,ASP,VB 』的所有贴子 访问Qr的主页 引用回复这个贴子 回复这个贴子 查看Qr的博客楼主
    发贴心情 [转帖]写入文本文件的过程函数(ASP)

    写入文本文件的过程函数(ASP)

    来源：不详

    今天写程序的时候要反复用到写入文本文件,于是就写了一个过程函数,希望对大家有用.

    代码:

    Sub Write2File(strFile, strContent, blnAppend)
    ' 写入文件
    ' strFile 文件名(路径) , strContent 写入的内容, blnAppend 是否追加
    On Error Resume Next
    Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
    If blnAppend Then
    Set objWriteText = objFSO.OpenTextFile(strFile,8,True)
    Else
    Set objWriteText = objFSO.OpenTextFile(strFile,2,True)
    End If
    objWriteText.WriteLine (strContent)
    Set objWriteText = Nothing
    Set objFSO = Nothing
    ' 容错处理
    Select Case Err
    Case 424 Response.Write "路径未找到或者该目录没有写入权限."
    ' Case Else Response.Write Err.Description
    Case Else Response.Write Err
    End Select
    End Sub

    调用方法:
    Write2File "c:\dd.ini", "dd", True
    或者
    Call Write2File ("c:\dd.ini", "dd", True)

    说明:
    1.自动建立文件;
    2.不能自动建立目录


       收藏   分享  
    顶(0)
      




    ----------------------------------------------
    没人帮忙，那就靠自己，自己才是最好的老师！本人拒绝回答通过站内短消息提出的问题！

    blog:http://Qr.blogger.org.cn

    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/3/1 21:17:00
     
     lubricity 帅哥哟，离线，有人找我吗？
      
      
      等级：大二期末(数据结构考了98分!)
      文章：61
      积分：330
      门派：XML.ORG.CN
      注册：2005/3/4

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给lubricity发送一个短消息 把lubricity加入好友 查看lubricity的个人资料 搜索lubricity在『 Dot NET,C#,ASP,VB 』的所有贴子 引用回复这个贴子 回复这个贴子 查看lubricity的博客第2楼
    发贴心情 
    如何才能在读取文件时，先将st[i]的值i读出来，使之在后面的写入时,可以进行(i=i+),就是说使之变成类add.js的形式
    1.问题如下：
    如何代改上面代码,
    使其增添一个数组var st = new Array();
    使其可以在add.js文件中不断加入内容，而且不会冲掉原有的内容
    就是要使add.js的内容以下面的形式储存
    st[0]="contents" //content为自行增加的内容
    st[1]="contents"
    st[2]="contents"
    st[3]="contents"
    .
    .
    .
    .
    .
    2.问题完
         谢谢
    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/3/21 13:21:00
     
     GoogleAdSense
      
      
      等级：大一新生
      文章：1
      积分：50
      门派：无门无派
      院校：未填写
      注册：2007-01-01
    给Google AdSense发送一个短消息 把Google AdSense加入好友 查看Google AdSense的个人资料 搜索Google AdSense在『 Dot NET,C#,ASP,VB 』的所有贴子 访问Google AdSense的主页 引用回复这个贴子 回复这个贴子 查看Google AdSense的博客广告
    2024/5/1 18:53:44

    本主题贴数2，分页： [1]

    管理选项： 修改tag | 锁定 | 解锁 | 提升 | 删除 | 移动 | 固顶 | 总固顶 | 奖励 | 惩罚 | 发布公告
    W3C Contributing Supporter! W 3 C h i n a ( since 2003 ) 旗 下 站 点
    苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
    		 46.875ms