Доброго времени суток.

Занялся неким автоматизированным учетом склада и наткнулся на проблему с печатью наклеек в Access 2007.
Access 2007 предлагает печать по одной наклейки для каждой записи в таблице или запросе, но у меня каждая запись это наименование и соответственно есть столбец с количеством каждого товара. Хотелось бы напечатать наклейку на каждую единицу товара, или я что-то пропустил или мне походу нужно создать самому SQL запрос который посредство циклов добавит мне нужное количество записей на каждую единицу. Подскажите кто может делал что подобное..... заранее спасибо

http://www.sql.ru/forum/1101467/nakleyki-v-access-2007

Построен один запрос на две формы: одна "Для просмотра статуса предмета", другая "Внести изменения".
Это будет структурно правильно? т.е. если я внесу изменения в одной форме, тогда в другой должны отобразиться эти изменения?!

http://www.sql.ru/forum/1101446/odin-zapros-dve-formy

Есть форма на основе таблицы, в ней есть поле1, значение которого я использую как параметр для запроса что то типо: "выбрать значение разные поле1". И есть пустое поле2, в которое нужно положить результат запроса :с
1) Пытался в свойствах поля2 похимичить с "Данные/Источник", но что то не вышло.
2) Пытался копирнуть SQL код запроса и засунуть в код, который выполняется при открытие формы, но опять же провал :(
Подскажите способ
P.S. возможно я что то делал не так в 1 и 2 способах, так что если у вас есть похожее решение, прошу поделитесь^^

http://www.sql.ru/forum/1101428/kak-peredat-rezultat-zaprosa-v-pole-formy

Здравствуйте!

Часть структуры базы такова: Компании (одна-много) Сотрудники (одна-много) Контакты сотрудников

В таблице "Компании" есть текстовое поле "Телефоны компании" (Пример записи в поле "512-33-11; 230-09-45; 200-00-11")

Есть форма "Сотрудники", в ней подчиненная ленточная форма "Контакты сотрудника" где есть поле со списком "Контакт". Тип этого поля текстовый, т.к. оно может хранить или телефон / или эл.почту / или скайп / или т.д.

Как сделать так, что бы при открытии списка поля "Контакт" предлагалось выбрать один из телефонов в виде сл. списка:
512-33-11
230-09-45
200-00-11

?

http://www.sql.ru/forum/1101426/preobrazovanie-stroki-v-massiv

Доброго времени суток!!!
При создании БД столкнулся с проблемой, которую не как не могу решить.
В таблице Назначение моей БД в поле Категория должно подставляться значение 2 или 0, в зависимости от выбранного значения полей Статус и Код. Хотел реализовать это с помощью запроса на обновление с использованием функции Switch(). Из-за огромного условия Access стал выдавать ошибку "Слишком сложное условие в выражении ..."
Для решения этой проблемы поместил необходимые значения полей Статус и Код в отдельную таблицу КатегорияУслов. Для некоторых значений Кода подходят все значения Статуса.
Теперь не знаю как реализовать проверку условия по таблице КатегорияУслов и обновления поля в таблице Назначение.
БД предоставляю. БД создана в Access 2010

http://www.sql.ru/forum/1101379/ispolzovanie-tablicy-dlya-usloviy-otbora

В sql server запрос выполняется, но в Access возникает ошибка
Как можно поменять синтаксис, понятный для Access?

SELECT convert(nvarchar(10),p.[Дата],(104))as Дата, p.[id_ЦП], t.[Сумма] as [Платежи, грн],t.[Количество], t.[Вид]
FROM [Платежи]  p
CROSS APPLY (
    VALUES 
          ([НВ, грн],[НВ, шт],НВ)
        , ([Подорож, грн],[Подорож, шт], [Подорож])
       
		
) t([Сумма],[Количество], [Вид])
where month(p.[Дата]) = '6'

http://www.sql.ru/forum/1101362/kak-preobrazovat-v-ponyatnyy-access-u-zapros

Доброго дня господа !

Необходимо вывести сообщение в подвале окна приложения
Приложение = Excel 2007
Подвал окна = скрин прилагаю
Собщение = String(100,ChrW(9609)) & String(100,ChrW(9620))

Заранее благодарен !

P.S. Свойство Application.StatusBar:="......" в моем случае не подходит

http://www.sql.ru/forum/1101331/soobshhenie-v-podvale-okna-application

Вот не пойму, как открыть данный оле объект,

    
Dim app As Object
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("select Ole_files from Other_info where Label_OI='IWH_Stock_age'")


Set app = CreateObject("Word.Application")
With app
    .Visible = True
    .Documents.Open rs 'знаю бред, но смысал в этом
End With

Мне нужно открыть файл не на форме, а отдельно, в word объекте, не пойму как ребят это сделать.
--------------------------------------------------------
- оО, это что у вас Сэр борода?
- нет вата

Я самоучка, уж простите.

http://www.sql.ru/forum/1101303/vba-pole-obekta-ole-otkryt-fayl

Добрый день.
Кто поможет поправить меня со скобками?

SELECT DISTINCT *
FROM             tbl_ref_KAListing RIGHT OUTER JOIN
		  (((tbl_ref_KAListing AS tbl_ref_KAListing_1) 
		  RIGHT OUTER JOIN
		  (vw_DeclarationScanCopies 
		  RIGHT OUTER JOIN vw_Materials_Declarations_Latest ON  vw_DeclarationScanCopies.DclNum =  vw_Materials_Declarations_Latest.DclNum) 
		  (((((RIGHT OUTER JOIN vw_Material_wt_KA ON  vw_Materials_Declarations_Latest.MCode =  vw_Material_wt_KA.MCode) 
		  LEFT OUTER JOIN
		  vw_BOM_withNames AS vwGPs) ON  vw_Material_wt_KA.MCode = vwGPs.GP_MCode) 
		  LEFT OUTER JOIN
			 (SELECT        MCode
			   FROM             vw_PriceList_UA_Today
			   WHERE        (PL_TypeId = 1) AND (IsInLatestPL = 1)
			   ) AS vw_InPLRetail ON  vw_Material_wt_KA.MCode = vw_InPLRetail.MCode) 
		  LEFT OUTER JOIN
			 (SELECT        MCode
			   FROM             vw_PriceList_UA_Today AS vw_PriceList_UA_Today_1
			   WHERE        (PL_TypeId = 2) AND (IsInLatestPL = 1)
			   ) AS vw_InPLFS ON  vw_Material_wt_KA.MCode = vw_InPLFS.MCode) 
		  LEFT OUTER JOIN
		  vw_PriceList_Actual_ExportBY ON  vw_Material_wt_KA.MCode =  vw_PriceList_Actual_ExportBY.MCode ON 
		 tbl_ref_KAListing_1.UL_MCode =  vw_Material_wt_KA.MCode AND tbl_ref_KAListing_1.KAId = 2 ON 
		  tbl_ref_KAListing.UL_MCode =  vw_Material_wt_KA.MCode AND  tbl_ref_KAListing.KAId = 1) 
		  LEFT OUTER JOIN
		  vw_BOM_withNames ON  vw_Material_wt_KA.MCode =  vw_BOM_withNames.Compon_MCode AND 
		  vw_BOM_withNames.GP_Status <> 4) 
		  LEFT OUTER JOIN
		  (vw_CertificateScanCopies 
		  RIGHT OUTER JOIN
		  vw_Materials_Certificates_Latest ON  vw_CertificateScanCopies.CertNum =  vw_Materials_Certificates_Latest.CertNum) ON 
		  vw_Material_wt_KA.MCode =  vw_Materials_Certificates_Latest.MCode) 
		  LEFT OUTER JOIN
		  (vw_HygieneScanCopies 
		  RIGHT OUTER JOIN
		  vw_Materials_Hygienes_Latest ON  vw_HygieneScanCopies.HygNum =  vw_Materials_Hygienes_Latest.HygNum) ON 
		  vw_Material_wt_KA.MCode =  vw_Materials_Hygienes_Latest.MCode)
WHERE        ( vw_Material_wt_KA.StatusName <> 'Delisted') AND ( vw_Material_wt_KA.A1 <> 'PK')

http://www.sql.ru/forum/1101297/skobki

Здравствуйте, уважаемые эксперты!

Прошу помочь советом в затруднительной ситуации. Дело в том, что по необъяснимой причине создаваемый объект ADODB.Recordset ведет себя неадекватно. Загрузка данных из любого предлагаемого источника (таблицы, запроса) выполняется без сообщений об ошибках. При этом некоторое количество данных (2-5 записей) действительно "подтягиваются" в объект. Но и только. При обращении к первой "несуществующей" записи в объекте выдается исключение 3265 - "Элемент не обнаружен в данном семействе". В то же время, RecordCount отображает корректное количество записей в наборе (оно соответствует числу записей в источнике). Иллюстрация "загадки" на рис.1, под спойлером

+

/s28.postimg.org/dzrje6bl9/image.jpg">" target="_blank">http://s28.postimg.org/dzrje6bl9/image.jpg]

Что пробовал делать для решения проблемы:

- Использовать модель DAO вместо ADO;
- Всевозможно варьировать параметры Recordset-а (CursorLocation, CursorType, LockType, etc.)
- Применять различные эквивалентные конструкции кода для формирования Recordset-а и загрузки данных в него
- Переименовывать русскоязычные названия таблиц в базе на английский

Ни один из этих танцев с бубном способов не помог - результат был один и тот же. Чувствую, что проблема не должна быть сложной, но не вижу далее, в какую сторону копать.

Некоторые пимечания и исходные:

- Access 2003 (11.5614.5606)
- WinXP SP3
- Подключенные объектные библиотеки на рис.2

+

/s22.postimg.org/qek2at0ld/image.jpg">" target="_blank">http://s22.postimg.org/qek2at0ld/image.jpg]

- Пишу подобный код далеко не в первый раз, но с ситуацией столкнулся впервые.

С чем может быть связано такое поведение порграммы/базы?

Заранее спасибо за помощь!

http://www.sql.ru/forum/1101279/nepolnaya-zapis-dannyh-v-obekt-adodb-recordset

Private Sub Command2_Click()
Dim sFileName As String, sNewFileName As String

sFileName = "C:\goooooo\fffff.xls" 'имя исходного файла
sNewFileName = "C:\goooooo\dddd.xls" 'имя файла для переименования
If Dir(sFileName, 16) = "" Then MsgBox "Нет такого файла", vbCritical, "Ошибка": Exit Sub

Name sFileName As sNewFileName 'переименовываем файл

MsgBox "Файл переименован", vbInformation, "www.excel-vba.ru"
End Sub
нужна чтобы места dddd было текущая дата

http://www.sql.ru/forum/1101267/pomogite-pereimenovat-fayl

Есть период с 2013-01-01 00:00:00 по 2014-12-31 00:00:00, нужно сравнить дату с другого поля что б при совпадении даты (не времени) выводил 1, а если не совпадает то 0.

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

Уважаемые коллеги.

Программная оболочка (mde) создана в формате Access 2003. Связанные таблицы в А97 (Хотя это не принципиально. Есть уже вариант перевода в формат 2003, что позволило увеличить размер файлов с таблицами).

Вопрос: При работе с 64-битной версией Офиса какова вероятность появления проблем, и возможно ли будет оставить файлы со связанными таблицами в прежнем формате?

Спасибо.

http://www.sql.ru/forum/1101219/perehod-na-64-bitnuu-versiu-aksessa

Здравствуйте, очень необходима помощь знающего человека! У меня есть форма, которая выглядит следующим образом. То есть в верхние поля вводятся данные, а нижние сортируются согласно этим данным. Для поля стоимость мне надо чтобы выводились данные типа "не более", а для поля площадь "не менее". Все дело происходит в SQL. Пожалуйста, мне очень нужна помощь

http://www.sql.ru/forum/1101181/nuzhna-pomoshh-v-kode

Выскочила зарезервированная ошибка 1038. Сообщение о ней отсутствует. После сжатия и восстановления прилинкованных таблиц пропала. На своём компе эта же база с базой прилинкованных таблиц ошибку не выдала.

Как часто надо сжимать и восстанавливать базу с таблицами?

http://www.sql.ru/forum/1101153/szhatie-i-vosstanovlenie

Доброго времени суток. Дали задание сделать базу, но я не могу понять с чего мне начать. Я не могу понять какие таблицы и позиции нужно сделать. Задние заключается в том чтобы создать базу данных «Канцелярия» которая, должна содержать информацию о типах документов (входящие, исходящие), собственно о документе, адресате и корреспонденте. Нужно как минимум 3 таблицы. Помогите сделать эти таблицы, а с запросами я сам постараюсь справится.

http://www.sql.ru/forum/1101141/kancelyariya

Элемент ListView, в i-той строке, если 3-ий ListSubItem содержит не дату, то отсутствует 4-ый ListSubItem
Вот так работает:

            If IsDate(Me.LV.ListItems(i).ListSubItems(3)) Then
                Debug.Print Me.LV.ListItems(i).ListSubItems(4)
            Else
                Debug.Print "нету"
            End If

а вот так:

Debug.Print IIf(IsDate(Me.LV.ListItems(i).ListSubItems(3)), Me.LV.ListItems(i).ListSubItems(4), "нету")

сразу сообщает про индекс, который out of bounds.

http://www.sql.ru/forum/1101136/iif-kompiliruet-vsyo-vyrazhenie-nezavisimo-ot-togo-kakaya-vetka-budet-vypolnyatsya

Можно ли для формы в access если одно поле, значение которого выбирается из списка, задать второе связанное с ним, чтоб выбила автоматически.
Например, я выбираю из списка кодов экспертов один 4577 и в это время ФИО эксперта выставлялся автоматически.


п.с. над выплывающим списком кодов экспертов я еще потружусь.
Дело в том, что данные в таблице уже есть, а тип строки числовой, при попытке изменить тип acess ругается ошибка более чем понятна, но может есть способ как-то все исправить не перезаписывая данные?

http://www.sql.ru/forum/1101118/vypadaushhiy-spisok

ACCESS2010

при опреации найти-заменить не показывает количество замен

Можно настроить, чтобы показывало количество заменённых мест ?

Спасибо

http://www.sql.ru/forum/1101110/pri-operacii-nayti-zamenit-ne-pokazyvaet-kolichestvo-zamen

необходимо в существующую таблицу с данными импортировать данные с экселя, но.... в импортируемом файле существуют такие же данные как и в таблице акцесса. то есть необходимо ипортировать данные без повторений. в приципе повторения касаются только одного поля

http://www.sql.ru/forum/1101094/pomogite-s-imprtom