ActiveDelphi

[delrio.lucas]

Galera, por favor, me ajudem...

Estou tendo erro desse código:

[rodrigoprado]

//Recomendo utilizar assim seus sqls dentro da aplicação fica mais facil de ler, e organizado.

//1-Por parâmetros

with DMCavi.QryUsuarios do
begin
Close;
Text :=
' UPDATE usuarios SET Usu_Login = :Usu_Login ' +
' , Usu_Senha = :Usu_Senha ' +
' , Usu_Apelido = :Usu_Apelido ' +
' , Usu_Privilegio = :Usu_Privilegio ' +
' WHERE Usu_Login = :Usu_Login ';
ParamByName('Usu_Login').AsString := LEdtLogin.Text;
ParamByName('Usu_Senha').AsString := LEdtSenha.Text;
ParamByName('Usu_Apelido').AsString := LEdtApelido.Text;
ParamByName('Usu_Privilegio').AsInteger := nivel;
ExecSQL;
end;

//2-sem parâmetros
with DMCavi.QryUsuarios do
begin
Close;
Text :=
' UPDATE usuarios SET Usu_Login = ' + QuotedStr(LEdtLogin.Text) + // acaba com o monte de aspas a função quotedstr()
' , Usu_Senha = ' + QuotedStr(LEdtSenha.Text) +
' , Usu_Apelido = ' + QuotedStr(LEdtApelido.Text) +
' , Usu_Privilegio = ' + QuotedStr(IntToStr(nivel)) +
' WHERE Usu_Login = ' QuotedStr(LEdtLogin.Text) +;
ExecSQL;
end;

// acaba com o monte de aspas a função quotedstr()
//('+ '''' + LEdtLogin.Text + '''' +')

//a)para Unknow column 'admin', é um field da tabela Admin?
// se nao for: as vezes a tua query [QryUsuarios] tem fields adicionados nao dinamicamente o admin por ser uma destas
// utilize uma query temporaria para estas rotinas.. qryAux ou crie em temop de execuçaão direto uma ex
//Ex: usto muito isto eh muito util

with TQuery.Create(nil) do
try
Close;
DataBase := '';//nome da sua database...
Text :=
' UPDATE usuarios SET Usu_Login = ' + QuotedStr(LEdtLogin.Text) + // acaba com o monte de aspas a função quotedstr()
' , Usu_Senha = ' + QuotedStr(LEdtSenha.Text) +
' , Usu_Apelido = ' + QuotedStr(LEdtApelido.Text) +
' , Usu_Privilegio = ' + QuotedStr(IntToStr(nivel)) +
' WHERE Usu_Login = ' QuotedStr(LEdtLogin.Text) +;
ExecSQL;
finally
Free;
end;
_________________
- Compartilhe seus conhecimentos -

[BrunoMoreyra]

boa tarde,

tente da seguinte forma

[delrio.lucas]

Muito Obrigado aos dois!

Valeu, deu certo!