MyTetra Share
Делитесь знаниями!
Удаление Поля из Таблицы
18.07.2018
20:03
Раздел: VBA - Access - msa.polarcom.ru

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

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.52
Яндекс индекс цитирования