var
ADOTemp:TADOQuery;
begin
ADOTemp:=TADOQuery.Create(nil);
ADOTemp.Connection :=ADOCon;
ADOTemp.SQL.Add('select * from AdminList where adLoginName=:Name and adPassword=:Password and popedom<>3');//看看这儿参数要用':'
with ADOTemp do
begin
Parameters[0].Value :=AName; //在这里出现错误
Parameters[1].Value :=APassword;
Active:=true;
ADOTemp:TADOQuery;
begin
ADOTemp:=TADOQuery.Create(nil);
ADOTemp.Connection :=ADOCon;
ADOTemp.SQL.Add('select * from AdminList where adLoginName=:Name and adPassword=:Password and popedom<>3');//看看这儿参数要用':'
with ADOTemp do
begin
Parameters[0].Value :=AName; //在这里出现错误
Parameters[1].Value :=APassword;
Active:=true;
解决方案 »
- 自定义公式的实现
- PostMessage 结构体,消息队列满了?内存泄漏???
- WebBrowser(小问题送分)
- [Error] TEditEx.PAS(16): Identifier redeclared: 'TEditEx'???
- 在DELPHI下如何使用AcceptEx函数呢?那位大侠能帮帮我呢!!
- 程序員如果不盡量的去寫規范的代碼, 簡直就是一種罪孽。應該要踢出程序員的隊伍!!!!!!!!!!
- Delphi中怎么执行外部的EXE程序?
- 紧急求救:intreweb升级问题!!!!!!!!!!!
- 第一次用installshield制作安装文件,请指教
- 為什麼在我機器上建立與其他機器的oracle連接的bde出錯???連sql server都沒問題,破oracle真亂!!!!!
- 请问哪里有Mybase格式软件下载??急用!急用!急用!急用!
- 有关数据库字段的问题
ADOTemp:TADOQuery;
begin
with adotemp do
begin
sql.close; sql.clear;
SQL.Add('select * from AdminList where adLoginName=:adLoginName and adPassword=:adPassword and popedom<>3');//看看这儿参数要用':'
Parameters[0].Value :=AName; //在这里出现错误
Parameters[1].Value :=APassword;
open;
end;你试试看!
ADOTemp:TADOQuery;
begin
with adotemp do
begin
sql.close; sql.clear;
SQL.Add('select * from AdminList where adLoginName=:adLoginName and adPassword=:adPassword and popedom<>3');
Parameters.ParamByName(adLoginName ).Value :=AName;
Parameters.ParamByName(adPassword ).Value :=APassword;
open;
end;