Søg
Avatar billede schoesler Nybegynder
04. juni 2003 - 16:58 Der er 20 kommentarer og
1 løsning

SQL, hvordan ser koden ud hvis jeg skal have et felt med Yes/No

Private Sub Command1_Click()

Dim dbs As Database
Set dbs = OpenDatabase("C:\TESTdb.mdb")

dbs.Execute "Alter Table TABLE1 add janus text"

DoCmd.Quit


End Sub
Avatar billede overchord Nybegynder
04. juni 2003 - 17:27 #1
ved ikke helt hvad din pastede kode har med spoergsmaalet at goere, men for Yes/No bruger du vel bare True/False istedet
Avatar billede schoesler Nybegynder
04. juni 2003 - 17:33 #2
Jeg prøver på at sætte et yes/no felt ind i en tabel kaldet TABLE1
Avatar billede overchord Nybegynder
04. juni 2003 - 17:47 #3
ok :

dim dbs as database
dim tdf as TableDef, fld as Field

Set dbs = OpenDatabase("C:\TESTdb.mdb")

set tdf = dbs.TableDefs!TABLE1

set fld = tdf.CreateField("JaNej",dbBoolean)

tdf.Fields.Append fld
Avatar billede schoesler Nybegynder
04. juni 2003 - 17:54 #4
Får debug error på:

set fld = tdf.CreateField("JaNej",dbBoolean)
Avatar billede henrik13 Nybegynder
04. juni 2003 - 18:08 #5
>> schoesler
Koden virker hos mig, du må havde en anden fejl.
Vh Henrik13
Avatar billede schoesler Nybegynder
04. juni 2003 - 18:10 #6
prøver igen
Avatar billede schoesler Nybegynder
04. juni 2003 - 18:12 #7
er det måske fordi jeg kører engelsk version af access 2000
Avatar billede overchord Nybegynder
04. juni 2003 - 18:27 #8
Jeg sidder selv i Skotland og bruger UK versions af Access 97 & 2000. Har du chekket syntaxen paa CreateField? Det kan vaere at der mangler en parameter som jeg lykkeligt har glemt alt om :-)
Avatar billede schoesler Nybegynder
04. juni 2003 - 18:29 #9
vil lige tjekke!
Avatar billede henrik13 Nybegynder
04. juni 2003 - 18:31 #10
>> schoesler
Ville det hjælpe dig vis jeg sendte dig min.
Vh Henrik13
Avatar billede schoesler Nybegynder
04. juni 2003 - 18:32 #11
gider du det? jan@schoesler.com
Avatar billede henrik13 Nybegynder
04. juni 2003 - 18:34 #12
Jeg kører xp hvordan vil du havde den.
Avatar billede schoesler Nybegynder
04. juni 2003 - 18:37 #13
Denne kode virker også

Private Sub Command1_Click()

Dim dbs As Database

Set dbs = OpenDatabase("C:\TESTdb.mdb")

dbs.Execute "Alter table TABLE1 add janus yesNo"


End Sub
Avatar billede schoesler Nybegynder
04. juni 2003 - 18:37 #14
2000 version
Avatar billede henrik13 Nybegynder
04. juni 2003 - 18:54 #15
Er sendt.  :o)
Avatar billede schoesler Nybegynder
04. juni 2003 - 19:04 #16
Næ den tilsendte fil kan ikke køre hos mig jeg får en runtime error '13'
'henrik' send lige et svar så vil jeg dele point.
Avatar billede henrik13 Nybegynder
04. juni 2003 - 19:08 #17
Nej Det er overchord der har leveret koden, og jeg er glad for at havde fået koden, så jeg syntes du skal give ham alle poientene.
Vh Henrik13
Avatar billede henrik13 Nybegynder
04. juni 2003 - 19:09 #18
Ps Jeg har dansk access XP, hvor den virker.
Avatar billede overchord Nybegynder
05. juni 2003 - 13:25 #19
Tak for point, men jeg ville da gladeligt have delt dem med dig henrik. Isaer eftersom vi begge bidragede med forskellige loesnings-metoder :-)
Avatar billede henrik13 Nybegynder
05. juni 2003 - 13:29 #20
>> overchord Som jeg skrev, jeg er mest glad for koden, og det var jo din kode jeg brugte, jeg lagde den bare i et modul, og sendte den, og det mener jeg ikke mand bør tage noget for.
Vh Henrik13
Avatar billede schoesler Nybegynder
05. juni 2003 - 14:45 #21
Kan det være rigtigt at man ikke kan slette en kolonne i en database med SQL?
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
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
en word dotx fil stilles om til at blive gemt i skyen Af per2edb i Access 9 16/04/202620:11 21/04/202615:43
AI integreret i Access Af per2edb i Access 3 06/04/202610:42 06/04/202612:58
Autonummerering Af hlnviv i Access 2 06/03/202606:24 06/03/202607:48
stigende sortering på et Link felt Af hlnviv i Access 6 03/03/202613:18 04/03/202608:09
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
11/1013:35 Bruger på Win11 Af lurup i Browsere
07/1022:52 Google beskeder har/havde en bug, så den sendte tilfældige gamle beskeder gemt indeni nye beskeder efter skifte til ny Samsungtelefon via Samsung Smart Switch Af KennethLykke i Apps til Android
05/1010:31 Min IPAD vil ikke oplade. Af Nørdnot i Mac
04/1018:04 Findes der et "Papir-kurv" symbol, man kan sætte på Firefox og Google Chrome ? (For oven) Af Ikke-ekspert i Browsere
03/1012:14 Ang udskrift Canon mb5050 Af made18 i Printere
White papers
Flere white papers »