Rename en tabel i Access 2000

marker den og tryk på F2

eller højreklik på den og vælg omdøb....

ahh glem det...!!!!! Idioten (:mig) så ikke at kategorien var Visual Basic....

Ja det vidste jeg jo så godt! :-)

If you think that you can do it in SQL then I will say that I don NOT think you can!
You can create a new table with the new name and field definitions. Then you can copy the data from the originla table and then delete the original table.

Hi Terry,

Ya thats right but I'm 100 percent sure that I by VB-code can rename a table in access, I remember that I did it once, but I totally forgot how to do it...

telep>You can copy one table into a new table using this SQL

SELECT  * INTO YourNewTable
FROM YourOldTable;

Problem is that indexes etc. are NOT created and also if your table has relationships to others, this also can cause problems.
So there are many things to concider before dong this.

There is NO SQL (that I know) which can do this.

RENAME YourOldTable TO YourNewTable 'Sorry

:o)

Hi Terry,

Was that last sentence supose to work ? It doesn't to me...

Here is all my code so far:

Dim datdb As Database
Dim tdf As TableDef
Dim strTabelnavn As String

Private Sub Command1_Click()
strTabelnavn = "dbo_kunde"

datdb.Execute "SELECT * INTO temporary" & strTabelnavn & " From dbo_Kunde Where (PrivatEmail Is Not Null) Or (FirmaEmail Is Not Null)"

datdb.TableDefs.Delete "dbo_Kunde"

datdb.Execute "RENAME temporarydbo_kunde TO dbo_Kunde"

For Each tdf In datdb.TableDefs

    If InStr(1, tdf.Name, "temporary", vbTextCompare) = 0 Then
        tdf.Name = Mid(tdf.Name, 10)
    End If
Next tdf

End Sub

Private Sub Form_Load()
Set datdb = DBEngine.Workspaces(0).OpenDatabase("C:\VB\myown\kunde\60\v2\test.mdb")
End Sub

Dim datdb As Database
Dim tdf As TableDef

Set datdb = CurrentDb
   
    With datdb
           
        For Each tdf In .TableDefs
            If tdf.Name = "OldName" Then
           
                tdf.Name = "NewName"
            End If
           
        Next tdf

    End With

Hi Terry,

Well I would very much like to give you the points for this question, but it seems like something isn't working out right. When I click the Accept button I get a message saying that the question already is accepted... but it's not...

I will call admin

Well now it works fine.. ????????????????? Thats my brain rigth now!

I think that eksperten have their server on a 486! Things are going VERY slow at the moment.
It sworking now though, thanks :o)

Strange things happens....

Thank you too!

Et lille spørgsmål.......

Hvilken reference bruges til denne kode?

MVH

JoBless

29/01-2002 11:45:15 ? DAO!

Ja!

Tak for det, jeg havde lige netop fået det til at køre med DAO 3.6 da jeg fik mailen vedr. jeres svar.

Endnu engang, tak for hjælpen.