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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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
Algofil



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
с первого взгляда слишком много джойнов, в т.ч. вложенных, среди них скорее всего и кроется невозможность подключения.
как я поступаю в таких случаях:
пишу отдельные запросы начиная изнутри, работает - сохраняю пишу следующий цепляя 1-2 поля сверху тех которые уже отработаны и так пока вся хрень не заработает, не факт что заработает, но хоть буду знать на чем срезался, а это 90% успеха...

Всего записей: 247 | Зарегистр. 19-09-2007 | Отправлено: 17:04 26-10-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Это понятно, но как тогда объяснить, что с таблицей такой запрос прерастно работает?
Но спасибо за совет, попробую, раскрутить этот запрос

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 17:08 26-10-2007
Algofil



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
думаю что подселекты это неявные курсоры, если инсертить содержимое курсора в таблицу оно фиксируется и доступно всегда, а из курсора не в любой момент можно получить данные

Всего записей: 247 | Зарегистр. 19-09-2007 | Отправлено: 17:17 26-10-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Теперь понятно, спасибо)

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 17:23 26-10-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте, я опять поднимаю такой вопрос: как преодолеть сообщение "Открытие дополнительных БД невозможно"?Мне необходимо выполнить такой запрос:
SELECT *  
    FROM z_2  
  UNION SELECT * FROM z_3; На что система выдаёт описанное выше сообщение. Запросы z_2 и z_3 в свою очередь простейшие селекты. Выполнить данный запрос жизненно необходимо! Подскажите, кто, что может

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 09:44 29-10-2007 | Исправлено: Egepsihora, 09:44 29-10-2007
Algofil



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
если работают селекты по з_2 и з_3 отдельно, то скорее всего не совпадают поля для юнион... попробовать джойны разве?

Всего записей: 247 | Зарегистр. 19-09-2007 | Отправлено: 11:00 29-10-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Я описала одинаковые поля. При использовании джойна выдаётся тоже сообщение

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 11:02 29-10-2007
Algofil



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
джойны с псевдонимами?
если идти от средины запроса когда выдает отказ?
и ваще тема аксесс не узковата? я вижу тут неслабый скуль-девелопер задает вопросы )))

Всего записей: 247 | Зарегистр. 19-09-2007 | Отправлено: 11:20 29-10-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Да, я использовала джойны с псевдонимами - не помогает )))

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 11:43 29-10-2007
Noname dr

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Привет всем! помогите если кто сможет, у меня такой вопрос, можно ли изменить сумму какого либо поля таблицы в запросе? заранее благодарю.

Всего записей: 2 | Зарегистр. 11-11-2007 | Отправлено: 21:09 11-11-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Скажите пожалуйста, как изменить такую вот строку на Visual Basic :
Me.GroupLevel(5).ControlSource = "kzam"
которая выполняет группировку по полю "kzam" по возрастанию, чтобы группировка выполнялась по убыванию? Спасибо

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 13:34 12-11-2007
Vitus_Bering



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Egepsihora
Me.GroupLevel(5).SortOrder = True.
True - descendig order, False - ascending order.

Всего записей: 936 | Зарегистр. 30-09-2005 | Отправлено: 15:48 12-11-2007 | Исправлено: Vitus_Bering, 16:57 12-11-2007
KekcMF

Newbie
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
глупая наверно проблема, но не могу решить.
В форме есть поле которое автоматически считается, взависимости от введенных данных.
Это поле в отчете необходимо выводить в виде xxx.00 то есть например 356.00  454.00  
при подсчете поле получается дробным, если его округлять, то в отчет выводится соотвественно без дробной части: 356    454 . Мне же необходимо выводить округленное значение, но в виде 356.00 454.00.  

Всего записей: 5 | Зарегистр. 24-07-2007 | Отправлено: 09:27 13-11-2007
Algofil



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
1. округляем значение поля в конструкторе Выражение1: Round([q])
2. свойства: а) формат выбираем фиксированный б) количество знаков после запятой выбираем 2
 
тока вот нафига? такие кундштюки приводят к труднообнаружимым ошибкам в процессе эксплуатации

Всего записей: 247 | Зарегистр. 19-09-2007 | Отправлено: 11:42 13-11-2007
jONES1979



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Algofil к каким же ошибкам это приводит, если не секрет?

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 16:15 13-11-2007
Algofil



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
например к ошибкам агрегирования
 12.35 -> 12.00  
 13.45 -> 13.00
 Sum() = 15.80 -> 16.00
бухи будут довольны ))

Всего записей: 247 | Зарегистр. 19-09-2007 | Отправлено: 16:40 13-11-2007
LuckyELF

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Господа, подскажите почему сей код  
 
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog (msoFileDialogSaveAs)
 
валится с ошибкой 445: Object doesn't support this action
 
Пример взять из хелпа.
 
Вместе с тем, код  
 
Dim dlgOpen As FileDialog
Set dlgOpen = Application.FileDialog (msoFileDialogOpen)
 
работает нормально.

Всего записей: 29 | Зарегистр. 06-03-2005 | Отправлено: 22:11 13-11-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте. Мне необходимо в запросе вытащить 2 столбца с данными из другого запроса и пронумеровать каждую строку, начиная с 0. Вопрос: существует ли какая либо агрегатная функция или другой способ для выполнения нумерации?? Спасибо
 
Добавлено:
 
http://www.sql.ru/faq/faq_topic.aspx?fid=214  
Я нашла ответ на свой вопрос здесь

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 11:31 14-11-2007
KekcMF

Newbie
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Algofil спасибо большое.
Понимаю что не очень разумное решение, но "нам надо именно так"(с)  
не поспоришь)

Всего записей: 5 | Зарегистр. 24-07-2007 | Отправлено: 12:11 15-11-2007
Egepsihora

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте, есть запрос, который возвращает данные в таком виде:
rep    tip      kdn       dnn         kol
------------------------------------------
1        4       238      22-06        0
1        4      11436   МП90         0
2        1      179       01-069      0    
2        1      10117    16x18       0  
2        1      5187      220601     0
2        1      10117     НП90 ДП   0
2        1      10117     НП90        15
мне необходимо в отчёте выполнить группировку по возрастанию по 1, 2, 4 полю, и по убыванию 5 поле kol. При этом, если те записи, в которых kdn одинаков должны идти друг за другом. ТО есть, в таком виде:
1        4       238      22-06        0
1        4      11436   МП90         0
2        1      179       01-069      0    
2        1      5187      220601     0
2        1      10117     НП90        15
2        1      10117    16x18       0  
2        1      10117     НП90 ДП   0
 
Группировку задаю таким образом:    
  Me.GroupLevel(0).ControlSource = "rep"
  Me.GroupLevel(1).ControlSource = "tip"
  Me.GroupLevel(2).ControlSource = "dnn"
  Me.GroupLevel(3).ControlSource = "kdn"
  Me.GroupLevel(4).SortOrder = True
  Me.GroupLevel(4).ControlSource = "kzam"
Но тем не менее нужного результата не получаю. Как можно добиться того ,что нужно???

Всего записей: 22 | Зарегистр. 16-10-2007 | Отправлено: 18:05 15-11-2007
Открыть новую тему     Написать ответ в эту тему

Страницы: 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