первичные ключи не ставяться...

Тема в разделе "Borland C++ Builder & Kylix", создана пользователем -, 28 фев 2008.

  1. Гость

    подскажить пожалуйста , я переношу базу с MS sql server в Access,база вроде переноситься , а вот первичные ключи в новой базе не ставяться,подскажите что надо здесь дописать
    код:
    Код (Text):
     for(int j=0;j< ADOTable1->FieldCount;j++) // список полей таблицы i
    {
    fn= ADOTable1->Fields->Fields[j]->FieldName;
    //   AnsiString s1=ADOTable1->MasterFields;
    ft= ADOTable1->Fields->Fields[j];
    AnsiString s1=ft->KeyFields;
    if(j== ADOTable1->FieldCount-1)  s=s+fn+" "+FieldTypeToString(ft); else
    s=s+fn+" "+FieldTypeToString(ft)+",";
    if(str1.Length()>0){str1+=",";str2+=",";}
    str1+=fn;
    str2=str2+":"+fn;
    }
    AnsiString kfld= ADOTable1->Fields->Fields[0]->KeyFields;
    if(kfld.Length()>0)
    s+=", primary key("+kfld+")";
    else s+=")";
    ADOQuery2->SQL->Text=s;
    ADOQuery2->ExecSQL();    // создание таблиц полей в новой базе
    ADOTable1->First();
     
  2. Гость

    да, надо програмнно...может кто подскажет???
     
Загрузка...

Поделиться этой страницей