TC官方合作论坛

标题: 让安卓TC5.x也用上文件写配置/文件读配置 [打印本页]

作者: venski    时间: 2015-9-6 08:22
标题: 让安卓TC5.x也用上文件写配置/文件读配置
本帖最后由 venski 于 2015-9-26 01:55 编辑

TC5.4.1版本自带的读配置和写配置已经修复好了,这里就供大家作为操作SQLITE数据库(查、删、改)的例子,改成免回复.
如果使用上有什么问题,你可以通过TC的群找我修正此代码。

功能 文件写配置(数据库文件路径="/sdcard/tegong.db",区段名称="config",属性名称="testkey",属性值="testvalue")
    如果(文件是否存在(数据库文件路径)==假)
        //新建数据时
        变量 返回数组,err
        变量 ret = sqlitesqlarray(数据库文件路径,"create table "&区段名称&"(iniName varchar(100),iniValue varchar(100))",返回数组)//创建表
        调试输出("创建新表:"& 获取错误信息(1))
        如果(ret==真)
            调试输出("创建新表:"& 获取错误信息(1))

            ret = sqlitesqlarray(数据库文件路径,"insert into "&区段名称&" values(\'" & 属性名称 & "\',\'" & 属性值 & "\');",返回数组)
            如果(ret==真)
                调试输出("插入数据1:"& 获取错误信息(1))
            结束
        结束
    否则   
        //老数据中新加或更新
        变量 返回数组,err
        变量 ret = sqlitesqlarray(数据库文件路径,"select * from "&区段名称&" where iniName=\'"&属性名称&"\'",返回数组)
        如果(ret==真)
            调试输出("查询数据:"& 获取错误信息(1))
            变量 属性数量 = 数组大小(返回数组)
            如果(属性数量==1)
                //正经的修改
                ret = sqlitesqlarray(数据库文件路径,"update "&区段名称&" set iniValue=\'" & 属性值 & "\' where iniName=\'"&属性名称&"\'",返回数组)
                如果(ret==真)
                    调试输出("更新数据:"& 获取错误信息(1))
                结束
            否则
                如果(属性数量>1)
                    //删除老的再新增
                    ret = sqlitesqlarray(数据库文件路径,"delete from "&区段名称&" where iniName=\'"&属性名称&"\'",返回数组)
                    如果(ret==真)
                        调试输出("删除数据:"& 获取错误信息(1))
                    结束
                结束
                //新增
                ret = sqlitesqlarray(数据库文件路径,"insert into "&区段名称&" values(\'" & 属性名称 & "\',\'" & 属性值 & "\');",返回数组)
                如果(ret==真)
                    调试输出("插入数据2:"& 获取错误信息(1))
                结束
            结束
        结束
    结束
结束

功能 文件读配置(数据库文件路径="/sdcard/tegong.db",区段名称="config",属性名称="testkey")
    变量 返回数组,err,属性值
    如果(文件是否存在(数据库文件路径)==真)
        变量 ret = sqlitesqlarray(数据库文件路径,"select * from "&区段名称&" where iniName=\'"&属性名称&"\'",返回数组)
        如果(ret==真)
            调试输出("查询数据:"& 获取错误信息(1))
            变量 属性数量 = 数组大小(返回数组)
            如果(属性数量==1)
                arraygetat(返回数组[0],1,属性值)
                调试输出(属性值)
            结束
        结束
    结束
    返回 属性值
结束



//此贴纯属为了练习,如有错误,请指正,谢谢



作者: a1648004555    时间: 2015-9-6 08:38
kkkkkkkkkkkkkkkkkkkk
作者: 言术    时间: 2015-9-6 08:50
了解一下
作者: 续花丶    时间: 2015-9-6 09:53
学习一下.
作者: itcfan    时间: 2015-9-6 11:09

作者: yecanxue    时间: 2015-9-6 13:45
看看
作者: jushunhe    时间: 2015-9-8 11:52
/文件读配置
作者: dragon07zn    时间: 2015-9-8 12:37
来看看
作者: chenbihui    时间: 2015-9-10 16:16
谢谢分享!
作者: chenbihui    时间: 2015-9-10 16:17
谢谢分享!
作者: lzq91514    时间: 2015-9-11 00:08
nnnnnnn
作者: 342695788    时间: 2015-9-12 05:56
666666666666666
作者: justme    时间: 2015-9-15 02:23
rrrrrrrrrrrrrrrrrrrrrrrrrrrr
作者: nilivdeyu    时间: 2015-9-15 11:00
7777777777777777777777
作者: tuan307818    时间: 2015-9-17 22:50
0000000000000
作者: 315417625    时间: 2015-9-22 22:35
安卓TC5.x也用上文件写配置/文件读配置 [修改]
作者: shiyongfu    时间: 2015-9-23 10:57
好东西来
作者: chendechun00    时间: 2015-9-23 11:18
chouchou
作者: shadow    时间: 2015-9-24 22:48
卡啊




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1