G
gxywl
Unregistered / Unconfirmed
GUEST, unregistred user!
在D2006下没问题到,2007出错??
直接用字符串没问题---
LoginSQLStr := 'SELECT 名称, 角色, HaveActions FROM L_帐号 WHERE (帐号 = '
+ quotedstr(sUser) + ') AND (口令 = ' + quotedstr(sPwd) + ')';
fLoginQuery := TSQLQuery.Create(nil);
fLoginQuery.SQLConnection :=self.SQLCnn;
fLoginQuery.SQL.Add(LoginSQLStr);
fLoginQuery.Open;
以上是没问题的
//----在D2006没问题,在D2007下----以下出现错误" 至少有一参数没有被指定 "--------
LoginSQLStr := 'SELECT 帐号, 名称, 角色, HaveActions FROM 帐号 '+
' WHERE (帐号 = :UID) AND (口令 = WD)';
fLoginQuery := TSQLQuery.Create(nil);
fLoginQuery.SQLConnection := self.SQLCnn;
fLoginQuery.Close;
fLoginQuery.SQL.Clear;
fLoginQuery.SQL.Add(LoginSQLStr);
fLoginQuery.Params.ParamValues['UID']:=sUser;
fLoginQuery.Params.ParamValues['PWD']:=sPwd;
fLoginQuery.Open;
望各位大侠赐教一二!! 多谢了
用网上的中文修复方法http://www.delphibbs.com/keylife/iblog_show.asp?xid=29825 ,还是不能解决!!
直接用字符串没问题---
LoginSQLStr := 'SELECT 名称, 角色, HaveActions FROM L_帐号 WHERE (帐号 = '
+ quotedstr(sUser) + ') AND (口令 = ' + quotedstr(sPwd) + ')';
fLoginQuery := TSQLQuery.Create(nil);
fLoginQuery.SQLConnection :=self.SQLCnn;
fLoginQuery.SQL.Add(LoginSQLStr);
fLoginQuery.Open;
以上是没问题的
//----在D2006没问题,在D2007下----以下出现错误" 至少有一参数没有被指定 "--------
LoginSQLStr := 'SELECT 帐号, 名称, 角色, HaveActions FROM 帐号 '+
' WHERE (帐号 = :UID) AND (口令 = WD)';
fLoginQuery := TSQLQuery.Create(nil);
fLoginQuery.SQLConnection := self.SQLCnn;
fLoginQuery.Close;
fLoginQuery.SQL.Clear;
fLoginQuery.SQL.Add(LoginSQLStr);
fLoginQuery.Params.ParamValues['UID']:=sUser;
fLoginQuery.Params.ParamValues['PWD']:=sPwd;
fLoginQuery.Open;
望各位大侠赐教一二!! 多谢了
用网上的中文修复方法http://www.delphibbs.com/keylife/iblog_show.asp?xid=29825 ,还是不能解决!!