MyTetra Share
Делитесь знаниями!
Удаление Поля из Таблицы
Время создания: 16.03.2019 23:43
Раздел: Разные закладки - VBA - Access - msa.polarcom.ru
Запись: xintrea/mytetra_db_adgaver_new/master/base/1531933320dsz17dno3w/text.html на raw.githubusercontent.com

Удаление Поля из Таблицы

Public Sub DelTableField(sTableName$, sFieldName$)

'Удаление поля из ЛОКАЛЬНОЙ таблицы по аргументам ...

'--------------------------------------------------------------------------

Dim s$

On Error GoTo DelTableField_Err

s = "ALTER TABLE " & sTableName & " DROP COLUMN " & sFieldName

CurrentDb.Execute s


DelTableField_Bye:

Exit Sub


DelTableField_Err:

MsgBox "Ошибка " & Err.Number & vbCrLf & Err.Description & vbCrLf & "в процедуре: DelTableField", vbCritical, "Error"

Resume DelTableField_Bye

End Sub




Так же в этом разделе:
 
MyTetra Share v.0.65
Яндекс индекс цитирования