推薦：怎樣用代碼隱藏、最大化、最小化ACCESS的主窗口該函數能用來完全隱藏 Access 窗口并將你自己的窗體顯示在桌面上。在彈出式窗體的 Open 事件中使用 SW_HIDE 參數調用fSetACCESSWindow 函數實現。
注意：如果你隱藏了 Access 主窗口，要確定
一直以來，ACCESS數據庫中的申報數據在分公司與總公司之間傳遞，用EXCEL或DBASE、TXT甚至ACCESS等格式，我總覺得不太理想。最近看了一本書，不經意間發現了一個方法，使用ACCESS數據庫生成申報數據與讀入數據似乎簡單了不少，特拿出來與大家分享。同時，也希望能得到更多的指點。
附上示例：
以下為引用的內容：
Sub Mwrite()
On Error GoTo thiserr
Dim rs As New ADODB.Recordset
rs.Open "dlmd", CurrentProject.Connection, adOpenDynamic, adLockOptimistic, acTable
rs.Save "a:\dlmd.adtg", adPersistADTG
rs.Close
Set rs = Nothing
thisexit:
Exit Sub
thiserr:
MsgBox Err.Description
Resume thisexit
End Sub
Sub Mread()
On Error GoTo Merr
Dim i As Integer
Dim rsDe As New ADODB.Recordset
Dim rsSo As New ADODB.Recordset
rsSo.Open "a:\dlmd.adtg", "provider=mspersist"
rsDe.Open "dlmd", CurrentProject.Connection, adOpenKeyset, adLockOptimistic, acTable
Do Until rsSo.EOF
rsDe.AddNew
For i = 0 To rsSo.Fields.Count - 1
rsDe.Fields(i) = rsSo.Fields(rsDe.Fields(i).Name)
Next i
rsDe.Update
rsSo.MoveNext
Loop
rsSo.Close
rsDe.Close
Set rsSo = Nothing
Set rsDe = Nothing
Mexit:
Exit Sub
Merr:
MsgBox Err.Description
Resume Mexit
End Sub
|
分享：轉換Access數據庫以獲得更優性能Access 2002自動以Access 2000格式存儲所有的數據庫文件，這一點對于較小的數據庫來說非常重要，并且能使您能夠和ACCESS 2000用戶共享您的數據庫文件。
但是，如果您不打算與Access 2000用戶
。