---
title: "Access Create Table"
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/114460-access-create-table"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "LR^evil.sid"
published: "2004-10-26T16:06:02.000Z"
updated: "2004-10-26T17:31:58.000Z"
replies: 15
views: 610
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/databaser-sql/114460-access-create-table"
---

# Access Create Table

## #1 — LR^evil.sid, 2004-10-26T16:06Z

Jag stal källkoden från en MySQL-Tabell, och har ändrat lite skall väl erkännas,  men det vill inte fungera. Hur skall det se ut egentligen?

Felmeddelande: Syntaxfel i CREATE TABLE-instruktion.

```
Sub CreateTable(StrTxt)
	StrTxt = ReservedWords(StrTxt)
	If StrTxt = False Then Exit Sub
	Dim SQL: SQL = "CREATE TABLE ["&StrTxt&"] ("
	         SQL = SQL & "[Id] int(6) unsigned NOT NULL auto_increment,"
	         SQL = SQL & "[Container] text(255) NOT NULL default '' COMMENT 'Detta fält innehåller den synliga datan för tabellen',"
	         SQL = SQL & "[Added] date NOT NULL default '0000-00-00' COMMENT 'Det datum användaren valt att lägga in',"
	         SQL = SQL & "PRIMARY KEY ([Id])"
	Dim oCon: Set oCon = Server.CreateObject("ADODB.Connection")
	oCon.Open Application("ADODB_BdyTag_mdb")
	oCon.Execute(SQL)
	oCon.Close: Set oCon = Nothing
End Sub
```

Permalänk: https://www.webforum.nu/p/114460

## #2 — LarsG, 2004-10-26T16:21Z

```
SQL = "CREATE TABLE ["&StrTxt&"] ("
SQL = SQL & "Id counter NOT NULL ,"
SQL = SQL & "Container varchar(255) NOT NULL default '' ,"
SQL = SQL & "Added date NOT NULL ,"
SQL = SQL & "PRIMARY KEY (Id))"
```

Varför skapar du tabller i applikationskod? Låter ytterst suspsekt i mina öron.

Permalänk: https://www.webforum.nu/p/1468674

## #3 — LR^evil.sid, 2004-10-26T16:23Z

Felmeddelande: Syntaxfel i fältdefinition.

\[.Red\] Jag gör det för ett projekt så vi slipper använda oss av filer, det är inte jag som skall administrera projektet när det är klart

Permalänk: https://www.webforum.nu/p/1468676

## #4 — LarsG, 2004-10-26T16:36Z

Ja visst. Access har ett så konstigt begrepp om hur default anges

```
SQL = "CREATE TABLE ["&StrTxt&"] ("
SQL = SQL & "Id counter NOT NULL ,"
SQL = SQL & "Container varchar(255) NOT NULL  ,"
SQL = SQL & "Added date NOT NULL ,"
SQL = SQL & "PRIMARY KEY (Id))"
```

Det går inte att ange en sträng som default.

Permalänk: https://www.webforum.nu/p/1468683

## #5 — LR^evil.sid, 2004-10-26T16:37Z

Samma fel

Permalänk: https://www.webforum.nu/p/1468686

## #6 — LarsG, 2004-10-26T16:43Z

Kan du eka ut strängen och testa den direkt i Access?

Permalänk: https://www.webforum.nu/p/1468690

## #7 — LR^evil.sid, 2004-10-26T16:48Z

Um... Hur gör jag det?

Permalänk: https://www.webforum.nu/p/1468693

## #8 — LarsG, 2004-10-26T16:54Z

Det lär finnas något funktion för att ställa direkta SQL-frågor i Access. Jag vet inte mer än så.

Permalänk: https://www.webforum.nu/p/1468696

## #9 — LR^evil.sid, 2004-10-26T16:55Z

Det här blev strängen iaf så kanske du kan testa den

```
CREATE TABLE [testa] (Id counter NOT NULL ,Container varchar(255) NOT NULL ,Added date NOT NULL ,PRIMARY KEY (Id))
```

Permalänk: https://www.webforum.nu/p/1468697

## #10 — LarsG, 2004-10-26T17:11Z

Jag har aldrig sett en access-databas. Inte ens på vykort.

Om du lägger primary direkt vid ID då och slänger \[\] in för alla namn?

```
CREATE TABLE [testa] ([Id] counter NOT NULL primary ley,[Container] varchar(255) NOT NULL ,[Added] date NOT NULL)
```

Permalänk: https://www.webforum.nu/p/1468708

## #11 — LR^evil.sid, 2004-10-26T17:11Z

hmm.. hittade var man kör frågorna och tabellen skapas utan problem

Permalänk: https://www.webforum.nu/p/1468709

## #12 — LarsG, 2004-10-26T17:14Z

Använder du access eller Jet som drivrutin? (Dvs hur gör du connect?) Jag vet att Jet klarar mer än Access.

Permalänk: https://www.webforum.nu/p/1468714

## #13 — LR^evil.sid, 2004-10-26T17:14Z

Jet

```
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=x:\..\data.mdb;"
```

Permalänk: https://www.webforum.nu/p/1468715

## #14 — LR^evil.sid, 2004-10-26T17:15Z

Får fortfarande 'Syntaxfel i fältdefinition.' med: 

```
CREATE TABLE [testa] ([Id] counter NOT NULL primary key,[Container] varchar(255) NOT NULL ,[Added] date NOT NULL
```

Permalänk: https://www.webforum.nu/p/1468716

## #15 — LR^evil.sid, 2004-10-26T17:26Z

Hupp! Nu fungerar det:

```
Sub CreateTable(StrTxt)
	StrTxt = ReservedWords(StrTxt)
	If StrTxt = False Then Exit Sub
	Dim SQL: SQL = "CREATE TABLE ["&StrTxt&"] ([Id] counter NOT NULL ,[Container] varchar(255) NOT NULL ,[Added] date NOT NULL ,PRIMARY KEY ([Id]))"
	Dim oCon: Set oCon = Server.CreateObject("ADODB.Connection")
	oCon.Open Application("ADODB_BdyTag_mdb")
	oCon.Execute(SQL)
	oCon.Close: Set oCon = Nothing
End Sub
```

Permalänk: https://www.webforum.nu/p/1468722

## #16 — LarsG, 2004-10-26T17:31Z

KO

Permalänk: https://www.webforum.nu/p/1468725

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/114460-access-create-table