DatabaseImport

long  DatabaseImport(
   int           database,          // DatabaseOpen'da elde edilen veritabanı tanıtıcı değeri
   const string  table,             // veri eklemek için tablo adı
   const string  filename,          // veri aktarmak için dosya adı
   uint          flags,             // bayrak kombinasyonu
   const string  separator,         // veri ayırıcı
   ulong         skip_rows,         // kaç başlangıç dizgesi atlanacak
   const string  skip_comments      // yorumları tanımlayan karakter dizgesi
   );

//+------------------------------------------------------------------+
//| Komut dosyası başlatma fonksiyonu                                |
//+------------------------------------------------------------------+
void OnStart()
 {
  string csv_filename;
//--- müşteri terminallerinin ortak klasöründen, içe aktarılacak metin dosyalarının adlarını al
  string filenames[];
  if(FileSelectDialog("Tablosunu oluşturmak için CSV dosyası seçin",NULL,
                      "Metin dosyaları (*.csv)|*.csv",
                      FSD_WRITE_FILE|FSD_COMMON_FOLDER,filenames,"veriler.csv")>0)
   {
    //--- seçilen her dosyanın adını göster
    if(ArraySize(filenames)==1)
      csv_filename=filenames[0];
    else
     {
      Print("Dosya seçilirken bilinmeyen hata. Hata kodu ",GetLastError());
      return;
     }
   }
  else
   {
    Print("CSV dosyası seçilmedi");
    return;
   }
//--- veritabanı oluştur veya aç
  string db_filename="İçeAktarmaTest.sqlite";
  int db=DatabaseOpen(db_filename,DATABASE_OPEN_READWRITE|DATABASE_OPEN_CREATE);
//--- İçeAktarmaTest tablosunun mevcut olup olmadığını kontrol et
  if(DatabaseTableExists(db,"İçeAktarmaTest"))
   {
    //--- İçeAktarmaTest tablosunu kaldır
    if(!DatabaseExecute(db,"DROP TABLE IF EXISTS İçeAktarmaTest"))
     {
      Print("İçeAktarmaTest tablosu kaldırılamadı, hata kodu ",GetLastError());
      DatabaseClose(db);
      return;
     }
   }
  //--- csv dosyasından girdileri İçeAktarmaTest tablosuna içe aktar
  long imported=DatabaseImport(db,"İçeAktarmaTest",csv_filename,DATABASE_IMPORT_HEADER|DATABASE_IMPORT_COMMON_FOLDER|DATABASE_IMPORT_APPEND,";",0,NULL);
  if(imported>0)
   {
    Print(imported," satır İçeAktarmaTest tablosuna içe aktarıldı");
    DatabasePrint(db,"SELECT * FROM İçeAktarmaTest",DATABASE_PRINT_NO_INDEX);
   }
  else
    {
     Print("DatabaseImport() başarısız oldu. Hata ",GetLastError());
    }
//--- veritabanı dosyasını kapat ve bunu rapor et
  DatabaseClose(db);
  PrintFormat("%s veritabanı kapatıldı",db_filename);
 }