Avatar billede remmib Nybegynder
03. november 2001 - 17:17 Der er 9 kommentarer og
1 løsning

Opret og sletning af kolonne i en eksisterende tabel

Hvordan opret og sletning man en autonummer kolonne i en eksisterende tabel, via en makro??\'

På forhånd tak

Brian Kristensen
Avatar billede nih Novice
03. november 2001 - 20:05 #1
Sub tilføj()
    Dim dbs As Database
    Set dbs = CurrentDb
    dbs.Execute \"ALTER TABLE tabel1 \" _
        & \"ADD COLUMN feltNavn bit;\"
   
End Sub
Sub slet()
    Dim dbs As Database
    Set dbs = CurrentDb
    dbs.Execute \"ALTER TABLE tabel1 \" _
        & \"DROP COLUMN feltNavn;\"
   
End Sub

Niels
Avatar billede nih Novice
03. november 2001 - 20:07 #2
Indsæt proceduerene i et nyt modul og kald dem fra en makro eller direkte fra en knap.

Ps - Det er DAO, hvis du anvender Access 2000, skal du sætte refferencen til DAO.

Niels
Avatar billede nih Novice
03. november 2001 - 20:17 #3
Autonummer = COUNTER - ikke BIT

      dbs.Execute \"ALTER TABLE tabel1 \" _
        & \"ADD COLUMN feltNavn COUNTER;\"

Sorry Niels
Avatar billede remmib Nybegynder
03. november 2001 - 23:03 #4
Jeg Får følgende fejl på linje \"Dim dbs As Database\"

Jeg ved helle ikke hvor jeg skal skrive DAO, dette er min første modul.

Jeg bruger Access XP, men det er nok det sammen som 2000
Avatar billede nih Novice
03. november 2001 - 23:36 #5
Det er fordi jeg bruger Access 97 = DAO

Du kan, når dit modul er åbent, under funktioner -> referencer fjerne ADO (active Data objects) og sætte et \'hak\' ved DAO. Så skulle min kode virke.

Eller du kan omskrive til ADO - Se i din egen hjælp.

Niels
Avatar billede nih Novice
03. november 2001 - 23:44 #6
Sub TilfAdo()

CurrentProject.Connection.Execute \"ALTER TABLE tabel1 ADD COLUMN feltNavn bit;\"

End sub

Virker den her ??? - Jeg har \'kun\' A97, så jeg kan ikke teste den !! 

Niels
Avatar billede nih Novice
03. november 2001 - 23:45 #7
CurrentProject.Connection.Execute \"ALTER TABLE tabel1 ADD COLUMN feltNavn COUNTER;\"

Avatar billede remmib Nybegynder
04. november 2001 - 00:58 #8
Mange tak

Du skal lige skrive et eller andet, så du kan få dine point, og det skal være i for af et svar.
Avatar billede nih Novice
04. november 2001 - 01:16 #9
Brugte du ADO eller DAO.

Niels
Avatar billede remmib Nybegynder
04. november 2001 - 12:36 #10
Ingen af delene, jeg har simpel hen sat udtrykket \"ALTER TABLE tabel1 ADD COLUMN feltNavn COUNTER;\" ind i en makro, der hedder kørSQL og det virker bare.

Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester