Efter ti år i London, Madrid, Paris og Utrecht kommer Sabios AI-fokuserede program af arrangementer om kundeoplevelser, ‘Disrupt’, for første gang til Danmark.
Følgende kode har jeg skrevet i Delphi henter tabelnavne
function TF_database.GetTablesFromDB(Var Dataset : TADODataset; var Connection : TADOConnection) : TStringList; { Pre : En åben connection Post : Retunere alle tabel navne fra en database som ikke er sytemtabeller } var TypeField,NameField : TField; TableType : String; SystemTables : boolean; begin Connection.OpenSchema(sitables,emptyparam,emptyparam,Dataset); TypeField := DataSet.FieldByName('TABLE_TYPE'); NameField := DataSet.FieldByName('TABLE_NAME'); while not DataSet.EOF do begin TableType := TypeField.AsString; if (TableType = 'TABLE') or (TableType = 'VIEW') or (SystemTables and (TableType = 'SYSTEM TABLE')) then begin result.Add(Dataset.fieldbyname('Table_Name').AsString) end; DataSet.Next; end; end;
Men da det bygger på ADO skal du kunne overføre det.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.