事件 按钮_打开.被单击()

         文件浏览框1.显示对话框(1,1,取存储卡路径())

结束 事件

事件 文件浏览框1.选择完毕(被选择文件 为 文本型)

         变量 文件名 为 文本型

         变量 创建文件成功 为 逻辑型

         如果 文件是否存在(取存储卡路径() &"/E4A/") 则

                   创建目录(取存储卡路径() &"/E4A/")

         结束 如果      

         如果 文件是否存在(取存储卡路径() & "/E4A/spwj.txt") 则

         否则

                   创建文件成功=创建文件(取存储卡路径() &"/E4A/spwj.txt")

         结束 如果

         文件名=寻找文件后缀名(被选择文件,"jpg")

         写出文本文件(取存储卡路径() &"/E4A/spwj.txt" ,文件名 ,"UTF-8")

结束 事件