tilføj felt i tabel

SQL'en ser nogenlunde således ud:
Alter Table Master add expire1 Text
Alter Table Master add expire2 Text
Alter Table Master add expire3 Text

Denne kan du gemme i en forespørgsel og derefter køre den fra kode eller manuelt

'thomasjepsen' Har aldrig prøvet at lave en SQL forespørgsel, kan du kanne med nogle hints

schoesler
Opret en ny query (i designvisning). Lad være med at tilføje nogen tabellen. Når du så står i designvinduet vælger du menuen Vis/SQL-visning. Så er du faktisk i forespørgslens SQL editor (du kan også vælge det med en af dine eksisterende forespørgsler, så kan du se hvordan det ser ud).
Så kopierer du faktisk blot thomasjepsens forslag ind her og prøver at køre forespørgslen.

Når jeg kopierer thomasjepsens forslag ind i en forespørgsel, fungerer det med kun eet felt. Bruger jeg forslaget direkte med 3 felter får jeg en fejl på ordet "Table". Men det er gsranteret mig, der ikke lige forstår den der SQL.

Flg. fungerer også, omend den er knap så elegant.



Dim SQL1 As String
Dim SQL2 As String
Dim SQL3 As String
SQL1 = "Alter Table 1 add expire1 Text"
SQL2 = "Alter Table 1 add expire2 Text"
SQL3 = "Alter Table 1 add expire3 Text"
DoCmd.RunSQL SQL1
DoCmd.RunSQL SQL2
DoCmd.RunSQL SQL3
MsgBox "Funktionen er udført."

Citat fra bogen "Grundlæggende Programmering i SQL" af Carsten Straaberg:

"Man kan kun slette eller tilføje eet felt ad gangen i en forespørgsel."

Tja, så lærte vi også noget i dag. ;-)

schoesler > Hvordan går det - er dit problem løst?

Hej mugs, nej jeg har ikke fået løst problemmet endnu. Kunne du ikke oprette et svar så vil jeg dele point mellem dig og thomasjepsen

Hej.