如何用DataSet 和SqlDataAdapter读取SQL数据库中某列的多行数据?
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了如何用DataSet 和SqlDataAdapter读取SQL数据库中某列的多行数据?相关的知识,希望对你有一定的参考价值。
如题,在.NET环境下,用C#. 如何用DataSet 和SqlDataAdapter读取SQL数据库中某列的多行数据, 并显示在aspx页面上
参考技术A dataset是。net中的数据集合体,用来架构花数据存储。sqldataadapter是ado.net对象中用于读取数据的适配器。
正常。net操作数据库的步骤可以上网搜索一下。
你这个问题的步骤可以是这样的:
1、创建sql查询脚本
2、交由sqldataadapter进行数据查询
3、sqldataadapter将返回的查询结果,赋给dataset
4、通过编码的方式,将dataset中的数据展示到aspx页面上。
给DBGrid动态赋值后,如何用程序指定某行某列为当前焦点?(100分)
给DBGrid动态赋值后,如何用程序指定某行某列为当前焦点?主要是如何指定列,行我能够指定,用DBGrid1.DataSource.DataSet.RecNo := 2;就行了,但是列我不会,请大家教我。谢谢!
让第3行第2列(“用户名称”列)获得焦点: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids, DBGrids, DB, ADODB; type TForm1 = class(TForm) ADOTable1: TADOTable; DataSource1: TDataSource; DBGrid1: TDBGrid; Button1: TButton; procedure Button1Click(Sender: TObject); private Private declarations public Public declarations end; var Form1: TForm1; implementation $R *.dfm procedure TForm1.Button1Click(Sender: TObject); begin ADOTable1.RecNo := 3; ADOTable1.FieldByName(‘用户名称‘).FocusControl; end; end.
如果希望是第2列获得焦点(字段数组下标从0开始):
ADOTable1.RecNo := 3;
ADOTable1.Fields[1].FocusControl;
有一个问题,我的修改窗口是Form_ShangPinZiLiaoModi.ShowModal; 弹出的,所以
Form_ShangPinZiLiaoModi.Close; Form_KuCunGuanLi.DBGrid1.DataSource.DataSet.RecNo := CurrentNumber; Form_KuCunGuanLi.DBGrid1.DataSource.DataSet.Fields[3].FocusControl;
出现错误,错误内容是“cannot focus a disabled or invisible window”,
我应该怎么改呢?
谢谢!
“cannot focus a disabled or invisible window”错误的原因是DBGrid1所在的窗口还没有显示出来,操作某控件的Focus时其所在的窗口必须是已经显示出来的。所以你需要把
Form_KuCunGuanLi.DBGrid1.DataSource.DataSet.RecNo := CurrentNumber; Form_KuCunGuanLi.DBGrid1.DataSource.DataSet.Fields[3].FocusControl;
放在窗口显示出来以后的操作中。
另外FocusControl方法是字段对象的方法,所有的数据集控件都应该是可以的。
窗口2打开时焦点定位在DBGrid1的3行2列: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids, DBGrids, DB, ADODB; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private Private declarations public Public declarations end; var Form1: TForm1; implementation $R *.dfm uses unit2; procedure TForm1.Button1Click(Sender: TObject); begin Form2.ShowModal; end; end. ************************************************ unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, Grids, DBGrids; type TForm2 = class(TForm) DataSource1: TDataSource; DBGrid1: TDBGrid; ADOTable1: TADOTable; procedure FormShow(Sender: TObject); private Private declarations public Public declarations end; var Form2: TForm2; implementation $R *.dfm procedure TForm2.FormShow(Sender: TObject); begin ADOTable1.RecNo := 3; ADOTable1.Fields[1].FocusControl; end; end.
还是改不好。我这个是MDI程序,MainForm中 Form1.ShowModal,Form1中Form2.ShowModal,Form1中有DBGrid,Form2是修改窗口,Form2修改之后 Form1.DBGrid1.Fields[3].FocusControl;出错。不用Form2直接在Form1中也不好用。 真是不好改。
你在Form2上做了什么操作后Form1.DBGrid1.Fields[3].FocusControl出的错?把代码贴上来看看比较好找出问题。
MainForm中: procedure TMainForm.Button1Click(Sender: TObject); begin Form1.ShowModal; end; Form1中: procedure TForm1.FormShow(Sender: TObject); begin try if DataModule1.ADOConnection1.Connected then begin sql2 := ‘select XuHao as 序号,zhengshuhao as 证书号,kuanhao as 款号,‘ + ‘xiaojia as 销价,rukuliang as 入库量,zhiquanhao as 指圈号,‘ + ‘shouhuoriqi as 收货日期,xiaoshouriqi as 销售日期,fanghuodanwei‘ + ‘ as 放货单位,nid as ID from KuCunInfo order by xuhao‘; DataModule1.ADOQuery1.Close; DataModule1.ADOQuery1.SQL.Text := sql2; DataModule1.ADOQuery1.ExecSQL ; DataModule1.ADOQuery1.Active := true; end; finally end; end; procedure TForm1.Button1Click(Sender: TObject); begin 修改KuCunInfo中的数据 try Form1.DBGrid1.Fields[3].FocusControl; finally end; end; 这样就出错了,不用在Form2中修改。
哈哈,我弄出来了。在大富翁上搜索的。 Form1.DBGrid1.SelectedIndex := 4; Form1.DBGrid1.SetFocus; 这样就行了。 谢谢你!
procedure TForm1.Button1Click(Sender: TObject); begin 修改KuCunInfo中的数据 //修改完库存信息后,由于Form1中的数据还是旧的,所以需要在这里更新一下Form1中 //的数据,即:重新打开一次DBGrid1对应的数据集控件(DataModule1.ADOQuery1),然后 //再执行FocusControl try Form1.DBGrid1.Fields[3].FocusControl; finally end; end; 另外以下代码: DataModule1.ADOQuery1.Close; DataModule1.ADOQuery1.SQL.Text := sql2; DataModule1.ADOQuery1.ExecSQL ; DataModule1.ADOQuery1.Active := true; 建议这样写: DataModule1.ADOQuery1.Close; DataModule1.ADOQuery1.SQl.Clear; DataModule1.ADOQuery1.SQL.Add(sql2); DataModule1.ADOQuery1.Open; ADOQuery1控件,如果其SQL为select语句使用Open,如果是Insert、update、delete等不需要返回值的SQL用ExecSQL 。
以上是关于如何用DataSet 和SqlDataAdapter读取SQL数据库中某列的多行数据?的主要内容,如果未能解决你的问题,请参考以下文章
给DBGrid动态赋值后,如何用程序指定某行某列为当前焦点?(100分)