delphi中这一段什么意思
adoconnection1:=TADOConnection.Create(nil);adoconnection1.LoginPrompt:=false;adoconne...
adoconnection1:=TADOConnection.Create(nil);
adoconnection1.LoginPrompt:=false;
adoconnection1.Connected:=false;
adoconnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=malingling;Persist Security Info=True;User ID=sa;Initial Catalog=StoreManage;Data Source=malingling-PC\SQLEXPRESS';
adoconnection1.Connected:=true;
adotable1:=TADOTable.Create(nil);
adotable1.Connection:=adoconnection1;
adotable1.TableName:='Goods_Info';
adotable1.Open;
datasource1.DataSet:=adotable1;
adoquery1:=TADOQuery.Create(nil);
adoquery1.Connection:=adoconnection1;
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Text:='select * from store_info';
adoquery1.Open; 展开
adoconnection1.LoginPrompt:=false;
adoconnection1.Connected:=false;
adoconnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=malingling;Persist Security Info=True;User ID=sa;Initial Catalog=StoreManage;Data Source=malingling-PC\SQLEXPRESS';
adoconnection1.Connected:=true;
adotable1:=TADOTable.Create(nil);
adotable1.Connection:=adoconnection1;
adotable1.TableName:='Goods_Info';
adotable1.Open;
datasource1.DataSet:=adotable1;
adoquery1:=TADOQuery.Create(nil);
adoquery1.Connection:=adoconnection1;
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Text:='select * from store_info';
adoquery1.Open; 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询