最近刚开始学习DELPHI有个问题请教各位进来的朋友们
关于和SQL数据库的连接问题;对两个文本框的内容验证。
看看下面这段代码不知道为什么总连不上数据库
procedure TForm1.Image4Click(Sender: TObject);
var
ADOQuery1: TADOQuery;
sqlstr:string;
begin
{数据库操作:判断用户和密码是否正确}
if (edit1.Text<>'') and (edit2.Text<>'') then
begin
ADOQuery1:= TADOQuery.Create(self);
ADOQuery1.ConnectionString := 'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=shopdb;Data Source=.;';
ADOQuery1.SQL.Clear;
sqlstr:='select *from t_user where user_name='+edit1.text+' and user_pass='+edit2.text+';
ADOQuery1.SQL.Add(sqlstr);
ADOQuery1.Open;
问题好象就出在sqlstr中,因为在DELPHI中字符串是用“’”单引号,而SQL中user_name='+edit1.text+'也是要单引号,这样如何解决?
关于和SQL数据库的连接问题;对两个文本框的内容验证。
看看下面这段代码不知道为什么总连不上数据库
procedure TForm1.Image4Click(Sender: TObject);
var
ADOQuery1: TADOQuery;
sqlstr:string;
begin
{数据库操作:判断用户和密码是否正确}
if (edit1.Text<>'') and (edit2.Text<>'') then
begin
ADOQuery1:= TADOQuery.Create(self);
ADOQuery1.ConnectionString := 'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=shopdb;Data Source=.;';
ADOQuery1.SQL.Clear;
sqlstr:='select *from t_user where user_name='+edit1.text+' and user_pass='+edit2.text+';
ADOQuery1.SQL.Add(sqlstr);
ADOQuery1.Open;
问题好象就出在sqlstr中,因为在DELPHI中字符串是用“’”单引号,而SQL中user_name='+edit1.text+'也是要单引号,这样如何解决?
~~~~~~~~~~~~~~~~~~~~~~~~~~~
sqlstr:='select * from t_user where user_name='''+edit1.text+''' and user_pass='''+edit2.text+'''';