在文件的指定位置写入数据

例如：在1.txt文件中有如下内容
11111
22222
33333
44444
55555我怎样把第三行的数据改写成00000
在网上搜了一下，好像是先读出内容，修改完后再写入，请问还有没有其它的方法？
先谢谢各位了！

解决方案 »

  1.   

    理论上同意SYSSZ 的说法，操作上同意lyserver 的做法
      

  2.   

    要看具体情况,定长数据可以直接在指定位置put...比如楼主示例数据可以:
    dim h as long
    dim f as string
        
    f="d:\txt"
    h=reefile
    open f for binary as h
        put h,15,"00000"      '假设行是以vbcrlf换行,要加vbcrlf的长度
    close
      

  3.   

    磁盘上的文件数据是连续的,put不会改变文件的总长度,所以,如果上面的示例想修改第三行的数据为"00000000",那就不能用put的方法,只有读出文件内容,然后修改了重新写回去...
      

  4.   

    哦,上面"put不会改变文件的总长度"这个说的不对,只是就这个示例所指是第三行的总长度,要修改的内容超出那行的长度,会顺延下去影响到下一行数据....