title image


Smiley Re: Ermitteln ob ein Wert NULL sein darf
Wie wäre es mit ADOX?





uses ..., ADOX_tlb, ADOInt;



var con: _Connection;

cat: _Catalog;

i: Integer;

begin

con:=CoConnection.Create;

con.Open('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=DB.mdb;', '', '', adConnectUnspecified);

cat:=CoCatalog.Create;

cat.Set_ActiveConnection(con);

for i:=0 to cat.Tables[('Tabelle'].Columns.Count-1 do

if cat.Tables[('Tabelle'].Columns[i].Properties[('Jet OLEDB:Allow Zero Length'].Value then

Memo1.Lines.Add(cat.Tables[('Tabelle'].Columns[i].Name) else

Memo2.Lines.Add(cat.Tables[('Tabelle'].Columns[i].Name);



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: