请问怎么用字符串来连接SQL7,采用ADO!

Question

ADO连接用字符串控制倒好办，不过不用控件只用字符串来写其他的操作是不可以的

Answer 1

cobi(我是小新):当然是要的！别的edit,command等等，该加什么控件就加什么！请您写 代码给我好吗？

Answer 2

Command: OleVariant;
Command := CreateOleObject('ADODB.Command');
Command.Parameters.Append(Command.CreateParameter(ParamName, FldType, ParamType, Size, EmptyParam));
看MSDN中关于ADO的帮助

Answer 3

cobi(我是小新):你的QQ号是多少？可以认识一下吗？

Answer 4

procedure TForm1.FormCreate(Sender: TObject);
var
 adoc:variant;
begin
 adoc:=CreateOleObject('adodb.connection');
 adoc.open('Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=test;Data Source=LIANPU');end;我这样写怎么会说：没有定义CreateOleObject呢？

Answer 5

procedure TForm1.FormCreate(Sender: TObject);
var
adoc:Tadoquery;
begin
//adoc:=CreateOleObject('adodb.connection');
adoc:=Tadoquery.create(self);
//adoc.open('Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial 
//Catalog=test;Data Source=LIANPU');
adoc.connectionstring('Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=test;Data Source=LIANPU');
adoc.sql.text:='写sql'
adoc.open(select); or aodc.execsql(insert,delete update);
adoc.close;
adoc.destroy;end;

Answer 6

query1.open 执行 select 
query1.execsql 执行delete,insert,update