下面這個(gè)貼子中討論了很多ACCESS中的一些猜想假設(shè)。 Access或其它數(shù)據(jù)庫操作效率問題.歡迎討論 http://topic.csdn.net/u/20090514/10/a93475bd-e67e-45c8-aa1e-87168ba36d02.html#replyachor 引用 55 樓 wwwwb 的回復(fù):: create table是用什么方法？我一般是

下面這個(gè)貼子中討論了很多ACCESS中的一些猜想假設(shè)。

Access或其它數(shù)據(jù)庫操作效率問題.歡迎討論

http://topic.csdn.net/u/20090514/10/a93475bd-e67e-45c8-aa1e-87168ba36d02.html#replyachor

當(dāng)看到這個(gè)猜想的時(shí)候，感覺比較懷疑。因?yàn)?select * into newtable from oldTable，ACCESS需要先從oldTable得到所有字段的定義，然后才能進(jìn)行表的創(chuàng)建。如果猜想成立，就說明ACCESS還有一套什么機(jī)制可以直接在底層對(duì)表的結(jié)構(gòu)進(jìn)行訪問。但select 可以是任意的查詢，這樣也不太可能啊。 于是，依然做個(gè)簡(jiǎn)單的試驗(yàn)來難證一下這個(gè)猜想。

新建空 t.mdb ，然后創(chuàng)建一個(gè)模塊，代碼如下。

Option Compare Database Option Explicit Public Sub ti() Dim ssql As String Dim conn As ADODB.Connection Set conn = CurrentProject.Connection ssql = "create table table2(id integer,cname char(10))" conn.Execute ssql End Sub Public Sub tx() Dim ssql As String Dim conn As ADODB.Connection Set conn = CurrentProject.Connection Dim i As Integer On Error Resume Next For i = 1 To 9000 ssql = "drop table t" & (10000 + i) CurrentProject.Connection.Execute ssql Next i On Error GoTo 0 End Sub Public Sub t1() Dim ssql As String Dim i As Integer For i = 1 To 9000 ssql = "create table t" & (10000 + i) & " (id integer,cname char(10))" CurrentProject.Connection.Execute ssql Next i End Sub Public Sub t2() Dim ssql As String Dim i As Integer For i = 1 To 9000 ssql = "select * into t" & (10000 + i) & " from table2" CurrentProject.Connection.Execute ssql Next i End Sub Public Sub t() Call tx Debug.Print "t1 start.", Now Call t1 Debug.Print "t1 end .", Now Call tx Debug.Print "t2 start.", Now Call t2 Debug.Print "t2 end .", Now End Sub

步驟一：運(yùn)行 ti()創(chuàng)建一個(gè)原表 table2 以供后面的 select * into newtable from oldTable 使用。
步驟二：運(yùn)行 t() 結(jié)果如下。
t1 start. 5/23/2009 3:06:54 PM
t1 end . 5/23/2009 3:07:03 PM
t2 start. 5/23/2009 3:07:17 PM
t2 end . 5/23/2009 3:07:29 PM

t1() 9s , t2() 12s

試驗(yàn)結(jié)論： 猜想不成立。

聲明：本網(wǎng)頁內(nèi)容旨在傳播知識(shí)，若有侵權(quán)等問題請(qǐng)及時(shí)與本網(wǎng)聯(lián)系，我們將在第一時(shí)間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com