CREATE TABLE ft (
ID int IDENTITY (1, 1) NOT NULL ,
Code char (40) NOT NULL ,
ImageType char (1) NULL ,
Path char (120) NULL
)
我想让ID为关键字,怎么设置,
然后再插入一条记录的ID=0(系统默认从ID从1开始),
高手帮忙补全命令把,
如果想通过ado自动创建这个表,应该怎么写,ado怎么设置
ID int IDENTITY (1, 1) NOT NULL ,
Code char (40) NOT NULL ,
ImageType char (1) NULL ,
Path char (120) NULL
)
我想让ID为关键字,怎么设置,
然后再插入一条记录的ID=0(系统默认从ID从1开始),
高手帮忙补全命令把,
如果想通过ado自动创建这个表,应该怎么写,ado怎么设置
解决方案 »
- 问高手如何继续提高 》》
- 三层MIDAS 远程调查询时的问题,急啊,毕业设计用的
- stringgridex單元格合併(对不起 只有这么多分了)
- 在fcTreeView控件中怎么获得当前选中节点的Items值。
- 使用ADO的数据库如何加密啊?
- 这个问题等了一天都没有人能给出正确答案,Delphi高手请看:
- 高手指点,如何将要打印的报表存成EXECL文件格式。
- 大侠们快来帮忙啊!
- 哪有KILIX下载,
- 关于Table的gotokey问题
- 如何在执行过程中,出现了错误,出现自己给定的中文提示。
- 打家看一下我这个Memo如何换行问题!我是在数据库中联系取得两个字段,然后在一个Memo中显示,且需要换行显示,代码如下
CONSTRAINT PK_ft PRIMARY KEY CLUSTERED
(
id
) ON [PRIMARY]
GO
update ft set id=0
ID int IDENTITY (0, 1) NOT NULL ,
Code char (40) NOT NULL ,
ImageType char (1) NULL ,
Path char (120) NULL
)
Cannot update identity column 'ID'.
ID int IDENTITY (0, 1) NOT NULL ,起始值改成0就可以了
我想用ado执行上面的语句,怎么做?
先把上面的sql代码放到文本文件里,为了能见更多的表,每条sql语句用一行“go”做间隔
try
assignfile(djtext,文件名);
reset(djtext);
except
on Einouterror do
begin
application.messagebox('打开文件错误','提示',48);
closefile(djtext);
exit;
end;
end; query1.close;
query1.sql.clear;
while not eof(djtext) do
begin
try
readln(djtext,tmpstr);
if UpperCase(trim(tmpstr))='GO' then
begin
query1.ExecSQL;
query1.close;
query1.sql.clear;
end
else
begin
if (trim(tmpstr)<>'') and (copy(tmpstr,1,2)<>'/*') then query1.sql.add(tmpstr);//判断是否是空行,或者是注释行
end;
except
begin
application.messagebox('发生错误','提示',48);
closefile(djtext);
exit;
end;
end;
end;
closefile(djtext);
query1.close;