Vorhandensein eines Feldes pr黤en mit ADO
Public Function dbRecordCount(Table As String) As Long
Dim rst As ADODB.Recordset
On Error GoTo ErrHandler
Set rst = New ADODB.Recordset
rst.Open "SELECT * FROM " & Table, cnt 'Create the recordset.
Set rst.ActiveConnection = Nothing 'Disconnect the recordset.
dbRecordCount = rst.RecordCount
rst.Close
Set rst = Nothing
Exit Function
ErrHandler:
gErrors.DisplayError csErrSource & ".AddNewRecord"
Stop
End Function
uj5u.com熱心網友回復：
有知道的大神嗎？指點一下唄uj5u.com熱心網友回復：
能詳細描述下是什么錯誤么轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/16883.html
標籤：VBA
上一篇：vbs陳述句未結束，求大佬幫忙