Hent tabel navnet

--- noget i denne stil?


Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database.mdb")

Const adSchemaTables = 20
Set rs = conn.OpenSchema(adSchemaTables)

Do Until rs.EOF
    If rs.Fields("TABLE_TYPE") = "TABLE" Then
        Response.Write rs("TABLE_NAME") & "<br>"
    End If

    rs.MoveNext
Loop

rs.Close
conn.Close

http://msdn.microsoft.com/library/en-us/ado270/htm/mdcstschemaenum.asp

Lige det jeg manglede :)
Bare smid et svar så får du de 30 point

Du skulle tilfeldigvis ikke lige vide hvordan jeg oprette en tabel fra en asp side også ??

Du kan oprette en tabel ved at bruge ADOX.

http://www.4guysfromrolla.com/webtech/013101-1.shtml

Du kan selvfølgelig også bruge SQL kommandoen CREATE TABLE

http://www.aspmessageboard.com/forum/showMessage.asp?M=678&P=1&F=21

men med ADOX har du flere muligheder (bl.a. også at oprette en helt ny database)

Kjulius > Jeg kan ikke få det til at virke :(

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db.mdb")

Dim strSQL
strSQL = "CREATE TABLE test (name varchar(50), age int)"
conn.Execute strSQL


Conn.Close
Set Conn = Nothing
%>

Du mangler lige at åbne database, inden du kalder .Execute() :)

Conn.Open DSN

Tak.. Du får dine point :)