|
本帖最后由 frg0922 于 2014-6-17 10:48 编辑
将帐号导入表格中。。你可以借鉴一下
文件存储内容如:
- 功能 导入帐号()
- 路径 = 文件.对话框(1,"文本文件(*.txt)|*.txt||")
- 如果(路径 == "")
- 返回 0
- 如果结束
- 文件句柄 = 文件.打开(路径)
- 如果(文件句柄 < 0)
- 返回 0
- 如果结束
- 表格.删除非固定行("表格0")
- 序号 = 1
- 循环(真)
- 内容 = 文件.读一行(文件句柄)
- 注释=字符串.截取(内容,0,2)
- 如果(内容 == "")
- 跳出
- 如果结束
- if(注释=="//")
- 继续
- endif
- 账号数据,大小
- 字符串.分割(内容,";",账号数据)
- 数组空间.大小(账号数据,大小)
- 如果(大小 <4)
- 界面功能.写日志("TXT文件内容错误")
- goto 标记
- 如果结束
- 表格.插入行("表格0",序号,-1)
- 表格.设置行高("表格0",序号,24)
- 窗口.发送消息(控件.获得句柄("表格0"),#115,7,0)
- 表格.设置内容("表格0",序号,0,序号)
- 表格.设置内容("表格0",序号,1,账号数据[0])
- 表格.设置内容("表格0",序号,2,账号数据[1])
- 表格.设置内容("表格0",序号,3,账号数据[2])
- 表格.设置内容("表格0",序号,4,账号数据[3])
- 序号++
- 循环结束
- 界面功能.写日志("成功导入帐号")
- 标记:
- 文件.关闭(文件句柄)
- 功能结束
复制代码
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x

|