[b]Parametros em SQL[/b]
Ola,
Tenho o seguinte código:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´SELECT Campo1, Campo2, Campo3, Campo4´);
Query1.SQL.Add(´From Tabela1´);
Qyery1.SQL.Add(´Where (Campo1 = :Var1) and (Campo2 = :Var2)´);
Query1.SQL.Add(´Order By Campo3´);
Query1.Parameters.ParamByName(´Var1´).Value := Valor1.text;
Query1.Parameters.ParamByName(´Var2´).Value := Valor2.text;
Query1.Open;
Na execução do programa, os valores são selecionados corretamente, entretanto, uma mensagem de erro aparece dizendo: ´Too Few parameter. Expected 4´
Por que???
Obrigado
Tenho o seguinte código:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´SELECT Campo1, Campo2, Campo3, Campo4´);
Query1.SQL.Add(´From Tabela1´);
Qyery1.SQL.Add(´Where (Campo1 = :Var1) and (Campo2 = :Var2)´);
Query1.SQL.Add(´Order By Campo3´);
Query1.Parameters.ParamByName(´Var1´).Value := Valor1.text;
Query1.Parameters.ParamByName(´Var2´).Value := Valor2.text;
Query1.Open;
Na execução do programa, os valores são selecionados corretamente, entretanto, uma mensagem de erro aparece dizendo: ´Too Few parameter. Expected 4´
Por que???
Obrigado
Dieguito
Curtidas 0
Respostas
Bugbear
29/07/2003
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´SELECT Campo1, Campo2, Campo3, Campo4´);
Query1.SQL.Add(´From Tabela1´);
Qyery1.SQL.Add(´Where (Campo1 = :Var1) and (Campo2 = :Var2)´);
Query1.SQL.Add(´Order By Campo3´);
Query1.ParamByName(´Var1´).AsString := Valor1.text;
Query1.ParamByName(´Var2´).AsString := Valor2.text;
Query1.Open;
Colega eu uso assim tenta ai pra ver se da certo , manda resposta para ver se deu , falow abraço
Query1.SQL.Clear;
Query1.SQL.Add(´SELECT Campo1, Campo2, Campo3, Campo4´);
Query1.SQL.Add(´From Tabela1´);
Qyery1.SQL.Add(´Where (Campo1 = :Var1) and (Campo2 = :Var2)´);
Query1.SQL.Add(´Order By Campo3´);
Query1.ParamByName(´Var1´).AsString := Valor1.text;
Query1.ParamByName(´Var2´).AsString := Valor2.text;
Query1.Open;
Colega eu uso assim tenta ai pra ver se da certo , manda resposta para ver se deu , falow abraço
GOSTEI 0