Predmet:Dodavanje polja u tabelu
Imam import u bazu podataka (dbf,xml,csv,xlsx etc..)
Da si pojednostavim "unos" kreiram si tabelu DjelatTemp
DoCmd.DeleteObject acTable, "DjelatTemp"
' Brišem staru
CurrentDb.TableDefs("ImortTabla").Name = "DjelatTemp
" 'Preimenujem
DoCmd.RunSQL ("ALTER TABLE DjelatTemp ADD COLUMN [UbaciRadnika] YesNo")
'Ubacujem polje da se zabilježi koji če se ubacivati
ALTER TABLE mi postavi polje ali u nije dobar format pa onda puštam kod
With DBEngine(0)(0).TableDefs("DjelatTemp").Fields("UbaciRadnika")
.Properties.Append .CreateProperty("DisplayControl", dbInteger, CInt(acCheckBox))
End With
1.Nekad mi ga odradi a nekad ne u čemu je problem ?
2.Kako mogu Fields("UbaciRadnika") poslati na prvo mjesto u tabeli ?
Ovaj post je ureden
1
puta. Posljednja izmjena 20.12.2010 23:46 od strane zxz.