小弟是个数据库新手。做个软件时想要在插入数据之前查询MDB数据库中的某个字段中是否已存在有该数据 比如siteInfo 表中存在 webURL 字段在插入http://www.baidu.com/ 之前。首先查询是否已存在有该数据。。
然后再根据用户选择进行相关操作。 请教下相关的实现代码该如何写呢。。先行谢过了。。
然后再根据用户选择进行相关操作。 请教下相关的实现代码该如何写呢。。先行谢过了。。
解决方案 »
- 请教图片处理的几个小问题?
- 推荐关于DELPHI的两篇文章: 有兴趣的朋友来看一下.
- 郁闷死了:在DELPHI环境中执行系统,打开窗口的时候,总是报错:an unknown error has occurred,可是不在DELPHI的环境下执行则没有这个错误是
- 如何实现这个查询功能!
- 一个delphi编写的主程序调用另外一个delphi写的外部程序,如何把外部程序的窗体设为主程序窗体的子窗体?
- 设置主窗体的快捷键!
- delphi中有沒有像sql中sum一樣的函數
- 怎么一句的程序也会出错,帮帮忙!
- 关于数据库连接,求一思路
- listview图标自动排列时的问题?
- delphi 如何把数据导出到EXCEL中?
- 有没有哪个日历控件,可以根据需要对特定日期加颜色?
var Tmp:TAdoquery;
begin
Tmp:=TAdoquery.create(self);
Tmp.connection:=ADOConnection;
with Tmp do
begin
Close;
Sql.Clear;
Sql.Add('select * from siteInfo where webURL='''+value+''' ');
Open;
end;
if Tmp.IsEmpty then
result:=false
else
result:=true;
end;
var
tmpItem: TListItem;
begin
countITG := 0 ;
ListView1.Items.Clear;
with adoquery1 do
begin
close;
sql.Clear;
sql.Add( 'select site_N,U_name,U_pass,statu from siteInfo');
Open;
while not Eof do
begin
inc(countITG);
ADOQuery1.Active := True;
tmpItem := ListView1.Items.Add;
tmpItem.Caption := intToStr(countITG);
tmpItem.SubItems.Add(FieldByName('site_N').Value);
next;
end;
end;
end;
function ExsitRecord(value:String):boolean;
var Tmp:TAdoquery;
begin
Tmp:=TAdoquery.create(self);
Tmp.connection:=ADOConnection;
with Tmp do
begin
Close;
Sql.Clear;
Sql.Add('select * from siteInfo where webURL='''+value+''' ');
Open;
end;
if Tmp.IsEmpty then
result:=false
else
result:=true;
tmp.close;
tmp.free;
end;
额...上面还有的那个小问题...请问谁还能帮帮忙吗....
引用:额..可以再请教一下吗.....我使用listView读取数据库的时候.字段中的每条数据只能显示20字节的内容...不知道是怎么回事呢....我的代码是这样的///
var
tmpItem: TListItem;
begin
countITG := 0 ;
ListView1.Items.Clear;
with adoquery1 do
begin
close;
sql.Clear;
sql.Add( 'select site_N,U_name,U_pass,statu from siteInfo');
Open;
while not Eof do
begin
inc(countITG);
ADOQuery1.Active := True;
tmpItem := ListView1.Items.Add;
tmpItem.Caption := intToStr(countITG);
tmpItem.SubItems.Add(FieldByName('site_N').Value);
next;
end;
end;
end;