Put the following into a module... seems to work...
If you need it in a macro you can call the function from your macro
================================================== =======
Public Function pfunDropTable(strTableName As String)
Dim strTemp As String
strTemp = "Drop table " & strTableName
DoCmd.RunSQL (strTemp)
End Function
================================================== =======
|