MS ACCESS 2003, WINDOWS10. После перехода на WINDOWS 10 наблюдается такое явление: Перестают работать конструкции типа ShellExecute(Me.hWnd, "Open",путь, 0&, 0&, SW_SHOWMAXIMIZED) или excel.Workbooks.Open (путь). В переменной путь всегда передается строка UNC типа "\\192.168.1.16\Папка\Подпапка\файл.расширение" Ошибка сводится к тому что файл не найден. Хотя файл на месте, через проводник виден, с правами доступа все в порядке. Подскажите в какую сторону копать для решения этой проблемы? В WINDOWS XP, 7, 8 такого явления не наблюдается.

http://www.sql.ru/forum/1272749/ne-rabotaet-otkrytie-faylov-iz-access

работаю с фискальным регистратором, но не суть.

Когда аппарат отключен, при попытке подконнектится - программа зависает на очень длительное время.
Секунд 10 или более.
Если в этот момент подсуетится, то Access вообще вывалится.
Вот так происходит подключение

    ECR.PASSWORD = "30"
    ECR.Connect

а затем ещё попытка что то получить из аппарата.

    If ECR.ResultCode <> 0 Then

Таким образом завислость ооооочень длительная.
А народ волнуется...

Что можно предпринять?

------------------------------------------------------------------------
Спасибо за ответ.

http://www.sql.ru/forum/1272742/otsledit-chto-dolgo-net-otklika-ot-ustroystva

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

Однако, при попытке подключить данные из аксесс запроса вылетает ошибка, что не хватает памяти. В диспетчере задач эксель в этот момент потребляет 1,7 гб оперативной памяти. Эксесс запрос связывает восемь баз, каждая из которых весит около 130 мб.

Все ли я делаю правильно? Есть ли возможность как-то избежать нехватки памяти? Может есть другие способы объединить таблички эксель в единую сводку, при этом сохранив возможность ее быстрого обновления?

http://www.sql.ru/forum/1272694/sozdanie-svodnoy-tablice-v-excel-iz-bazy-access

Добрый день!
Есть запрос который формирует данные с двумя столбцами Name и M:
Name M
1
1
1
1
221
221
221
221
3234
3234
3234
434
434
434
и.т.д

Нужно в поле M записать значение от 1 до 3 по порядку и так до конца датасета, что бы получилось что то типа:
Name M
1 1
1 1
1 1
1 1
221 2
221 2
221 2
221 2
3234 3
3234 3
3234 3
434 1
434 1
434 1
и.т.д

Я так понимаю, что нужно сравнить значение по строкам по полю Name, и если значение поменялось, записать в поле M необходимое
число. Подскажите пожалуйста как это реализовать в запросе.

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

http://www.sql.ru/forum/1272677/sravnenie-tekushhey-stroki-s-predydushhey

Господа, здравствуйте.

Есть код выброса данных в ворд по принципу нахождения куска текста.
Когда то ПЕНСИОНЕРКА помогла, за что еще раз ей спасибо.

          Set App = CreateObject("Word.Application") 
'                app.Visible = True
          App.Documents.Add OpenFiles
          Set odoc = App.ActiveDocument
          With App
              ' присваивание значений
              j = 0
              Do While j < i ' настройка форматирование выделяемого и редактируемого куска
                  .Selection.Find.ClearFormatting
                  .Selection.Find.Replacement.ClearFormatting
                  With .Selection.Find.Replacement
                      .Font.Color = 0
                  End With
                  With .Selection.Find
'                        Debug.Print xm(j), ym(j)
                      .Text = xm(j)
                      If ym(j) = " - " Then
                          .Replacement.Text = " "
                      Else
                          .Replacement.Text = ym(j)
                      End If
                      .Wrap = 1
                      .Format = True
                      .MatchCase = False
                      .MatchWholeWord = False
                      .MatchWildcards = False
                      .MatchSoundsLike = False
                      .MatchAllWordForms = False
                  End With
'                  .Selection.Find.Execute Replace:=2  сразу было так
'                  If .Selection.Find.Execute() = True Then  - вычитал на просторах про проверку перед заменой

'                 вылетает здесь
                  If .Selection.Find.Execute() = True Then .Selection.Find.Execute Replace:=2
' Replace=wdReplaceAll=2 - заменять все найденные
                  j = j + 1
              Loop
              App.Selection.HomeKey Unit:=6
              DoEvents
          End With

Работало несколько лет на нескольких компьютерах(но не много)
стало ИНОГДА бить ошибку в

.Selection.Find.Execute Replace:=2

порылся на просторах, вычитал про проверку найденного перед заменой и переписал

If .Selection.Find.Execute() = True Then .Selection.Find.Execute Replace:=2

но проблему не решил
ошибка
5833
An error occurred while saving undo information
В англ не силен, с транслейтом - Ошибка при сохранении отменить информацию

Кто нибудь сможет подсказать, что не так?

http://www.sql.ru/forum/1272673/eksport-v-word

помогите !
не могу подлинковать оракловые таблицы, делаю dsn и из аксесса и отдельно через ODBCAD32, результат один :
"... пользователем запрошена отмена текущей операции(#1013)" офис 32 разрадный, odbc пробовала из папки C:\Windows\SysWOW64.

http://www.sql.ru/forum/1272654/odbc-for-oracle

Встречался я раньше с такой проблемой. Даже кажется разбирался. Но вот столкнулся опять и не могу ничего вспомнить "отчего и почему".

Есть у меня в Access хранимых запрос "qry_Erase1"

DELETE Тб303Онс.КодСОАТОоб
FROM Тб303Онс
WHERE (((Тб303Онс.КодСОАТОоб) Like "1*"))
WITH OWNERACCESS OPTION;

Запускаю его на выполнение

                CurrentProject.Connection.Execute "qry_Erase1"

Никаких сообщений об ошибках нет, но данные не удаляются.
Запускаю его на выполнение

                CurrentDb.Execute "qry_Erase1"

Данные удаляются.

В чём дело? Почему в одних случаях запросы ADO выполняются, а в других - нет?

Вот такая конструкция выполняется без проблем.

    strSQL = "delete from ТбОператоры where КодОператора <> " & intCodOperator
    CurrentProject.Connection.Execute strSQL

Или всё дело в том, что там хранимый запрос, а здесь символьная строка?

Встречался я с этой проблемой в 2003 и 2010 версиях. В остальных наверное то же такая же ситуация.
-------------------------------------------------------------
А ты вложил уже свой кровный рубль в 50-ти миллиардное состояние Билла Гейтса?

http://www.sql.ru/forum/1272650/pochemu-odni-zaprosy-v-dao-rabotaut-a-ado-net

Здравствуйте. Пытаюсь разобраться в подключении фискальных регистраторов к программе написанной на Access. Под рукой имеется регистратор IKC-483LT. При попытке создания объекта для обращения к нему возникает следующая ошибка. Возможно кто-то сталкивался с подобным и может подсказать что делать, потому как я в тупике. Вот мой код и скрин ошибки.

Private Sub Start_Click()
'Создаем объект общего драйвера ККМ
Dim ECR As Object
Set ECR = CreateObject("IKC483LT")
'Занимаем порт
ECR.DeviceEnabled = True
Select Case ECR.ResultCode
Case -3
Call MsgBox("Порт занят другим приложением или данный порт отсутсвует в ПК либо ККМ не включено.", vbCritical + vbOKOnly)
Case 0
End Select

'Проверяем связь с ККМ.
Select Case ECR.GetCurrentMode
Case -1 'Нет связи с ККМ.
Call MsgBox("Нет связи с ККМ либо ККМ не включено!", vbCritical + vbOKOnly)
End Select

End Sub

http://www.sql.ru/forum/1272618/podkluchenie-fiskalnogo-registratora

Предметная область - отдел компьютерной техники в магазине.

Решаемые задачи: выдача сведений о товарах (описание, цена в руб. и у.е., количество на складе, марка и т.п.) и о их реализации (марка товара, продавец, дата продажи).
Запросы: Упорядочение по полям: тип товара и количество на складе; тип товара и цена.
Поиск: характеристики компьютера марки ХХ; продажи продавца УУ в день ХХ.
Выборка: принтеры по цене не более Y; товары, которых на складе осталось меньше 5 штук.
Вычисления: количество продаж за январь; сумма продаж продавца УУ.
Коррекция: удаление сведений о продажах за прошлый год; изменение цены в рублях в связи с изменением курса рубля;
Табличный отчет: информация о товарах; группировка по типам (отдельно - принтеры, компьютеры, мониторы и т.п.).

Вот что у меня получилось:
- Сами таблицы
- Запрос по товарам <5 штук
- Запрос по типу и цене
- Запрос по типу и количеству
а остальное не получается... помогите просто на примере (возможно у вас есть похожая база или видео как это делается)...

Свою базу прикрепил. (на укр. языке)

Буду благодарен!

http://www.sql.ru/forum/1272613/baza-dannyh-access-otdela-komputernoy-tehniki-v-magazine

Задача - подключиться извне(не из access) к файлу ms access 97 и получить путя к файлу прилинкованых (в этот файл) таблиц второго файла ms access 97.
Подключится получается, сделать выборку из MSysObjects нет :-), ODBC рапортует о том, что "отсутсвует разрешение на чтение...."
windows xp sp3, файл рабочих групп -дефолтный, сами mdb файлы созданы дефолтно - без ограничений, паролей и проч...
акция не разовая, т.е. руками не канает.
Свойство "Description" линкованной таблицы, я так понимаю, через ODBC тоже не получить (или я не прав?)

подключаюсь с локальным файлом

файл dsn
[ODBC] DRIVER=Microsoft Access Driver (*.mdb) UID=admin UserCommitSync=Yes Threads=3 SafeTransactions=0 PageTimeout=5 MaxScanRows=8 MaxBufferSize=2048 FIL=MS Access DriverId=25 DefaultDir= DBQ=c:\temp\db5.mdb

Вариант поднятия апликации не канает, самого ms access 97 нет.

http://www.sql.ru/forum/1272586/select-from-msysobjects-cherez-odbc-otsutsvuet-razreshenie-na-chtenie

Возникла следующая проблема.
Задача. Берётся исходная база данных, правится содержимое таблиц по определённым правилам. Вставляются формы, макрос autoexec и получается база под конкретного заказчика. Всё работало нормально. Но пришлось несколько усложнить задачу по формированию базы. Повесить дополнительный код. И программа стала вылетать по ошибке 29068 (смотри приложение)

Ошибка возникает в следующем фрагменте кода

    strPath = DLookup("Path", "tblPath", "NikName='RabPath'")  'CurrentProject.Path
    DestinationDatabase = fnBuildPath(strPath, "ONS_T.mdb")
    
    NewName = "frmAlarm"
    SourceObjectName = "frmAlarm"
    DoCmd.CopyObject DestinationDatabase, NewName, acForm, SourceObjectName


    NewName = "autoexec"
    SourceObjectName = "autoexec_"
    DoCmd.CopyObject DestinationDatabase, NewName, acMacro, SourceObjectName

Ошибка возникает после второго оператора DoCmd.CopyObject Иногда она не возникает (особенно после сжатия базы). Если проходишь под отладчиком, то никогда не случается. Возможно предыдущий оператор не всегда успевает отработать. Что делать? Пробовал ставить Sleep, не помогло.


-------------------------------------------------------------
А ты вложил уже свой кровный рубль в 50-ти миллиардное состояние Билла Гейтса?

http://www.sql.ru/forum/1272561/oshibka-29068

Всем привет. Необходимо соединить базы, которые содержат данные по продуктам. Берутся не все данные из базы, а только нужные столбцы и те строки, которые соответствую требуемым кодам товара по ТН ВЭД. Проблема возникает в задании диапазона этих кодов.

База содержит все коды начиная от 7200000000 до 7399999999, а нужны только строки, соответсвующие кодам от 7304000000 до 7306999999.

Сами коды записаны в столбце в формате текста. Поэтому при указании диапазона через where...between, запрос срабатывает неправильно.

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

(SELECT ND,GD0,G071,GD1,STAT,G011,G0131,G021,G022,G081,G082,G083, G221,G222,G11,G091,G092,G093,G141,G142,G143,G15,G15A,G16,G17A,G17B,G19,G33,G32,G31_1,TEXT1,G31_11,G31_12,G06,G31_7,G31_71,G37,G34,G35,G36,G38,G39,G42,G45,G46,G474RUB,G474DOL,G202,G2021,G23
FROM 72_73 in 'D:\72_73_04_2017.mdb'
WHERE g33 between "7204000000" and "7206999999")
UNION ALL
(SELECT ND,GD0,G071,GD1,STAT,G011,G0131,G021,G022,G081,G082,G083, G221,G222,G11,G091,G092,G093,G141,G142,G143,G15,G15A,G16,G17A,G17B,G19,G33,G32,G31_1,TEXT1,G31_11,G31_12,G06,G31_7,G31_71,G37,G34,G35,G36,G38,G39,G42,G45,G46,G474RUB,G474DOL,G202,G2021,G23
FROM 72_73 in 'D:\72_73_05_2017.mdb'
WHERE g33 between"7204000000" and "7206999999")
UNION ALL
(SELECT ND,GD0,G071,GD1,STAT,G011,G0131,G021,G022,G081,G082,G083, G221,G222,G11,G091,G092,G093,G141,G142,G143,G15,G15A,G16,G17A,G17B,G19,G33,G32,G31_1,TEXT1,G31_11,G31_12,G06,G31_7,G31_71,G37,G34,G35,G36,G38,G39,G42,G45,G46,G474RUB,G474DOL,G202,G2021,G23
FROM 06 in 'D:\72_73_06_2017.mdb'
WHERE g33 between"7204000000" and "7206999999")
UNION ALL
(SELECT ND,GD0,G071,GD1,STAT,G011,G0131,G021,G022,G081,G082,G083, G221,G222,G11,G091,G092,G093,G141,G142,G143,G15,G15A,G16,G17A,G17B,G19,G33,G32,G31_1,TEXT1,G31_11,G31_12,G06,G31_7,G31_71,G37,G34,G35,G36,G38,G39,G42,G45,G46,G474RUB,G474DOL,G202,G2021,G23
FROM 7 in 'D:\72_73_07_2017.mdb'
WHERE g33 between"7204000000" and "7206999999")
UNION ALL
(SELECT ND,GD0,G071,GD1,STAT,G011,G0131,G021,G022,G081,G082,G083, G221,G222,G11,G091,G092,G093,G141,G142,G143,G15,G15A,G16,G17A,G17B,G19,G33,G32,G31_1,TEXT1,G31_11,G31_12,G06,G31_7,G31_71,G37,G34,G35,G36,G38,G39,G42,G45,G46,G474RUB,G474DOL,G202,G2021,G23
FROM 72_73 in 'D:\72_73_08_2017.mdb'
WHERE g33 between "7204000000" and "7206999999")
UNION ALL
(SELECT ND,GD0,G071,GD1,STAT,G011,G0131,G021,G022,G081,G082,G083, G221,G222,G11,G091,G092,G093,G141,G142,G143,G15,G15A,G16,G17A,G17B,G19,G33,G32,G31_1,TEXT1,G31_11,G31_12,G06,G31_7,G31_71,G37,G34,G35,G36,G38,G39,G42,G45,G46,G474RUB,G474DOL,G202,G2021,G23
FROM 72_73 in 'D:\72_73_04_2016.mdb'
WHERE g33 between "7204000000" and "7206999999");

http://www.sql.ru/forum/1272519/zadanie-diapazona-cherez-where-between

Уважаемые специалисты, прошу помочь разобраться с ошибкой при создании отчета, содержащего подчиненный отчет.
Суть базы данных: Предприятие заключает договоры на выполнение работ. Во исполнение каждого договора своим подразделениям предприятие открывает заказы. Таким образом имеем: на каждый договор - по несколько заказов. Хочу, чтобы так и в отчете отражалось. А выходит, что под каждым договором подчиненный отчет выводит вообще все заказы, содержащиеся в базе по всем договорам.
Таблица "Договоры" и таблица "Заказы" имеют одноименные поля совместимые по типу. Связи, вроде бы правильные.
Тем не менее:
- при перетаскивании отчета "Заказы" в отчет "Договоры", получается что под каждым договором выводятся вообще все заказы, т.е. автоматически отчеты не связываются.
- попытался с помощью элемента управления "Подчиненная форма/отчет". На этапе мастера, когда нужно указать связанные поля, Access выводит сообщение об ошибке: "Выбранная связь не может быть использована. Она была создана на основе отношений между исходными таблицами. Перейдите для ее использования на предыдущую страницу и добавьте пропущенные поля."
Одним словом, не могу связать подчиненный отчет с главным.
Упёрся, как в стену. Помогите отыскать причину. Спасибо всем, кто откликнется. Знаю, что безграмотен, поэтому сарказм принимаю как должное. Файл базы прилагаю.

http://www.sql.ru/forum/1272513/sozdanie-podchinennogo-otcheta

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

http://www.sql.ru/forum/1272415/kak-sdelat-mnogopozicionnyy-flazhok-v-lentochnoy-forme

ms Access 2007
На форме лежит кнопка, а рядом два рисунка.
Пытаюсь поочерёдно класть на кнопку с элементов типа РИСУНОК - их изображения.
Me!BTN.Picture = Me!Picture1.Picture
Пока что кладут на меня, не более того.
------------------------------------------------------------------------
Не хотелось бы использовать для этих целей - доп файлы с рисунками.
Решаема ли задача?
------------------------------------------------------------------------
СПС

http://www.sql.ru/forum/1272411/prisvoit-knopke-izobrazheniya-s-elementa-upravleniya-risunok

Здравствуйте!!! Нужно столбец №_специальности сделать по умолчанию например на "5".
Таблицу создал через конструктор запросов. Нужно вместе с таблицей создать №_специальности со значением по умолчанию!(Значение любое). Спасибо!

create table список
(КодГруппы Counter Constraint PrimaryKey PRIMARY KEY,
Фамилия char(6) NOT NULL,
Номер_зачетки char(20) UNIQUE,
Адрес char (12),
Год_поступления int NOT NULL,
№_специальности int,
№_группы int);

http://www.sql.ru/forum/1272370/znachenie-po-umolchanie-sql

Добрый день, форумчане! Только изучаю программирование , подскажите в чем ошибка, не могу в закладки ворда вставить данные с акцеса.
Заранее спасибо

http://www.sql.ru/forum/1272282/kak-vstavit-dannye-v-vord-pomogite

Собственно такой вопрос.
Есть задача создать собирательную БД, части которой будут заполнять юзеры с разных отделов.
Разделить просто формами вводы не вариант, потому как если чего произойдёт - будут валить друг на друга.

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

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

В общем, может немного сумбурно, но буду рад любому комментарию, кто практически занимался реализацией такого рода проблемы.

http://www.sql.ru/forum/1272256/podskazhite-kak-razdelit-prava-dostupa-k-tablicam

Есть таблица:

id | nam
----------
1  | vasya  
1  | ivan
2  | petr
1  | masha

Надо чтобы запрос вернул:
-------------------------------

1  | vasya,ivan,masha
2  | petr

Можно ли такое сделать ?

http://www.sql.ru/forum/1272213/znacheniya-poley-raznyh-strok-v-odno-ch-z-zapyatuu

Добрый день!

Есть БД на sql-сервере. Есть проект .adp, который подключается к этому серверу.
В проекте есть отчет (счет-фактура). Данные для отчета берутся из view.

Проблема выглядит так. При выводе отчета с моего компьютера отчет строится быстро, (независимо от скорости соединения - из локальной сети или при медленном подключении через vpn). Access - 2010
Рядом стоит компьютер с Access - 2003. Отчет строится быстро.
На другом компьютере с Access - 2010 отчет строится от 30 секунд до 5 минут.

При этом другие отчеты отрабатываются быстро! Только этот один - медленно.

Есть ли какие-либо гипотезы? Пока голову сломал....

http://www.sql.ru/forum/1272182/problema-s-bystrodeystviem-otcheta-na-nekotoryh-mashinah