急！！继续我的问题，这个参数该怎么传递？？(100分)

C

cnnoah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-03

• #1

procedure TForm2.FormShow(Sender: TObject);
var
P1: String;
begin
P1:=P;
ADODataSet1.CommandText:='select * from txcs where ZBSD=P1';
ADODataSet1.Active:=true;
ADODataSet1.Open;
end;

P是我在Form1中定义的一个全局变量，我如何才能把P1类型为String的值传递给SQL语句。

 

W

weblogic_li

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-03

• #2

ADODataSet1.CommandText:='select * from txcs where ZBSD='''+P1+'''';
thats ok

 

C

cnnoah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-03

• #3

这个方法我试过了，结果是select * from txcs where ZBSD=""，
P1的值并没有传递到SQL语句中。

 

M

MikeZ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-03

• #4

weblogic_li的方法是对的！
你跟踪一下，看看P有没有付值，P1:=P都不需要。

 

C

cnnoah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-03

• #5

to MikeZ
跟踪的结果好象没有P的赋值过程，有P1的变量声明过程，我该怎么修改代码呢？

 

C

cnnoah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-03

• #6

thank you all
问题解决啦，我把P1去掉了，直接在SQL语句中使用P，一切OK.