Search results

Appologies... Public cnn As New ADODB.Connection Public Function ExecuteSQL(strSQL As String) As Long Dim cnn As New ADODB.Connection On Error GoTo err_ExecuteSQL DoCmd.SetWarnings False ConnectLocal.Execute strSQL DoCmd.SetWarnings True...

I use a custom function called Zap... Public Function Zap(strTable As String) As Long 'Purpose: Deletes all data in table 'Returns: -1 on error else no of records affected Dim strSQL As String strSQL = "DELETE * FROM " & strTable Zap = ExecuteSQL(strSQL) End Function

cheers... Trying to get the schema to work, I was interested in the ADO version as can do it in DAO Thanks

Hi there, First post, am a seasoned access builder but cant find the answer to this after doing a google... I want to list all the append queries in my database. I thught the following would have done but only returns tables and select queries...Anyone help? Dim catDB As ADOX.Catalog...