我正在开发一个传统的桌面应用程序。它是使用阿拉斯加软件的 Xbase++ 编写的。我只是想在现有的 db 文件中添加一个新字段,但找不到任何有关如何执行此操作的文档。
我看过https://harbour.github.io/doc/ , http://www.ousob.com/ng/clguide/index.php , https://en.wikibooks.org/wiki/Clipper_Tutorial:_a_Guide_to_Open_Source_Clipper (s) , http://www.alaska-software.com/support/kbase-old.cxp没有任何运气。所记录的所有内容都是关于从头开始创建一个新的 db 文件。甚至可以修改数据库文件结构吗?
cFieldExist := .f.
FOR nField := 1 TO (oDbfMaster:ProType)->( FCount() )
IF (oDbfMaster:ProType)->( FieldName( nField ) ) == 'newFieldName'
cFieldExist := .t.
ENDIF
NEXT
IF !cFieldExist
//Please help me here, I want to add a the new field 'newFieldName'
ENDIF
在过去,我们使用 dBase 或 Clipper 打开表,将结构复制到新表中:
使用扩展到 tempFile 的 dbFile 复制结构
在新表中,每一行都是原始表中的一个字段。您追加一个新字段并填写字段名称、数据类型、字段长度、编号。小数点等
然后使用临时文件,创建一个新的 db 文件并将记录从旧的 db 追加到其中:
从 tempFile 创建 newFile 使用 newFile APPEND FROM dbFile
最后,您需要重命名旧文件,然后将新文件重命名为该名称并重新创建任何索引。
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句