用ADOQuery2向数据库里添加下面内容时出错！！！！(10分)

T

tt123tt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #1

用ADOQuery2向数据库里添加下面内容时出错，我想是应该是 ' 的全角和半角的问题怎样解好呀？

sql语句是：
sql:='insert into ren (aa,bb,cc,dd,ee) values ("'+Edit1.text+' ","'+Edit2.text+' ","'+Edit3.text+' ","'+Memo1.text+' ")'
添加以下内容时出错：
if CompactAndRepair('e:/Old.mdb', 'e:/New.mdb') then

ShowMessage('Successfully')
else

ShowMessage('Error…');

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #2

对于一般数据库，最好使用单引号而不是双引号来完成功能，虽然大多数双引号也可以。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #3

还有，你下面的是压缩数据库的代码。
你要实现什么功能，同时能详细的说一下问题吗？

 

T

tt123tt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #4

这是我的资料管理系，把网上的好的文章保存起来以后用，前段时间用地都没什么问题
就是保存上面的内容时出错了。
DELPHI里有没有替换函数比如ASP里的REPLACE()这样的？

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #5

终于明白了。使用如下代码。
sql := 'insert into ren (aa,bb,cc,dd,ee) values (' + QuotedStr(Edit1.text) + ',' + QuotedStr(Edit2.text) + ',' + QuotedStr(Edit3.text) + ',' + QuotedStr(Memo1.text) + ')'

 

T

tt123tt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #6

变成这样的了，这样不太好吧
，有没有更好办法呀？
' if CompactAndRepair(''e:/Old.mdb'', ''e:/New.mdb'') then

ShowMessage(''Successfully'')
else

ShowMessage(''Error…'');
'

 

T

tt123tt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-04

• #7

还用这个好
ADOQuery3.Parameters.ParamByName('sq1').Value

 

T

tt123tt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-04

• #8

接受答案了.