求写！！

z794733453

创建txt文件并写入内容，然后删除指定行号。
我试了不行，调试可以，但是打开文件却不行！

这论坛不错

你把你的代码发上来看看

z794733453

这论坛不错 发表于 2015-5-16 22:48
你把你的代码发上来看看

被我改得不成样了！

这论坛不错

z794733453 发表于 2015-5-16 22:49
被我改得不成样了！

那你重新写了发上来

二叔.

1. 功能 开始_点击()
   
2.    
   
3.     文件创建("d:\\1.txt","rw") //创建文件
   
4.     变量 文件句柄 = 文件打开("d:\\1.txt","rw")   //先打开文件在写入
   
5.     如果(文件句柄>0)
   
6.         文件写入一行字符(文件句柄,"测试写文本")  //写入一行文字
   
7.        //----------        文件写入一行字符(文件句柄,"00000000"&"\r\n"&"111111111\n"&"\r\n"&"2222222222")--------------//这样能一条命令写多行，或者也可以一个命令写一行
   
8.     结束
   
9.     文件关闭(文件句柄)  //写完把文件关闭
   
10.    
    
11.     文件删指定行("d:\\1.txt",0) //删除第一行文字
    
12.    
    
13. 结束

复制代码

baby杰杰

代码肯定有问题，参照F1代码就可以完成

z794733453

这论坛不错 发表于 2015-5-16 22:53
那你重新写了发上来

var 文件句柄 = 0
var 日志 = 数组(1,2,3,4,5,6,7,8,9,10)
功能 写日志(日志内容)
    文件句柄 = 文件打开("e:\\写日志.txt")
    如果(文件句柄==-1)
        文件句柄 = 文件创建("e:\\写日志.txt")
        如果(文件句柄==-1)
            消息框("创建失败!")
            返回 假
        否则
            文件关闭(文件句柄)
        结束
    结束
   
    文件设置位置(文件句柄,"结束")
    文件写入一行字符(文件句柄,日志内容)
    文件关闭(文件句柄)
结束


功能 按钮0_点击()
    //这里添加你要执行的代码
    遍历(变量 i = 0; i <=10; i++)
        写日志(日志)
        等待(100)
    结束
    等待(50)
    命令("e:\\写日志.txt",真)
   
结束

功能 修改文件(文件路径,类型,行号,内容)
   
   
    文件句柄 = 文件打开(文件路径)
    如果(文件句柄 == -1)
        返回 "打开文件失败"
    结束
    如果(类型 == "删除")
        文件删指定行("e:\\写日志.txt",行号-1)
        消息框("删除成功")
    否则如果(类型 == "修改")
        日志[行号-1] = 内容
        消息框("修改成功")
    否则
        消息框("没有此类型")
        文件关闭(文件句柄)
    结束
结束
功能 按钮1_点击()
    //这里添加你要执行的代码
    修改文件("e:\\写日志.txt","修改",2,"爱的")  
    等待(100)
    命令("e:\\写日志.txt",真)
   
结束


功能 按钮2_点击()
    //这里添加你要执行的代码
    如果(文件是否存在("e:\\写日志.txt"))
        文件删除("e:\\写日志.txt")
        消息框("删除成功!")
    否则
        消息框("没有")
    结束
   
结束

z794733453

这论坛不错 发表于 2015-5-16 22:53
那你重新写了发上来

我设置了三个按钮   按钮2是删除文件的，按钮1是修改文件，按钮0是写入

这论坛不错

z794733453 发表于 2015-5-17 09:45
var 文件句柄 = 0
var 日志 = 数组(1,2,3,4,5,6,7,8,9,10)
功能 写日志(日志内容)

这些代码哪里有问题？

z794733453

这论坛不错 发表于 2015-5-17 13:11
这些代码哪里有问题？

1.我在写入之后出现了1写不进去，但是写第二次就写进了
2.写了之后我修改，但是弹出文件后并没有修改
3.我按删除文件之后，再写入，这个时候才修改了！！？