ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ACCESS + VBA
3 сообщений из 3, страница 1 из 1
ACCESS + VBA
    #32629593
Фотография Access_Abuser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Access_Abuser
Участник
Помогите плиз. Хочу большинство функций типа запросы на создание удалени записей автоматизировать. Знаний написать это все на SQL хватило. А как это все заставить работать через модуль ВБА ума не приложу. Подскажите плиз с чего начать учить этот ВБА млин :(
...
Рейтинг: 0 / 0
30.07.2004, 14:56
| Ответить | Цитировать | Написать  
ACCESS + VBA
    #32629789
Yanis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Yanis
Участник
С самого начала
1. Придумываешь себе задачку, типа "Хочу чтоб когда я нажал кнопку, сделалось то-то"
2. Придумываешь алгоритм (а лучше поначалу рисуешь)
3. Реализовываешь его, не забывая про Ф1
4. Переходишь к п.1
...
Рейтинг: 0 / 0
30.07.2004, 16:02
| Ответить | Цитировать | Написать  
ACCESS + VBA
    #32630561
Фотография Deminik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deminik
Участник
К примеру...

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Public Function EraseTable(TableName as String)
   On Errorr GoTo EraseTable_Error
   Dim strSQL as String
   strSQL = "Delete * From " & TableName
   CurrentDB.Execute strSQL
   Exit Function
EraseTable_Error:
   MsgBox Err.Number & ", " & Err.Description
End Function

...вот первая функция - запрос на удаление...
Запуск:

Код: plaintext
call EraseTable("ИмяТаблицыКоторуюМнеНадоОчистить")
или
Код: plaintext
EraseTable "ИмяТаблицыКоторуюМнеНадоОчистить"
...
Рейтинг: 0 / 0
01.08.2004, 07:57
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ACCESS + VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]