lihonggen0、cuizm、Gelim、AOM我都问了N次了，没有回答

[ma_zun_yi]

请教，怎样修改Dbase数据库表的字段数据类型

[victorycyz]

DBase多少年没用过了。
不过，DBase应该也是符合SQL查询规范的吧。用alter table 语句试试。

[yoki]

try:

cn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\folder;Extended Properties=dBASE IV;User ID=Admin;Password="
cn.execute "alter table t1 alter col1 int"

[yoki]

非access数据库的新建及库结构的修改


vb专业版中的数据库存取对象变量可以分为两类，一类用于数据库结构的维护和管理，另一类用于数据的存取。其中表示数据库结构时可以使用下面的对象：database、tabledef、field、index，以及三个集合（collection）：tabledefs、fields和indexes。每一个集合都是由若干个对象组成的，这些数据对象的集合可以完全看作是一个数组，并按数组的方法来调用。一旦数据库对象建立后，就可以用它对数据库的结构进行修改和数据处理。对于非access数据库，大部分都是对应于一个目录，所以可以使用vb的mkdir语句先生成一个目录，亦即新建一个数据库。而每一个非access数据库文件可看作是此目录下的一个数据表（table），但实际上它们是互相独立的。下面是新建一个foxpro2.5格式数据库的程序实例。


sub createnew ( )


dim db1 as database ， td as tabledefs dim t1 as new tabledef ， f1 as new field ， f2 as new field ， f3 as new field


dim ix1 as new index


dim path as string


const db_text = 10 ， db_integer = 3


chdir "\" path$ = inputbox( " 请 输 入 新 路 径 名 ： ", " 输 入 对 话 框 " ) mkdir path$


’ 新 建 一 个 子 目 录


set db1 = opendatabase(path$, true, false, "foxpro 2.5;")


set td = db1.tabledefs t1.name = "mydb"


’ 新 建 一 个 数 据 表 ， 数 据 表 名 为 mydb


f1.name = "name" ， f1.type = db_text ， f1.size = 20 f2.name = "class" ， f2.type = db_text ， f2.size = 20 f3.name = "grade" ， f3.type = db_integer t1.fields.append f1


’ 向 数 据 表 中 添 加 这 些 字 段 t1.fields.append f2

[海牛]

学习ing

[ma_zun_yi]

同志们，我的用的数据库是Dbase IV,内有数据，修要将 数字 18，7 改为数字 12，2
以上方式不行

[victorycyz]

究竟是要改字段值还是要改字段类型？

[ma_zun_yi]

改字段类型，将如将numeric(15,4) 改成numeric(11,2)

[rexyudl]

好象已经有数据了，任何数据库都不会允许你更改吧！？

[rexyudl]

尤其你还是由大往小改！