Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Access VBA

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68

Открыть новую тему     Написать ответ в эту тему

Guest

BANNED
Редактировать | Цитировать | Сообщить модератору
   
 
Обсуждаем вопросы только по Access VBA
(программирование макросов, скриптов, пользовательских функций и т.п.).
Приветствуются ссылки на ресурсы и справочную литературу по теме.

 

NB! Дублирующая тема VBA for Access закрыта во избежание путаницы. Оставлена эта, как более ранняя и имеющая больше сообщений.

Смежные темы:
Помощь в создании SQL-запросов: SQL запрос
Программы » Microsoft Office 2019 & 365 | 2016 | 2013 | 2010 | 2007 | 2003
Программы » OneNote | Outlook 2013 & 2016 & 2019 | Outlook 2010 | Microsoft Mathematics & Math Solver
Программы » Word FAQ | Excel FAQ | Access FAQ
Прикладное программирование » Word VBA | Excel VBA
Андеграунд » Microsoft Office 2019 | 2016 | 2013 | 2010 | 2007 | 2003
Андеграунд » OneNote | Visio | SharePoint Server | Project Server | Exchange Server
Андеграунд » Надстройки (add-ins) и коммерческие макросы Excel
Андеграунд » Самостоятельная сборка дистрибутивов Оffice 2007/2010/2013/2016 | MUI для Office 2007
----------
Как в Access перместить запись из одной таблицы в другую (допустим по нажатию кнопки на форме)?

Отправлено: 18:31 05-09-2002 | Исправлено: ALeXkRU, 17:14 03-08-2021
unfreqient



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Смотри свойства:
Число столбцов, ширина столбцов, присоединённый столбец

Всего записей: 104 | Зарегистр. 20-07-2006 | Отправлено: 12:12 24-08-2006
max89



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Можно ли mde-файл вернуть в mdb под 97 Access или как там посмотреть конструктором формы, отчеты, модули?

Всего записей: 254 | Зарегистр. 05-08-2005 | Отправлено: 14:36 25-08-2006
NATTO



Full Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Необходима помощь по Access 2003!
В форму выводится содержимое одной таблицы.
Подскажите плиз как сделать в форме:
Нужно сделать несколько фильтров содержимого полей в одной таблице.
(Каждый фильтр с выпадающим списком содержимого предназначен для одного столбца полей)
Нужно сделать сортировку полей.
Наверное не так все это сложно, но до меня чот никак не доходит... =(

----------
ПМЖ для фотомануалов

Всего записей: 594 | Зарегистр. 05-01-2003 | Отправлено: 22:50 25-08-2006
reddestfox



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
NATTO

Цитата:
Каждый фильтр с выпадающим списком содержимого предназначен для одного столбца полей

Это как в Экселе Автофильтр?

----------
Самый Рыжий Лис На Свете!

Всего записей: 1857 | Зарегистр. 25-11-2005 | Отправлено: 05:40 26-08-2006
NATTO



Full Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

Цитата:
Это как в Экселе Автофильтр?

Да, типа того.

----------
ПМЖ для фотомануалов

Всего записей: 594 | Зарегистр. 05-01-2003 | Отправлено: 00:54 27-08-2006
salavatwest

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Посмотри примеры.
http://forum.ru-board.com/post.cgi?action=reply&forum=33&topic=0357
Формы 1 , la_form.mdb (156 kb)

Всего записей: 9 | Зарегистр. 05-02-2006 | Отправлено: 06:50 28-08-2006
jONES1979



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору

Цитата:
Можно ли mde-файл вернуть в mdb под 97 Access или как там посмотреть конструктором формы, отчеты, модули?

 
нет. нельзя.

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 20:45 01-09-2006
NikNikolaich

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Кто-нибудь знает как взломать или обойти пароль пользователя в Access? Нужно кое-что изменить в базе, а один гад для всех пользователей базы заблокировал все таблицы. Как быть?

Всего записей: 41 | Зарегистр. 03-05-2006 | Отправлено: 14:16 13-09-2006
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
NikNikolaich
Кто-то на форуме предлогал использовать программу OfficeRecovery http://forum.ru-board.com/topic.cgi?forum=35&topic=5637&start=300  
Сам я не пробовал, но были положительные отзывы. Обязательно сделай копию базы и пробуй на копии.

Всего записей: 3920 | Зарегистр. 31-03-2002 | Отправлено: 22:17 13-09-2006
reddestfox



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
NikNikolaich
Или воспользуйся продуктом компании Elcomsoft (см. Варезник).
Сам пользуюсь для подобных целей исключительно продуктами Elcomsoft.

----------
Самый Рыжий Лис На Свете!

Всего записей: 1857 | Зарегистр. 25-11-2005 | Отправлено: 23:26 13-09-2006
yuish

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
есть кнопка (база акцесовская проект на Delphi, коннект не через  BDE)  по кнопке делаеется запрос на апдейт.
если жмешь один раз - все нормально, но если нажать быстро, типа даблклик - вываливается ошибка - Транзакция не может быть запущена, слишком много транзакций.
потом не работает ничего на update, select берет нормально, надо прогу закрывать.

Всего записей: 218 | Зарегистр. 10-02-2003 | Отправлено: 17:30 14-09-2006
kolob204



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Можно ли в Процедуре обработки события - вызвать другое приложение?
 
Private Sub Список_AfterUpdate()
If Список.Value = "Текст" Then "Вот тут нужно чтобы открылся файл с расширением *.mht"
End Sub
 
Смысл в том, что у меня много таблиц в html коде, а пергонять их в аксесовские очень долго и получится нечитабельно...
 
Есть ли способы?
Спасибо.

Всего записей: 41 | Зарегистр. 08-11-2005 | Отправлено: 17:31 14-09-2006
Yuk



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kolob204
См. функцию Shell.
Файл можно открыть через ассоциации командой start.

Всего записей: 1182 | Зарегистр. 02-07-2001 | Отправлено: 19:07 14-09-2006
kolob204



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Знать бы с какой стороны смотреть
Я посмотрел в хелп, толкого объяснения как пользоваться не нашёл... поэтому попросил помощи, если кто то вызывал таким образом "чужие" приложения - напишите пожалуйста пример кода: может тогда разберусь... жаль нет не одной толковой книжки по аксесу

Всего записей: 41 | Зарегистр. 08-11-2005 | Отправлено: 20:28 14-09-2006
Troitsky



Водник Водкин
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
kolob204
Например

Код:
Shell "C:\Program Files\Internet Explorer\iexplore.exe C:\file.mht", 3


----------
Мы в хорошем настроении гуляем по лесам.
Кто обидеть нас захочет – сам получит по усам.
Сам полу- получит по усам. Сам полу- получит по усам!

Всего записей: 795 | Зарегистр. 13-12-2003 | Отправлено: 09:26 15-09-2006
ValeryZ



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите как в Access 2007 преобразовать число в пропись. Процедуры от 2003 не проходят почему-то.

Всего записей: 29 | Зарегистр. 18-01-2005 | Отправлено: 12:18 25-09-2006
MoKC0DeR



Full Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Написал небольшой код в Word который созраняет все документы(*.doc) в текстовом формате после переноса в Access код стал работать криво - сохраняет с расширением txt. но в формате Word'а. Что не верно написано ?

Код:
 
Sub WordToTxt()
  Dim WordApp As Object, FPath$, FName
 
  FPath = "c:\1\"
  FName = Dir(FPath & "*.doc", vbNormal)
   
  Set WordApp = CreateObject("Word.application")
  WordApp.Application.Visible = True
  While FName <> ""
    WordApp.Documents.Open FileName:=FPath & FName, ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
        "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:=""
    WordApp.ActiveDocument.SaveAs FileName:=FPath & Left$(FName, Len(FName) - 4) & ".txt", FileFormat:=wdFormatText, _
        LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
        :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
        SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
        False, Encoding:=1251, InsertLineBreaks:=False, AllowSubstitutions:=False _
        , LineEnding:=wdCRLF
    ActiveWindow.Close
    FName = Dir
  Wend
End Sub
 
 


Всего записей: 510 | Зарегистр. 31-03-2004 | Отправлено: 15:20 25-09-2006
Spalex



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Сразу оговорюсь: это по сути мой первый опыт в Access и может быть вопрос наивный, простой и т.п., но в справка и поиск не помогли — мне сложно даже понять ЧТО я ищу.  
 
Объясню суть проблемы на простом примере, в жизни всё чуть-чуть сложнее.
База данных на MS Access'е.
Есть таблицы A и B.
 
поля A: akey (K), aname, a1, a2 (вплоть до aN — это неважно)
поля B: bkey (K), bname
 
Между A и B есть связь многие ко многим, реализуемая посредством таблица AB
 
поля AB: akey, bkey, ab_desc
где akey и bkey совместно являются ключом.
 
Создал форму для добавления записей в A. Вид примерно такой:
 
-------------------------------
Key (read-only): |_______|
Input A name: |__________|
Input A a1: |__________|
Input A a2: |__________|
-------------------------------
 
Очень хочется сюда же добавить список из AB, соответствующей просматриваемой записи из A, т.е. все записи из AB с значением akey как у показываемой записи.
Например так (в списке показываются соответствующие имена из B):
 
-------------------------------
Key (read-only): |__123__|
Input A name: |_my name__|
Input A a1: |_some a1__|
Input A a2: |_some a2__|
 
All AB for this:
--------------------
| bname1|
| bname2|
--------------------
<Add new AB>
-------------------------------
 
Собственно вопросов получается два:
1. Как создать такой список?
2. Как сделать кнопочку добавления новой записи в этот список?
 
Вот до чего я пока сам дошёл:
RE: 1. Список можно создать, например, с помощью запроса с параметром (значение akey). На форму кидается контрол-список, который связывается с запросом. Запрос я составил — это не вопрос. Проблема: как синхронизировать содержимое списка с выводимой записью A? Как заставить обновляться список при смене показываемой записи и вообще как передать параметр в запрос, не заставляя пользователя вводить его вручную?
RE: 2. Ну кнопку-то положить на форму я могу  . Но вот как быть дальше? Что к ней привязывать, как поступить проще, правильней? Придётся писать новую форму добавления в AB или можно как-то обойтись одной уже сделанной, добавив что-то на неё?
 
Вот собственно. Если всё просто, то буду премного благодарен за любой пинок в правильном направлении: ключевые слова, по которым надо искать или что-то подобное.

Всего записей: 38 | Зарегистр. 26-03-2004 | Отправлено: 13:04 03-10-2006
jONES1979



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
MoKC0DeR
 
Вероятно ты забыл поставить  
 
Option Explicit
 
в начале модуля
 
 
Аксесс не знает вордовских констант, таких как  
 
wdFormatText, wdCRLF  и прочих. Их надо заменить на целочисленные константы просто
 
 
Добавлено:
то есть на целочисленные ЗНАЧЕНИЯ этих констант

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 13:29 09-10-2006
MoKC0DeR



Full Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
jONES1979
Спасибо!  
 

Всего записей: 510 | Зарегистр. 31-03-2004 | Отправлено: 17:58 09-10-2006
Открыть новую тему     Написать ответ в эту тему

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Access VBA


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru