原来做过Delphi+sqlserver的系统,增加表或字段时,用Sql查询分析器执行一段代码!
这次做了一个Delphi+Access的系统,因为第一次考虑不够全面,有些功能必须通过增加表或字段来解决,但又不能破坏客户原有的数据,又不能去现场给他去数据库中加,想在程序中增加一个升级功能!想实现,程序连接数据库后,去数据库中查找某个表或某个字段是否存在,如不存在,则在系统菜单中显示升级按钮,写一段代码让他点击进行更新。哪位朋友给个代码参考?
这次做了一个Delphi+Access的系统,因为第一次考虑不够全面,有些功能必须通过增加表或字段来解决,但又不能破坏客户原有的数据,又不能去现场给他去数据库中加,想在程序中增加一个升级功能!想实现,程序连接数据库后,去数据库中查找某个表或某个字段是否存在,如不存在,则在系统菜单中显示升级按钮,写一段代码让他点击进行更新。哪位朋友给个代码参考?
解决方案 »
- 有人买房的吗,有个问题?
- 如何禁止关闭应用服务器时的自动警告?
- ’超时已过期‘问题的解决????
- 我最新做的一下进销存软件,请大家多提宝贵意见!
- 这样的报表效果如何实现:每5行用不同的背景和前景颜色(比如1~5行用白色,6~10行用绿色,11~15行用白色,依次类推)100分求教
- ado/mts的olecheck(objectcontext.createinstance(....,..,..))
- 这个是CSDN的问题吗?
- 请问如何获得当前光标在整个TMemo.Lines.Text中的位置?
- delphi用什么控件与网络单片机通信
- treeview中怎样更换action?
- pointer和AThread的问题请教
- 关于TSQLConnection的一个问题。很头疼啊!!!大家快来帮帮我吧!
升级程序首先读取版本号,然后根据不同版本号执行添加表或字段的代码.添加字段
adoquery1.sql.clear;
adoquery1.sql.add("alter table 表名 add 字段名 datatype");
adoquery1.excesql;
读取指定表的所有字段名,逐个与新字段名比较,若不存在则 alter table....
把新的空数据库和数据库导入工具发给用户就完了嘛...