Avatar billede vagngart Nybegynder
21. februar 2001 - 17:58 Der er 9 kommentarer og
1 løsning

Opret tabeller i access online

Hvad er galt her ??
Jeg skal kunne oprette x antal nye tabeller i en Access database
(tilføjelse af felter klarer jeg fint)

<%@ Language=VBScript %>
<%
If Request.Form(\"action\")=\"create\" Then

Set Conn = Server.Createobject(\"ADODB.Connection\")
  strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" &_
    \"DBQ=\" & Server.Mappath(\"/databaser/DB.mdb\") & \"\"
  Conn.Open strDSN

SQL=\"CREATE TABLE \"&Keyword&\"(NR integer not null primary key)\"
conn.Execute(SQL)
Response.Write \"din tabel er nu oprettet\"
%>
<HTML>
<BODY>
<P>Opret en analyse</P>
<P><form action=test.asp method=post >
<INPUT  name=Keyword ><br>
<INPUT name=action type=submit value=create><br>
<INPUT name=reset type=reset value=Reset>
</form></P>
</BODY>
</HTML>
Avatar billede netsrac Praktikant
21. februar 2001 - 18:00 #1
SQL=\"CREATE TABLE \"&Keyword&\" (NR integer not null primary key)\"

måske ?
Avatar billede tdaugaard Nybegynder
21. februar 2001 - 18:01 #2
Nu ved jeg ikke helt med Access, men i MySQL skal man bruge:

CREATE TABLE tabel (id int(6) auto_increment, PRIMARY KEY(id));

det er bare et eksempel
Avatar billede tdaugaard Nybegynder
21. februar 2001 - 18:02 #3
glemte lige not null

CREATE TABLE tabel (id int(6) auto_increment NOT NULL, PRIMARY KEY(id));
Avatar billede vagngart Nybegynder
21. februar 2001 - 18:29 #4
Problemet ligger i at jeg ikke på forhånd kender navnet på tabellen - navnet hentes fra inputfeltet i formularen
Avatar billede tdaugaard Nybegynder
21. februar 2001 - 18:30 #5
vagngart:>

sql=\"CREATE TABLE \" & tabel & \" (id int(6) auto_increment, PRIMARY KEY(id));\"
conn.execute(sql)


Avatar billede vagngart Nybegynder
21. februar 2001 - 18:37 #6
Tja nu får jeg flg. fejl

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl i CREATE TABLE-sætningen.
Avatar billede tdaugaard Nybegynder
21. februar 2001 - 18:44 #7
som jeg sagde .. jeg ved ikke med access men mit forslag byggede på MySQL ..
men hvilken fejl fik du da i dit eget forsøg ?
Avatar billede vagngart Nybegynder
21. februar 2001 - 18:49 #8
tdaugaard:>
tak for dine altid hurtige svar!

Men jeg fik sammefejl :-(
Det må sg... da være muligt at lave denne lille manøvre.
Ellers må jeg jo over i MySql - dog lidt tungt når dette kun skal bruges til en demo på PWS.

Avatar billede henrikbr Nybegynder
21. februar 2001 - 18:57 #9
Hvad med:


<%@ Language=VBScript %>
<%
Dim Keyword

If Request.Form(\"action\")=\"create\"  AND Len(Request.Form(\"Keyword\")) > 0 Then

Keyword = Request.Form(\"Keyword\")

Set Conn = Server.Createobject(\"ADODB.Connection\")
  strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \" &_
    \"DBQ=\" & Server.Mappath(\"/databaser/DB.mdb\") & \"\"
  Conn.Open strDSN

SQL=\"CREATE TABLE \" & Keyword & \"(NR integer not null primary key);\"
conn.Execute(SQL)
Response.Write \"din tabel er nu oprettet\"
%>
<HTML>
<BODY>
<P>Opret en analyse</P>
<P><form action=test.asp method=post >
<INPUT  name=Keyword ><br>
<INPUT name=action type=submit value=create><br>
<INPUT name=reset type=reset value=Reset>
</form></P>
</BODY>
</HTML>
Avatar billede vagngart Nybegynder
21. februar 2001 - 19:03 #10
henrikbr:>

Takker
Selfølgelig hvor tumpet kan man være :-)
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
Kurser inden for grundlæggende programmering

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