Всем привет!
Можно ли в качестве источника для подчиненной формы указать форму, созданную через
Frm=new form?

http://www.sql.ru/forum/1121794/virtualnaya-podchinennaya-forma

Возникла задача, прошу помощи клуба.
В MS Access 2010 крутится база, которая оперирует расписанием транспорта. Та печка, от которой танцуют, называется SSIM -- есть такой формат для расписаний. Файл SSIM дешифруется в таблицу, ее особенностью (и формата тоже) является указание диапазона дат и дней недели для каждого рейса. Например, так выглядит запись о рейсе SU320 Москва - Мале:

[Flight]  [EffDate]   [DisDate]   [Freq]   [DeptArp] [ArvlArp]
320       25.06.2014  25.10.2014  ..3..6.  SVO        MLE

Функция соответствия дня недели строке в поле [Freq] написана, с этим проблем нет. Задача же состоит в том, чтобы "распаковать" диапазоны и вместо них получить список рейсов по конкретным датам в заданный промежуток времени. Например, если задать начальную и конечную даты Date1=#01.09.2014# и Date2=#15.09.2014#, то ожидаемый результат должен быть таким:

[Flight]  [FDate]     [DeptArp]  [ArvlArp]
320       03.09.2014  SVO        MLE
320       06.09.2014  SVO        MLE
320       10.09.2014  SVO        MLE
320       13.09.2014  SVO        MLE

Какие идеи? Как написать такой запрос?

http://www.sql.ru/forum/1121743/ot-diapazonov-k-konkretnym-datam

Есть база в которой две таблицы связаны связью один к многим (т.е. в одной таблице хранится код значения другой). Так как во второй таблице только один столбец удобней хранить данные в одной таблице, как их правильно слить.

http://www.sql.ru/forum/1121701/kak-obedinit-dve-tablicy

Всем доброго времени суток. Может кто-то знает, можно ли из Delphi при добавлении поля в таблице БД Access добавить его описание?

http://www.sql.ru/forum/1121598/delphi-dobavit-opisanie-polya-v-tablice-access

Добрый день. Появилась задача, переименовать колонки некоторых таблиц в базе.
я переименовываю следующим образом:

CurrentDb.TableDefs(table.Name).Fields(oldColumnName).Name = NewColumnName

К главное базе подключены внешние базы (mdb).. из-за чего мне приходится делать проверку, в текущей ли базе находится
таблица, столбец в которой мне нужно поменять..
Если не в текущей, то переименовываю вот так:

Road = Mid(CurrentDb.TableDefs![table].Connect, 11)
Set db = OpenDatabase(Road, False, False)
db.TableDefs(table.Name).Fields(oldColumnName).Name = GetReplaceName(oldColumnName)

Всё работает хорошо до тех пор, пока я не натыкаюсь на таблицу, в которой столбец ссылается на другую таблицу..
и мне вылетает вот такое сообщение об ошибке:

Operation not supported on linked tables

Подскажите каким образом я могу обойти это "проблему"?
Быть может мне каким-то образом дублировать схему таблиц и после как-то их восстанавливать, попутно меняя имена нужным мне столбцам или быть может как-то иначе?

Спасибо

http://www.sql.ru/forum/1121580/pereimenovanie-stolbca-odnoy-tablicy-kotoraya-libo-k-kotoroy-privyazana-k-drugoy-tablice

Всем добрый день!
Встала проблема, как в vba вызвать процедуру, название которой храниться в ячейке таблице.
О том какую имеено процедуру надо вызвать access будет понимать выполнив ряд запросов, в итоге в переменную из запроса записывается имя процедуры. И ее надо выполнить, но код call tmp в переменной tmp содержится название процедуры выдает ошибку. Подазриваю что access пытается выполнить процедуру "tmp", а это не правильно.

Вообщем помогите!!!

http://www.sql.ru/forum/1121571/kak-vyzvat-proceduru-nazvanie-kotoroy-hranitsya-v-tablice

Есть у меня на форме ряд полей. Пользователь последовательно переходит с поля на поле. Он может вводить новые записи и править старые. Данные в поле он может править, а может и пропускать. Данные в полях зависят друг от друга. (не все и не от всех). Например, есть поле "Получено отчётов" и есть поле "Обработано отчётов". Значение поля "Обработано отчётов" на может превышать значение поля "Получено отчётов". Поскольку пользователь может ничего в поле не исправлять, то контроль правильности я повесил на событие "Потеря фокуса" (LostFocus). Вот Код

Private Sub кол_ввод_LostFocus()
   if Me.кол_от < Me.Кол_ввод then
      Call MsgBox(.......)
      Me.кол_от.SetFocus      
      Me.кол_ввод.SetFocus      
      Exit Sub		
   End if
End Sub

Т.е. если есть ошибка, то выдаётся сообщение об ошибке, указатель никуда не переходит, а остаётся в поле "Обработано отчётов".
Но при таком положении событие "Потеря фокуса" (LostFocus) повторно не срабатывает. Пользователь читает замечание, закрывает сообщение и спокойно идёт дальше по полям. Второй раз контроля не происходит.

Пример. Пользователь корректирует старую запись. Было получено 9 отчётов и обработано 9 отчётов. Пользователь правит в Поле "Получено" 9 на 8, потом переходит на поле "Обработано" и просто хочет уйти с этого поля. Срабатывает проверка на событии "Потеря фокуса" (LostFocus). Пользователь прочитал сообщение, закрыл окошко с ним. и пошел дальше по полям. Второй раз контроль не выполняется.

Как тут быть? Как заставить программу повторно выполнять контроль?

У меня А2003, но в других версиях скорее всего то же самое.


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

http://www.sql.ru/forum/1121565/povtornyy-lostfocus-ne-srabatyvaet

Сделал кнопку с кодом
Private Sub Command20_Click()
[Field1].Value = Now()
End Sub
которая ставит время нажатия в поле Fileld1, в обычной форме работает но вот только пробую с формой Несколько элементов то значение во всех строках меняется на одно и тоже время, в мне нужно для каждой своё время нажатия.
Заранее спасибо ))

http://www.sql.ru/forum/1121564/pomogite-pozhaluysta-s-formoy-neskolko-elementov

Как развернуть форму во весь экран? Как бы и разворачивает но не на весь экран, все равно нужно нажимать развернуть.

http://www.sql.ru/forum/1121538/forma-vo-ves-ekran

Досталась мне для доработки чужая программа.
Форма/подформа
В одном месте в подформе есть выражение

If Me.Parent.Chap = 0 Then
  If IsNull(Me!пр_отч) Then
    If MsgBox("Отсутствует признак отчетов!", , "Внимание!") = 1 Then Me.пр_отч.SetFocus
    Exit Sub
  End If
End If

Меня интересует вот это Me.Parent.Chap
Что такое Chap ?
Пока не нашел, что это...

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

http://www.sql.ru/forum/1121535/chto-takoe-me-parent-chap

Сообщение в теме.

http://www.sql.ru/forum/1121346/kak-skryt-formu-access-a-formu-prilozheniya-ostavit

Есть ли какая нить метод?

http://www.sql.ru/forum/1121337/kak-v-tablichnoy-podchinennoy-forme-ubrat-vydelenie-poley

как программно закрыть открытую стандартную форму поиска и запомнить искомое через неё значение?

нашёл только как открыть через domenuitem, надо ещё бы и закрыть при случае)

http://www.sql.ru/forum/1121326/kak-zakryt-formu-poiska

В процессе создания приложения возник вопрос по передаче данных полей ленточной формы в таблицу в WORDE.
Допустим имеется ленточная форма с полями:
Дата ВРемя Место
____________________________
Где имеется неизвестное количество строк от 1 до 100

Как возможно в вставить в вновь создаемый документ WORD таблицу с такими данными. Закладки решают вопрос, Но как сделать так, чтобы все строки выгрузились в таблицу в WORDе?

http://www.sql.ru/forum/1121270/vygruzka-dannyh-lentochnoy-formy-v-tablicu-v-word

Добрый день.
Нужна помощь в реализации следующей хотелки.
Хочу реализовать следущее поведение:
В таблице хранятся формулы. Нужно выполнить Update поля в соответсвии с этой формулой. Все данные для формулы будут в соответствующем запросе. Пока есть мысли через рекордсеты, что-то по типу этого:

strFormula = rst.Formula
set rstTemp = Db.openrecordset("SELECT " & strFormula & " FROM [table] WHERE bla-bla")
curNewValue = rstTemp.Fields(0).value 
rst.Pole= curNewValue
rst.MoveNext

Как-то лучше/проще можно реализовать?

http://www.sql.ru/forum/1121220/hranenie-formul-v-tablice

Добрый вечер!
наткнулся на проблему, помню что когда то ее решал но сейчас не могу найти как.
опишу пример который более показывает что мне надо.
Есть таблица сострудников (ФИО+.....)
есть подчиненная таблица взысканий сотрудников. где тип взыскания (варианты ограничение таблицей подстановок) и причина взыскания.
Потом на каждую комбинацию - сотрудник - вид взыскания - причина есть третья таблица где прописаны мероприятие которое проведено по данному факту начальником.

так вот - надо создать такой запрос,или с помощью DevGrid таблицу, чтобы в ней без повторений был список всех сотрудников, затем поле со списком где выбирается вид взыскания (список вываливается весь из таблицы подстановок, даже если на данного сотрудника такого типа взыскания нет). Выбирается вид взыскания и затем в след. поле со списком можно выбрать причину по которой наложили взыскание на данного сотрудника. если такого типа взыскания на С не наложено то ПСС пустой.
Далее, когда выбрана причина взыскания в след. поле появляется мероприятие кот. было проведено начальником.
Исходные все данные забиты. надо только сделать такой вот вид запроса.
Не говорите, что так неудобно или что либо - надо именно так.
Помню что я так делал. но не помню как.

Единственное что лезет на ум это создание темп -таблицы, переливка туда всех сотрудников и уже 3 поля последних заполнять полем со списком а источник данных делать запрос.
Может вариант есть получше?!!!!

http://www.sql.ru/forum/1121180/tablica-dochernyaya-forma-v-pole-so-spiskom

Буду краток, на форме кнопка со встроенной макр/к дублирования записи (созданная с помощью Мастера созд. кнопок), нужно добавить код [Дата].Value="", дабы дублировалась запись но с пустым полем Дата

http://www.sql.ru/forum/1121123/dobavlenie-procedury-ko-vstroennoy-makrokomande-brrrr

Есть поле гиперссылка на форме, как вписать туда .Address??

http://www.sql.ru/forum/1121061/giperssylka-ne-mogu-zapisat-adres-help

Подскажите пожалуйста, что не так?
В самом запросе Access выборка за 12 часов работает

SELECT Події.[№ з/п], Події.Датачас, Події.Датачас2, ЧРЦ1.Цех, Події.[Хід події]
FROM Події INNER JOIN ЧРЦ1 ON Події.[Вузол зв'язку] = ЧРЦ1.ВЗ
WHERE (((Події.Датачас)>=DateAdd("h",-12,Now()))) OR (((Події.Датачас2)>=DateAdd("h",-12,Now())))
ORDER BY Події.Датачас;

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

strQry ="SELECT Події.[№ з/п], Події.[Код події], Події.Цех, Події.[Вузол зв'язку], Події.Датачас, Події.Подія, " _
& " Події.[Хід події],   Події.[Хто повідомив], Події.[Прийняв повідомлення], Події.[Передано в БЦТЗ], Події.[Подія завершена], " _ 
& " Події.Датачас2 " _
& " FROM Події INNER JOIN ЧРЦ1 ON ÏПодії.[Вузол зв'язку] = ЧРЦ1.ВЗ " _
& " WHERE (((Події.Датачас) >= DateAdd(hour, -12, Now()))) " _
& " ORDER BY Події.Датачас"

http://www.sql.ru/forum/1121052/vyborka-po-date

Добрый день!
Пожалуйста, подскажите, как решить следующую задачку:
Имеется таблица с н-ным количеством столбцов с однотипным содержанием. Задача получить таблицу из 2 столбцов, где один будет включать содержимое всех столбцов прошлой таблицы, а второй - названия столбца, из которого взята конкретная ячейка.
Было:

С1 С2 С3 1 1 2 2 3 4

Нужно:

№1 №2 С1 1 C1 2 C2 1 C2 3 C3 2 C3 4

Заранее спасибо!

http://www.sql.ru/forum/1121027/sdelat-stolbec-iz-zagolovkov-pri-obedinenii-stolbcov