Delphi使用ODAC连接ORACLE软件实例
我是刚学编程,学的是DELPHI7,我公司使用的数据库是ORACLE9I,我不知道如何使用ODAC连接数据库,并用DELPHI7编写相应程序使之可能连接数据库查询,条件如...
我是刚学编程,学的是DELPHI7,我公司使用的数据库是ORACLE9I,我不知道如何使用ODAC连接数据库,并用DELPHI7编写相应程序使之可能连接数据库查询,条件如下:
远程数据库IP:192.168.60.6
查询帐号用户名写密码:power
数据库服务名称:pwsfc
数据库名称:sajet_odac
端口:1521
查询语句:select rownum NO,work_order 工单,serial_number 条码,wip_process 下一站 from sajet.g_sn_status where work_order='NFA003' and wip_process='10013'
请使用实例说明,软件界面我已经做好了,只是不知道如何将输入框的输入内容变成查询语句中的条件,怎样使之点查询就可以像在数据库中查询一样得到相应结果 展开
远程数据库IP:192.168.60.6
查询帐号用户名写密码:power
数据库服务名称:pwsfc
数据库名称:sajet_odac
端口:1521
查询语句:select rownum NO,work_order 工单,serial_number 条码,wip_process 下一站 from sajet.g_sn_status where work_order='NFA003' and wip_process='10013'
请使用实例说明,软件界面我已经做好了,只是不知道如何将输入框的输入内容变成查询语句中的条件,怎样使之点查询就可以像在数据库中查询一样得到相应结果 展开
5个回答
展开全部
界面放入Button1,ADOConnection1、ADOQuery1,如果还要显示数据可以再加DataSource1和DBGrid1。
首先设置ADOConnection1来连接ORA,先设置ADOConnection1.ConnectionString属性,也可以写到程序里,然后将ADOConnection1.LoginPrompt设为false以避免连接数据库时再输一次密码。
将ADOQuery1.Connection设为ADOConnection1,将SQL写在ADOQuery1.SQL中
将DataSource1.DataSet设为ADOQuery1
将DBGrid1.DataSource设为DataSource1,将DBGrid1.ReadOnly设为true以防止通过DBGrid1随意修改数据库
然后在Button1Click事件中写上ADOQuery1.open这句代码就能实现一个简单的查询了。
而要通过界面取的变量查询数据就要将Button1Click事件的代码改成:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(你的SQL);//注意SQL必须是字符型的,其中包括单引号(‘’)
ADOQuery1.Open;
首先设置ADOConnection1来连接ORA,先设置ADOConnection1.ConnectionString属性,也可以写到程序里,然后将ADOConnection1.LoginPrompt设为false以避免连接数据库时再输一次密码。
将ADOQuery1.Connection设为ADOConnection1,将SQL写在ADOQuery1.SQL中
将DataSource1.DataSet设为ADOQuery1
将DBGrid1.DataSource设为DataSource1,将DBGrid1.ReadOnly设为true以防止通过DBGrid1随意修改数据库
然后在Button1Click事件中写上ADOQuery1.open这句代码就能实现一个简单的查询了。
而要通过界面取的变量查询数据就要将Button1Click事件的代码改成:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(你的SQL);//注意SQL必须是字符型的,其中包括单引号(‘’)
ADOQuery1.Open;
展开全部
OraSession1.Options.Direct:=True
OraSession1.Username:='system';
OraSession1.Password:='888';
OraSession1.Server:='192.168.10.23:1521:MyDataBase';
OraSession1.Connected;
OraSession1.Username:='system';
OraSession1.Password:='888';
OraSession1.Server:='192.168.10.23:1521:MyDataBase';
OraSession1.Connected;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
var sSql: string;
begin
sSql := Format('select rownum NO,work_order 工单,serial_number 条码,wip_process 下一站 from sajet.g_sn_status where work_order='NFA003' and wip_process='10013'
', [edt_Work_order.Text, edt_wip_process.Text]);
然后把这个语句输入到query中进行查询就可以了。
end;
begin
sSql := Format('select rownum NO,work_order 工单,serial_number 条码,wip_process 下一站 from sajet.g_sn_status where work_order='NFA003' and wip_process='10013'
', [edt_Work_order.Text, edt_wip_process.Text]);
然后把这个语句输入到query中进行查询就可以了。
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
adoconnection 里连接下数据库
然后 用adoquery 和之连接
写代码
with adoquery do
begin
查询语句。。。
end
然后 用adoquery 和之连接
写代码
with adoquery do
begin
查询语句。。。
end
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询