firebird tabloya yeni alan ekleme

[unnamed]

merhaba,forumda arama yaptım eski bir mesajdan bu yöntemi buldum ama çalışmıyor daha doğrusu oraya alan adını ve tablo adını nasıl girecem.onu bulamadım .parambyname fonksiyonunu kullanmayı denedim fakat hata veriyor. ben mesela parametreyi "alanad" giriyorum .hata olarak alanad diye
bir alan yok diyor.

ben kodu bir yazayım :

Kod: Tümünü seç

ibsql1.SQL.Add('select * from rdb$relation_fields db');
ibsql1.SQL.Add('where db.rdb$field_name = '+#39+':alanad'+#39);
ibsql1.ParamByName('alanad').AsString:=edit1.Text;
ibsql1.SQL.Add('and db.rdb$relation_name = '+#39+'STOKMIKTAR'+#39);
ibsql1.ExecQuery;

if ibsql1.Fields[0].IsNull Then
begin
  ibsql1.sql.Clear;
  ibsql1.sql.Add('ALTER TABLE STOKMIKTAR add :alanadi integer');
  ibsql1.ParamByName('alanadi').AsString:=edit1.text;
  ibsql1.ExecQuery;
end;

[mucit]

Merhaba,

Table'a yeni bir alan eklerken parametre kullanamıyoruz. Bunun yerine

Kod: Tümünü seç

  ibsql1.sql.Clear; 
  ibsql1.sql.Add('ALTER TABLE STOKMIKTAR ADD ' + Edit1.Text + ' INTEGER'); 
  ibsql1.ExecQuery;

şeklinde yapabilirsiniz.

Kolay gelsin.

[unnamed]

teşekkürler akşam deneyecem .