Tablo Yedekleme

[ozcank]

Bu şekilde şirketi buluyorum ;

Kod: Tümünü seç

procedure TEmanet_Giris.EmanetBilgileriniYedekleme1Click(Sender: TObject);
Var
SIRKET:String;
begin
SIRKET:=Form1.DBLookupComboBox1.Text;
ShowMessage (SIRKET);
eyedek.close;
eyedek.sql.clear;
eyedek.sql.add('IF OBJECT_ID(''SIRKET..TBLEMANETYDK '') IS NOT NULL ');

tablo olduğu halde yok diyor.

[kimimben]

SIRKET değişkeni hangi amaçla kullanılmakta ?
SQL sorgusunu kontrol ettiniz mi ?

[ozcank]

Bunun için; DATABASES ismini DBLookupComboBox1.Text da seçerek programa giriyorum tek bir DATABASES yok farklı da olabiliyor.

Kod: Tümünü seç

eyedek.sql.add('IF OBJECT_ID(''databasesismi..TBLEMANETYDK '') IS NOT NULL ');

bende değişken le atamak istedim ama olmadı.

Kod: Tümünü seç

eyedek.sql.add('IF OBJECT_ID(''SIRKET..TBLEMANETYDK '') IS NOT NULL ');

[kimimben]

QuotedStr

[ozcank]

Bu şekilde kullandım değişen bir şey yok;

function QuotedStr(const SIRKET: string): string;
begin
END;

[kimimben]

Bu şekilde kullandım değişen bir şey yok;

function QuotedStr(const SIRKET: string): string;
begin
END;

Değişen birşey olmaması normal.
Çünkü yazdığınız QuotedStr fonksiyonu hiçbir iş yapmıyor.


System.SysUtils.pas içersine gözatmayı denediniz mi ?

[ozcank]

System.SysUtils.pas içersine gözatmayı denediniz mi ?
System.SysUtils.pas bendeki unitlerde yok. Nerde ve nasıl kullanacağımı söylerseniz daha çok sevinirim.

[kimimben]

SysUtils.pas'a bakmayı denediniz mi ?

[ozcank]

sysUtils.pas amı ekleyecem ?

[kimimben]

sysUtils.pas amı ekleyecem ?

Eklemenize gerek yok.
Orda aratırsanız zaten mevcut.

[ozcank]

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Registry,Buttons, ComCtrls, jpeg, ExtCtrls, Menus, DB,
ADODB;
burda mevcut.

orda dediğiniz nerde inanın söylediklerinizden hiçbirşey ANLAMADIM. Çok özür.

[kimimben]

sysUtils.pas amı ekleyecem ?

Ayrıca bu cümleniz beni, dikkatli okumadığım için,birkaç saniye düşündürdü...

[kimimben]

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Registry,Buttons, ComCtrls, jpeg, ExtCtrls, Menus, DB,
ADODB;
burda mevcut.

orda dediğiniz nerde inanın söylediklerinizden hiçbirşey ANLAMADIM. Çok özür.

uses bloğu içersinde bulunan, SysUtils unitini açtıktan sonra QuotedStr fonksiyonunu arttınız mı ?

[ozcank]

Uses bloğu ve SysUtils unitim yok benim Unit lerim hepsinin isimleri var .

[ozcank]

QuotedStr bütün unitler de arattım bu function yok.