Vorhandensein eines Feldes pr 黤 en MIT ADO
The Public Function dbRecordCount (Table As String) As Long

Dim RST As ADODB. You

On Error GoTo ErrHandler
The Set RST=New ADODB. You

RST. Open the "SELECT * FROM" & amp; Create the Table, CNT 'you.
Set RST.=Nothing 'ActiveConnection Disconnect the you.
DbRecordCount=RST. RecordCount
RST. Close
The Set of RST=Nothing
The Exit Function
ErrHandler:
GErrors. DisplayError csErrSource & amp; ". AddNewRecord "
Stop
End Function

CodePudding user response:

Have a great god know? Help me with bai

CodePudding user response:

Can describe in detail what is wrong