Уважаемые подскажите пожалуйста ,как можно сделать на форме Главная есть поле МесяцГлавная в ней содержатся месяца прописью .Необходимо сделать при открытии формы Рецепт ,(в таблице Рецепт есть поле МесяцРецепт тоже прописью) если месяца не совпадают в таблице Рецепт с Главной ,чтоб появлялась надпись распечатайте отчет за предыдущий месяц.Спасибо !

http://www.sql.ru/forum/1298302/otchet

Привет народ!
У меня тут проблема с запросом.
Есть табличка:

"id" "ClientRegId" "shortname" "OrgType" "RegionCode" 1 "030000003559" "ООО ""Старый Мастер-НВ""" 2 "010047730346" "ОАО ""Л Дистрибьюшен""" 3 "010000006598" "ООО ""Альтаир групп""" 4 "030000019706" "ООО ""ТД ""Диокорт-Запад""" "UL" "77" 5 "010000006066" "АО ""МБ группа Импэкс""" 6 "030000003516" "ООО ""ТД ЗОЛОТОЙ СТАНДАРТ""" 7 "010000003947" "ООО ""АЛЬТЕРВИНА""" 8 "010000006173" "АСТ-интернэшнл инваэронмэнт" 9 "010000006250" "ООО ""Виноторговая компания ""Форт""" 10 "010002825083" "ООО ""Артельные традиции""" 11 "" "" "UL" 12 "010000003620" "ООО ""АРМЯНСКИЙ КОНЬЯК""" 23 "030000019716" "ООО ""КРАФТБИР""" "UL" "77" 24 "010060687825" "ООО ""Юпитер Инкорпорейтед""" "UL" "73" 36 "030000000017" "ООО ""ПИВОВАРЕННАЯ КОМПАНИЯ ""БАЛТИКА""" "UL" "78" 52 "010054002523" "ООО ""Группа ЛАДОГА""" "UL" "78" 53 "030000000012" "АО ""САН ИНБЕВ""" 54 "050000025973" "Компания Сервесериа" "FO" "" 55 "050000003948" "Лукас Болс Б.В." "FO" "" 56 "030000039120" "АО ""САН ИНБЕВ""" "UL" "37" 57 "050000028028" "Танака Ко., Лтд." "FO" "" 58 "050000028099" "Дебриз-Дюлак.эСи" "FO" "" 59 "010000006687" "ЗАО ""ВИЛАШ""" "UL" "78" 60 "050000012864" "АйришДистиллерсЛимитед" "FO" "" 61 "010000000280" "ООО ""СТАНДАРТЪ""" "UL" "52" 62 "010000000208" "ОАО ""Белвино""" "UL" "31" 63 "010037655439" "ООО ""ИЗМВ""" "UL" "92" 64 "050000012863" """Чивас Бразерс Лимитед""" "FO" "" 65 "050000030065" "ЗАО ""Е.К.З""" "TS" "" 66 "050000012875" "«ЛИЛЛЕ С.А.»" "FO" "" 67 "010037709623" "ООО ""Вейн унд Вассер""" "UL" "92" 68 "050000033557" "Кантина ди Сона С.р.л." "FO" "" 79 "050000025643" """ГальяноМаркатиСРЛ""" "FO" "52" 80 "010000000269" "ЗАО ""Игристые вина""" "UL" "78"

Есть запрос:

SELECT id, ClientRegId
FROM suppliers
WHERE ClientRegId is not null and ( orgtype Is Null Or ((orgtype='UL' Or orgtype='FL') And regioncode Is Null));

Т.е. мне надо выбрать все не пустые ClientRegId у которых orgtype равен UL или FL и при этом отсутствует regioncode

Есть результат:

id ClientRegId 1 "030000003559" 2 "010047730346" 3 "010000006598" 5 "010000006066" 6 "030000003516" 7 "010000003947" 8 "010000006173" 9 "010000006250" 10 "010002825083" 11 "" 12 "010000003620" 53 "030000000012"

В результате 11 - лишнее.
Как правильно записать?

http://www.sql.ru/forum/1298286/problema-s-zaprosom

Такая проблема: при нажатии enter на поле в форме "несколько элементов" фокус и курсор перемещается на первое поле первой строки этой формы.

Никак не могу это поправить.
В параметрах клиента при нажатии ВВОД выставил "нет" и перегрузил.. не помогло

В форме

Private Sub Form_Load()
    Application.SetOption "Move After Enter", 0  
End Sub

не помогает


Может кто решал такую проблему? Помогите.

http://www.sql.ru/forum/1298248/povedenie-po-nazhatiu-enter-v-forme-neskolko-elementov-ili-lentochnoy

Только осваиваю access, подскажите, возможно ли такое. Версия Access 2016
Есть табличка, в которой данные времени, 2 колонки: начало и конец периода. Начало периода в 90% случаев совпадает с концом в предыдущей записи (но иногда - нет), конец периода обычно -текущий момент. В конец периода я сделала подстановку с помощью макроса, а вот в начало - никак, получается подставить только из текущей же записи, а надо из предыдущей.
Это вообще возможно?

http://www.sql.ru/forum/1298141/podstavit-dannye-iz-predydushhey-zapisi

Добрый день, уважаемые коллеги!

Разработал для своего отдела базу данных (документация, производственные задачи, ряд прочих подсистем) на Access 2007, разместил ее на общем сетевом ресурсе. У каждого пользователя - клиент, пользователей ~25 человек. При изменении, а иногда и считывании данных возникла проблема в виде постоянных ошибок "Ошибка выполнения многоходовой операции OLE" и "Файл <путь к файлу сервера БД> уже используется".

ОС Windows 2007, БД Access 2007, изменить их нельзя.

Не подскажете, как побороть эти ошибки и что вообще можно сделать в Access 2007 (настройки клиент м.б.) в плане оптимизации работы в многопользовательском режиме/приложении?

http://www.sql.ru/forum/1298093/proizvoditelnost-i-oshibki-v-mnogopolzovatelskom-prilozhenii-access

Доброго времени суток. Проблема в том что если допустим назначить на два или более поля параметр и при выполнении запроса не ввести значение в один из них или наоборот ввести значение только в один из параметров, запрос выдаст пустую таблицу. Так как же сделать что бы учитывались те параметры в которые я ввел значения т.е. 3 из 5, 1 из 5 и т.д.

http://www.sql.ru/forum/1298080/problema-v-zaprose-s-parametrom-v-access

Добрый день. Помогите пожалуйста.
В бд одна таблица. Мне надо чтоб в колонке "Change" производился расчет изменения остатков "At_last" между текущей датой "date_report" и предыдущей (даты не всегда могут идти по порядку) по каждой номенклатурной единице "unit", как на картинке только по всей номенклатуре.

http://www.sql.ru/forum/1298003/pomogite-s-raschetom-velichiny-izmeneniya-ostatkov-po-kazhdoy-otdelnoy-nomenklature-na-sklade

Разгребал сегодня свой архив. Наткнулся на старый пример, который разрабатывал, когда хотел немного украсить программы. Немного доработал. Пример позволяет анимировать открытие/закрытие форм на экране.
Используется функция AnimateWindow из библиотеки user32.dll


Кто хочет узнать чуть больше смотрите например здесь Функция AnimateWindow
-------------------------------------------------------------
А ты вложил уже свой кровный рубль в 50-ти миллиардное состояние Билла Гейтса?

http://www.sql.ru/forum/1297988/malenkie-hitrosti-igry-s-animaciey-form

Добрый день. Снова к вам!
В базе уже давно была форма, еще в старом офисе, и запрос который ссылаясь на значение выбранное в форме отбирал необходимую информацию. Сейчас делаю в этой форме новое поле, новый запрос должен отбирать, но он не работает.
Если в запросе пишу конкретное значение , то отбирает, если ссылка на значение из формы то нет.
ХЕЛП!!!

Запрос работающий:

SELECT ИДП1.табномер AS ИДП1_табномер, ИДП1.md, ИДП1.должность, ИДП1.отдел, Format([Дата],"mmmm yyyy") AS Дата1, ИДП2.[Размер премии], ИДП2.[Наименование премии], С1.ФИО, ИДП2.Причина
FROM (С1 INNER JOIN ИДП2 ON С1.Табномер=ИДП2.Табномер) INNER JOIN ИДП1 ON С1.Табномер=ИДП1.табномер
WHERE (((ИДП1.отдел)=Forms!ИДП!ВыборОтдел));

Поле в форме:
SELECT Отделы.Отдел, * FROM Отделы;

Имя поля:
ВыборОтдел


Новый запрос который не работает:
SELECT ИДП1.табномер AS ИДП1_табномер, ИДП1.md, ИДП1.должность, ИДП1.отдел, Format([Дата],"mmmm yyyy") AS Дата1, ИДП2.[Размер премии], ИДП2.[Наименование премии], С1.ФИО, ИДП2.Причина
FROM (С1 INNER JOIN ИДП2 ON С1.Табномер=ИДП2.Табномер) INNER JOIN ИДП1 ON С1.Табномер=ИДП1.табномер
WHERE (((ИДП2.[Наименование премии])=Forms!ИДП!Выборпремия));


Поле в форме:
SELECT [Коды премирования].[Код премии], [Коды премирования].[Наименование премии] FROM [Коды премирования];

Имя поля:
Выборпремия

http://www.sql.ru/forum/1297948/zapros-na-vyborku

Здравствуйте. Только начал изучать VBA и появилась необходимость считывать данные из БД Access по мере прохождения цикла. Пишу вот такой запрос:

SQLr = "Select Latitude, Longitude, BID, preSS, cpwr, TestTime From tableCom Where codeindex >= first And codeindex <= last"
Set tbl = dbs.OpenRecordset(SQLr)

При выполнении кода, выдает ошибку: Слишком мало параметров. Требуется 2 на строке:

Set tbl = dbs.OpenRecordset(SQLr)

Все столбцы числового типа. Прошелестил уже кучу сайтов и как я понял, необходимо явное создание и использование параметров, не привязанных к форме. Если я правильно понимаю, то в моём случае это параметры first и last. Но вот как создать эти параметры я не знаю. Не могу найти нужную статейку, а если и нахожу, не доходит до меня, как это нужно сделать. Помогите пожалуйста.

http://www.sql.ru/forum/1297917/zapros-v-aksess-slishkom-malo-parametrov-trebuetsya-2

Добрый день

Подскажите как тут правильно сделать запрос. Мне нужно просуммировать кол-во инструмента в таблицах "Кому_выдан" и "Инструмент_на_списание".
Такой вот запрос работает неправильно:

SELECT Инструмент.Id_инструмент, Sum(Кому_выдан.кол_во_на_руках) AS [Sum-кол_во_на_руках], Sum(Инструмент_на_списание.кол_во_на_списание) AS [Sum-кол_во_на_списание]
FROM (Инструмент INNER JOIN Инструмент_на_списание ON Инструмент.Id_инструмент = Инструмент_на_списание.id_инструмент) INNER JOIN Кому_выдан ON Инструмент.Id_инструмент = Кому_выдан.Id_инструмент
GROUP BY Инструмент.Id_инструмент

Проблема тут в том, что в случае, когда в таблицах "Кому_выдан" и "Инструмент_на_списание" разное число строк, - сумма получается неверная.
К примеру, в таблице "инструмент" только одна запись: "id_инструмент"=1, в таблице "Кому_выдан" - 2 записи: "Кому_выдан"=1 и 2, в таблице "Инструмент_на_списание" - 1 запись: "Инструмент_на_списание"=3
В результате мой запрос выдает такую таблицу: "id_инструмент"=1; "Sum-кол_во_на_руках"=3; "Sum-кол_во_на_списание"=6, а должно быть "Sum-кол_во_на_списание"=3, но так как в таблице "Кому_выдан" 2 записи, то и в "Инструмент_на_списание" он суммирует 3+3

Подскажите плиз что исправить, чтобы правильно отрабатывало

http://www.sql.ru/forum/1297852/pomogite-s-zaprosom

Привет!
Сделал раздельную форму по существующей таблице. Решил на форме добавить несколько элементов(флажок), не относящихся к таблице. Но они появляются в нижней (табличной) части. Как сделать так, чтобы этого не происходило? Спасибо.

http://www.sql.ru/forum/1297717/kak-skryt-stolbcy-razdelennoy-formy

Access какой-то не старый - то ли 13 то ли 16...
На форме список.
Надо отловить mousedown на нем и выполнить действие в зависимости от выбранной строки
Проблема - mousedown наступает раньше обновления списка .... то есть при наступлении этого события выбранной( проверка в цикле через ctl.selected(i)) выбранной получается та строка списка, которая была выделена ранее
на afterupdate то же самое получилось......
А вот когда стрелками с клавы вверх-вниз по списку перемещаешься - все нормально....
В чем может быть дело?

http://www.sql.ru/forum/1297696/problema-so-spiskom

Кто поможет помочь с заданиями не без оплатно нужна помощь срочная

http://www.sql.ru/forum/1297617/access

Здравствуйте форумчане, только учусь поэтому за методы и формулировку прошу не кидаться тапками. Возникла проблема.
Есть 3 таблицы и форма. "Магазины", "книги", "Учет продаж" и форма для учета продаж.
В учет подставляются значения из "магазины" и "книги" по принципу магазин : книга.
Как сделать так, чтобы в поле "книга" формы для Учета продаж подбирались только такие значения которых нет в учете, т.е. допустим есть запись "магазин1" : "книга1" и при следующей записи такого же вида с тем же магазином в выпадающем списке для книг не было "книга1", но были другие книги, кроме "книга1" из таблицы "книги".
Пытался сделать черед <>[Формы]![Учет продаж]![Магазин], но так отбираются книги только в пределах учета и значения повторяются, даже с группировкой. Заранее спасибо.

http://www.sql.ru/forum/1297504/ms-access-2016-svyazannye-polya-so-spiskami

-


-

94858457839859485739485

Приложение к извещению.doc

7.21 Мб

Приложение №

http://iz/file.html?uid=6FB2FB4BCEEB009AE0530A86121F1E6F


-

3ZfLQHnuEL9kyG1zL31VYDbuNz0ReMMrjWIu6dKgNkKdgRhapkMddr






-

AE0530A86121F3105

Документация.doc

7.81 Мб

Аукционная документация

http://z/file.html?uid=6FC294AB51E3006AE0530A86121F3105


-

BAMbz6a/f0Kz3IZoIi/D0bGRVbDTREw4hIEm800eEm9dqSdYuUTfcc







--------------------------------------------------------------------
Я только учус )))

А вот сам цикл на VBA:

Private Sub Кнопка0_Click()

Dim xmlOb As MSXML2.DOMDocument60
Dim xNode As MSXML2.IXMLDOMNode
Dim xElem As MSXML2.IXMLDOMElement
Dim db As DAO.Database
Dim rst As DAO.Recordset

Set db = CurrentDb
Set rst = db.OpenRecordset("tabMXL")


Set xmlOb = New DOMDocument60: xmlOb.async = False: xmlOb.validateOnParse = True

'Назначаем схемы
xmlOb.SetProperty "SelectionNamespaces", "xmlns:q='http://zakupki.gov.ru/oos/export/1' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xmlns:oos='http://zakupki.gov.ru/oos/types/1'"
xmlOb.SetProperty "SelectionNamespaces", "xmlns:q='http://zakupki.gov.ru/oos/types/1' xmlns:ns2='http://zakupki.gov.ru/oos/export/1' xmlns:ns3='http://zakupki.gov.ru/oos/pprf615types/1' xmlns:ns4='http://zakupki.gov.ru/oos/base/1'"

If xmlOb.Load("c:\1Zakupki_test\1.xml") Then
For Each xElem In xmlOb.selectNodes(".//q:attachments")
rst.AddNew
rst!fName = xElem.selectSingleNode(".//q:fileName").Text
rst!fSize = xElem.selectSingleNode(".//q:fileSize").Text

Next xElem
rst.Update
End If
rst.Close

End Sub


Здесь я хотел найти узел Attachments и пройтись по всем подузлам (правильно сказал?) "attachment" и записать данные элементов "fileName", "fileSize" в таблицу tabXML. Записывает в таблицу элементы только первого аттачмента, второго не видит, не идет...

Что я как новичок сделал не так ???

http://www.sql.ru/forum/1297498/ne-mogu-ponyat-gde-u-menya-oshibka-ne-rabotaet-cikl-po-elementam-uzla-xml-kod-vnizu-vba

Здравствуйте!
Не судите строго только учусь работать в Access 2013.
Для себя поставил задачу сравнить два файла вот их содержание см.внизу:
Я импортивал в Access, затем объединил один к одному.
Вопрос: мне нужно вывести только те записи которых нет или в 1 книге или во второй (конечно мы не знаем, если файл был из 13000 записей). И вывести рез-ат: например Книга 2. такие то записи.

Сам запрос:

SELECT Лист1.*, Лист2.*
FROM Лист1 INNER JOIN Лист2 ON Лист1.RegN = Лист2.RegN;


Книга 1.xlsx

RegN sum
1 1000
2 2000
3 3000
4 4000
5 5000
6 6000
7 7000
8 8000
9 9000
10 10000

Книга 2.xlsx

RegN sum
1 1000
2 2000
3 3000
4 4000
5 5000
6 6000
7 7000
8 8000
9 9000
10 10000
11 11000
12 12000

http://www.sql.ru/forum/1297479/chaynikovskiy-vopros

Привет всем!
Имеется запрос, который успешно отрабатывается стандартными средствами ORACLE(или через TOra), но при использовании его же из ACCESS выскакивает ошибка ORA-00900: Invalid SQL statement. Что делать и куда смотреть не пойму. :(

Dim strCon
strCon = "Driver={Microsoft ODBC for Oracle}; Server=(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=***)(PORT=1521))(CONNECT_DATA=(SID=***))); Uid=***;Pwd=***;"
Dim oCon: Set oCon = CreateObject("ADODB.Connection")
Dim oRs: Set oRs = CreateObject("ADODB.Recordset")
oCon.Open strCon

strSQL = "SELECT WCEL1_O.CO_GID , WCEL1_O.CO_DN  , WCEL1_O.CO_STATE  "
strSQL = strSQL & " FROM "
strSQL = strSQL & " CTP_COMMON_OBJECTS WCEL1_O "
strSQL = strSQL & " WHERE WCEL1_O.CO_OC_ID = 1963 "
strSQL = strSQL & " AND  WCEL1_O.CO_DN LIKE 'PLMN-PLMN/RNC-961/WBTS-56/W%' ESCAPE '' "

Debug.Print strSQL
Set oRs = oCon.Execute("strSQL") ' на этом месте выскакивает ошибка
While Not oRs.EOF
    Debug.Print oRs.Fields("CO_DN").Value
    oRs.MoveNext
Wend
oCon.Close
Set oRs = Nothing
Set oCon = Nothing

http://www.sql.ru/forum/1297462/access-oracle-ne-otrabatyvaetsya-zapros

Дано:

Форма А
Навигационная форма, включающая эту и другие формы

На Форме А вынесены 2 поля в виде выпадающих списков.

Допустим, что при выборе в первом поле 'A', второе предлагает 'Б', 'В', а при 'a' в первом - 'б', 'в'.

Как это реализовать на обычной форме - проблем нет (добавил условие отбора) [соответствие вариантов прописано в отдельной таблице]. Но как только перехожу в форму навигации Access перестаёт отлавливать значение первого поля и при клике на второе показывает диалоговое окно с предложением ввести значение поля 1. (при условии, что оно и задано ранее)

Сформировать условие ![Формы]![ФормаНавигации]![Поле1] НЕ ПОЛУЧАЕТСЯ - нет выхода на итоговое поле через форму навигации, через обычную такой проблемы нет.

Как быть? ;)

http://www.sql.ru/forum/1297416/obrashhenie-k-polu-vnutri-navigacionnoy-formy

Добрый день!
Помогите с объединением таблиц.
Описываю вопрос:
Есть Исходные таблицы. Структура их одинаковая. В Исходной таблице связка "art-part" - уникальная. Т.е. не может в одной таблице быть 2-х одинаковых связок "art-part". У этой связки - есть значение "var".

Таких таблиц несколько.

В результате запроса (о котором я прошу) должна получиться Результирующая таблица.

Примеры (образцы) - ниже под спойлерами.

+ Исходные таблицы

table1 art part var 101 110218 6 101 150218 7 101 170218 3 205 110218 5 205 200318 8 205 250318 55 table2 art part var 101 110218 12 101 190218 4 101 170218 1 101 100318 14 205 110218 8 205 250318 10 205 230318 11 table3 art part var 101 110218 6 101 150218 7 101 170218 3 205 110218 5 205 250318 55 308 110418 8

+ Результирующая таблица

Результат объединения таблиц: art part table1.var table2.var table3.var 101 110218 6 12 6 101 150218 7 7 101 170218 3 1 3 101 190218 4 101 100318 14 205 110218 5 8 5 205 200318 8 205 250318 55 10 55 205 230318 11 308 110418 8

Спасибо всем за помощь!

http://www.sql.ru/forum/1297383/pomogite-s-obedineniem-tablic-sql