slet en tabel i en db og opret en ny

Givet du har en forbindelse til databasen skal du eksekvere følgende sql
Ønsker du at slette en tabel i databasen så
  Drop Table dit_tabel_navn
Ønsker du istedet at tømme en tabel for data bruger du
  Truncate Table dit_tabel_navn
Ønsker du at slette selve databasen ja så
  Drop Database dit_database_navn
Ønsker du at oprette en tabel så
  Create Table main_number(
    id Integer,
    title Varchar(255),
    tekst Note,
    dato Date,
    Primary Key (id)
  )
Jeg er lidt i tvivl omkring syntaksen for Note og Date i sql til Access, og jeg ved jo heller ikke om du kører access
Men et godt sted at kigge og prøve sig frem er http://sqlzoo.net
Nu skriver du så også hvordan du kan oprette en ny database, jeg tror kun du ønsker at oprette en tabel, men du skal da bare vide at det er muligt at oprette en hel database  også. Igen så afhænger koden her af hvilken type database, samt hvilke komponenter du har på serveren. Så kode hertil undlader jeg :o)

hvis jeg bruger "Truncate" restarter den så id !?

altså hvis jeg har en id der hedder 142 og laver en "Truncate" starter den så forfra med 1 til første record eller skal jeg gøre noget mere for at kunne gøre det !?

samt læg venligst et svar..

Ja se det er jo så et godt spørgsmål, jeg tolker Truncate som at den tømmer tabellen, men derfor behøves den jo ikke nulstille id´et
Men jeg ved det faktisk ikke, har ikke haft behov for også nulstille det
Men det må du nemt kunne lave en test på hvis det er :o)

jeg får denne fejl

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/info.asp, line 14

Truncate Table "info_pro"
---------------^


min kode er dette
Truncate Table "info_pro"

strSQL = "SELECT [ID], [Name], [Year], [Link2] FROM info_list"
strSQL = strSQL & " WHERE [Link2] NOT LIKE '%gram%'"
strSQL = strSQL & " AND [Link2] NOT LIKE '%tion%'"
strSQL = strSQL & " ORDER BY [ID] ASC;"
Set objRS = objConn.Execute(strSQL)

hvad er fejlen !?

Prøv dette

strSQL = "SELECT [ID], [Name], [Year], [Link2] FROM info_list"
strSQL = strSQL & " WHERE [Link2] NOT LIKE '%" & gram & "%'"
strSQL = strSQL & " AND [Link2] NOT LIKE '%" & tion & "%'"
strSQL = strSQL & " ORDER BY [ID] ASC;"
Set objRS = objConn.Execute(strSQL)