-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4

Invalid link!








Добавить любой RSS - источник (включая журнал LiveJournal) в свою ленту друзей вы можете на странице синдикации.

Исходная информация - http://www.sql.ru/forum/actualtopics.aspx?bid=4.
Данный дневник сформирован из открытого RSS-источника по адресу http://www.sql.ru/forum/actualrss.aspx?id=4, и дополняется в соответствии с дополнением данного источника. Он может не соответствовать содержимому оригинальной страницы. Трансляция создана автоматически по запросу читателей этой RSS ленты.
По всем вопросам о работе данного сервиса обращаться со страницы контактной информации.

[Обновить трансляцию]

Остановить выполнение при определенном значении

Вторник, 28 Января 2014 г. 11:23 + в цитатник
Есть цикл, внутри значение некоторого счетчика. Нужно остановить выполнение процедуры (как если бы я поставил breakpoint) при определенном значении этого счетчика. Ну или пусть это будет просто переменная (чтоб не зацикливаться на счетчике).
Спасибо.
_____________________
А что на самом деле хотел сказать Frost_Imp никто не знает, так как администрация форума попросила его быть вежливым.

http://www.sql.ru/forum/1073881/ostanovit-vypolnenie-pri-opredelennom-znachenii


Как закрыть подключение к серверу после синхронизации реплики

Вторник, 28 Января 2014 г. 11:00 + в цитатник
Здравствуйте форумчане!
У меня есть база данных с репликами. Основная реплика на одном из компьютеров (ОС не сервер, поэтому не более 10 подключений одновременно). Когда кто-то включает у себя на компьютере реплику, она автоматически синхронизируется командой CurrentDb.Synchronize .. Но почему-то после синхронизации не разъединяется подключение клиентского компьютера к "серверу", до тех пор, пока у клиент не закроет свою реплику (проверял командой net session на сервере). Соответственно, если 10 уже работают, то 11-й клиент не может синхронизировать свою реплику.
Как программно заставить клиентский компьютер прекращать подключение сразу после синхронизации?

http://www.sql.ru/forum/1073877/kak-zakryt-podkluchenie-k-serveru-posle-sinhronizacii-repliki


Запрет добавления новой записи на форму до выполнения условия

Вторник, 28 Января 2014 г. 10:53 + в цитатник
имеется:

Таблица "Название фазы"
код названия - счетчик (ключ)
название фазы - текст

Таблица "Фаза"
код фазы - счетчик
фаза - мастер подстановок на поле код названия из таблицы "название фазы"
документация подписанной фазы - вложение

Форма "Фазы" созданная по таблице "Фаза"
на форме имеется поле со списком,источником данных для которого служит поле "фаза"
и поле вложения источник данных "документация подписанной фазы".

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

Всю голову уже сломал себе, никак не могу придумать как реализовать.

Буду признателен за помощь

http://www.sql.ru/forum/1073875/zapret-dobavleniya-novoy-zapisi-na-formu-do-vypolneniya-usloviya


Странная потеря фокуса в поле вода.

Понедельник, 27 Января 2014 г. 16:20 + в цитатник
Как можно объяснить и исправить такое поведение текстового поля:

Картинка с другого сайта.
Скрин кода с ошибкой. Ошибка на точке останова.

На скрине кусок кода обработки события Change поля ввода. Пока в поле начинают вводить какие-либо данные все идет как положено, но если в результате фильтрации в Области данных нет ни одной строки - возникает такая ошибка.
В поле Immediate видно, что в момент ошибки фокус установлен именно на этом поле, мало того не помогает даже SetFocus на него же.

http://www.sql.ru/forum/1073736/strannaya-poterya-fokusa-v-pole-voda


Избавится от фокуса на саму форму

Понедельник, 27 Января 2014 г. 13:57 + в цитатник
У меня есть форма с вкладками, а на этой вкладке субформа
При открытии формы всегда открывается первая вкладка и фокус на самой границе субформы формы первой вкладке!!!!
Ставлю при открытии событие на переход фокуса на первый контрол на этой субформе, а он мне на границе субформы стоит!
В чем засада?
Для проверки сделал кнопку и поместил код в нее для проверки работы кода, и вот при нажатии кнопки все отлично фокус работает как надо. А при открытии формы не работает

http://www.sql.ru/forum/1073706/izbavitsya-ot-fokusa-na-samu-formu


Прижать форму к низу экрана к правому углу.

Понедельник, 27 Января 2014 г. 13:36 + в цитатник
Понятно что при загрузке на событие open нужно повесить что то типа :
If Me.Moveable Then
Me.Move Left:=X- Me.width, top:=Y- Me.ОбластьДанных.height
End If
Где Х и У - высота и и ширина рабочей области окна аккесс
Только как его узнать?
И что из них в твипах что пикселах?
Вобщем если есть у кого похожий пример, если не затруднит..

http://www.sql.ru/forum/1073698/prizhat-formu-k-nizu-ekrana-k-pravomu-uglu


Просьба помочь

Воскресенье, 26 Января 2014 г. 22:54 + в цитатник
Наверное это элементарно, но я не очень силен, может кто нибудь поможет?
Такие задания:
- вывод списка сотрудников, прошедших стажировку в заданной организации в заданный интервал дат;
- определение среднего объема (в часах) программ повышения квалификации в рамках стажировок, которые прошли сотрудники заданного подразделения в заданный интервал дат.

http://www.sql.ru/forum/1073617/prosba-pomoch


Как посчитать количество повторяющихся значений в SQL Access

Воскресенье, 26 Января 2014 г. 21:37 + в цитатник
Есть таблица Имя и Статус. Нужно вывести количество статуса по имени.
Должно выглядеть вот так
ИМЯ Статус"в работе" Стутус"сдан" Стутус"Ожидает"
Иванов 22 45 10
Сидоров 3 34 55

http://www.sql.ru/forum/1073614/kak-poschitat-kolichestvo-povtoryaushhihsya-znacheniy-v-sql-access


Сообщения об ошибках в access

Воскресенье, 26 Января 2014 г. 19:48 + в цитатник
Нужно, чтобы при отсутствии файла, из которого берутся таблицы, либо вообще не появлялась ошибка, либо выводилась ошибка с написанным мной текстом.

http://www.sql.ru/forum/1073597/soobshheniya-ob-oshibkah-v-access


Программно изменить ширину столбца в запросе

Воскресенье, 26 Января 2014 г. 14:17 + в цитатник
Должно работать для любого запроса у которого неизвестно заранее ни число столбцов ни их название
НО НЕ РАБОТАЕТ!
===================================
Dim qdf As QueryDef

Set qdf = CurrentDb.CreateQueryDef("q", SQL) 'Создать запрос
DoCmd.OpenQuery "q" 'Открыть запрос

Dim ictl As Integer
Dim caption As String

For ictl = 0 To Screen.ActiveDatasheet.Controls.Count - 1
MsgBox Screen.ActiveDatasheet.Controls(ictl).Controls.caption
'Screen.ActiveDatasheet.Controls(caption).ColumnWidth = -2
Next ictl

CurrentDb.QueryDefs.Delete qdf.Name 'Удалить запрос из коллекции QueryDefs

http://www.sql.ru/forum/1073558/programmno-izmenit-shirinu-stolbca-v-zaprose


Как поместить активную запись посередине ленточной формы?

Воскресенье, 26 Января 2014 г. 11:08 + в цитатник
Хочу не просто переходить на нужную запись, но и обеспечить видимость ее соседей до и после, если таковые есть. Вот, сваял, но работает не совсем корректно. Примерно знаю почему и вопрос не в этом, а...

... вдруг кто видел или имеет аналогичные и, может, более изящные решения?

+ Код
Private Sub sb_DttRfr(pID&, pDtt$())
Dim rst As Recordset, bkm(-1 To 1) As Variant
Dim j%
Dim i As Byte
    With Form_fDttAdd
        .Painting = False
            .RecordSource = fn_SQL(pID, pDtt) ' SQL query compose
            
            Set rst = .RecordsetClone
            With rst
                .FindFirst "[ID] = " & (70000 + pID)
                If .NoMatch Then Stop
                bkm(0) = .Bookmark
                For j = -1 To 1 Step 2
                    i = 0
                    Do
                        bkm(j) = .Bookmark
                        Select Case j
                            Case -1:    .MovePrevious
                            Case 1:     .MoveNext
                            Case Else:  Stop
                        End Select
                        i = i + 1
                        If i > 4 Then Exit Do
                    Loop Until (.BOF Or .EOF)
                    .Bookmark = bkm(0)
                Next
            End With
            .Bookmark = bkm(-1)
            .Bookmark = bkm(1)
            .Bookmark = bkm(0)
        .Painting = True
    End With
End Sub


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

http://www.sql.ru/forum/1073541/kak-pomestit-aktivnuu-zapis-poseredine-lentochnoy-formy


Запрос с параметром в MC Access

Воскресенье, 26 Января 2014 г. 07:34 + в цитатник
Помогите пожалуйста, как правильно сформировать запрос:
1)Запрос с параметром, в котором при вводе в окно параметра Цель Нарушения на экран будут выводиться сведения о нарушениях на участке отделений.
2)Запрос с вычисляемым полем, с помощью которого можно получить информацию о возрасте нарушителя. При этом указать фамилию, имя, национальность, дату и участок задержания.
3)Итоговый запрос о количестве нарушителей, задержанных на каждом отделении.

http://www.sql.ru/forum/1073535/zapros-s-parametrom-v-mc-access


Работа с данными, содержащихся в одной таблице, из двух разных форм

Воскресенье, 26 Января 2014 г. 01:06 + в цитатник
Добрый день, господа!

Не могу пока решить такую задачу. Есть таблица с полями (полей больше, но к данному вопросу другие поля отношения не имеют):
1. Табельный номер;
2. Фамилия;
3. Имя;
4. Поощрения.
5. Замечания.

Суть.

Есть форма, созданная на основе этой таблицы. При этом на созданной форме отображается информация из полей "Табельный номер", "Фамилия", "Имя". На этой же форме есть две кнопки - "Поощрения" и "Замечания". При нажатии на кнопку открывается соответствующая новая форма, т. е. форма "Поощрения" или форма "Замечания". На формах "Поощрения" и "Замечания" сделан элемент управления "Поле", который связан с соответствующими полями из таблицы.

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

Буду признателен за помощь.

http://www.sql.ru/forum/1073523/rabota-s-dannymi-soderzhashhihsya-v-odnoy-tablice-iz-dvuh-raznyh-form


Учет движения оргтехники

Суббота, 25 Января 2014 г. 22:58 + в цитатник
Добрый день, друзья.
Нужна простая бесплатная программа для учета движения основных средств между филиалами и складами компании (куда что ушло. остатки на складах и т.п.), мне казалось, что такие любительские программы на access есть, но найти не смог, только платные и навароченные. Посоветуйте, если подобные есть в природе. Заранее спасибо.

http://www.sql.ru/forum/1073501/uchet-dvizheniya-orgtehniki


Как быстро проверить уникальность значений поля?

Суббота, 25 Января 2014 г. 14:45 + в цитатник
Есть числовое поле (byte) в табличке, которое должно быть уникальным. Но, в процессе работы пользователя с ней, оно может и должно принимать неуникальные значения. Поэтому уникальный индекс на него не поставить. А вот перед тем как юзеру начать работу с таблицей и, после принятия решения, закончить, поле надо проверить на уникальность.

Понятно, что можно тупым перебором, можно запросом. А нет ли чего-нибудь изящного, однострочного?

http://www.sql.ru/forum/1073430/kak-bystro-proverit-unikalnost-znacheniy-polya


Перенос таблиц на Firebird и сопутствующие вопросы

Суббота, 25 Января 2014 г. 12:19 + в цитатник
Было: Access 2003 отдельная mdb с таблицами и несколько клиентских с формами и логикой. В связи с неизвестно чем (резкое увеличение пользователей, новые компы, и т.п) табличная mdb регулярна стала падать в нераспознаваемый формат базы данных. Решено клиетов оcтавить пока на Access, а таблицы экстренно перенести на Firebird. Время на перенос - тодна ночь, пока юзеры спят. Делала так:(Firebird-2.5.1, ibe, Firebird_ODBC_2.0.2.153)
С помощью ibe сделала импорт всех таблиц из табличного mdb.
Особенности, которые сразу бросаются в глаза =
поля типа boolean стали varchar и заполнились словами TRUE FALSE,
Через odbc делаю связь с таблицами и тестирую клиента - делаю запись в эти поля - пишет -1 и 0. Решею так и оставить и меняю запросом все под нолики и единички.
Дальше тестирую клиента - не работают выборки по дате, смотрю в таблицы - дата стала varchar 255, соответственно выборки по дате лексикографические. Меняю на Date, и тестирую клиента -выборки корректные, но вместо 17.01.2014 вижу 2014-01-17. Вот тут впарилась...
Как на клиенте переделать теперь, чтобы пользователи не заметили разницы?

Организация на клиенте самая простая : для формы указан источник записей - прилинкованная через odbc таблица, на ней Edit с заполненным свойством данные, еще маска ввода стояла стандартная для краткого формата даты. Больше никаких накруток не было.

http://www.sql.ru/forum/1073090/perenos-tablic-na-firebird-i-soputstvuushhie-voprosy


Скорость поиска в рекродсете по строке

Пятница, 24 Января 2014 г. 18:33 + в цитатник
Доброго времени суток. Прошу помощи или хотя бы объяснения.

Имеется таблица t1 с полями ID, Str
Из Excel загружаю во временную таблицу t2 данные (допустим по 15000 несколькими итерациями)

Далее идёт модуль к которому собственно вопросы.

Сейчас выполняется проверка
If IsNull(DLookUp("[ID]","t1","[Str]='" & t2!Stroka & "'") then
    recordset.addnew
else
    recordset.edit
end if


Первая итерация занимает 40 сек, вторая 6-7 минут, третья 30 и далее...

Мною были предприняты различные попытки изменения алгоритма:
FindFirst
.FindFirst "[Str]='" & t2!Stroka & "'"
If .nomatch then
    .addnew
else
    .edit
end if

Seek (таблица прилинкованная поэтому через OpenForSeek)
 
Set stbl = OpenForSeek("t1")
stbl.Index = "Str"
stbl.Seek "=", t2!Stroka
If stbl.NoMatch Then....

Стало хуже... уже первая итерация грузит 6 мин. Как так? Индекс по строке проставлен.

Создайте еще более понятный интерфейс и мир создаст еще более тупого юзера.

http://www.sql.ru/forum/1072991/skorost-poiska-v-rekrodsete-po-stroke


Отдельный ColumnHeader (в ListView) св-в относящихся к шрифту своего текста не имеет?

Пятница, 24 Января 2014 г. 18:05 + в цитатник
нашёл только
ListView.ColumnHeaders(i).Text
выводит непосредственно заголовок столбца
а всякие там FontBold...Italic...ForeColor ему не присвоить?

http://www.sql.ru/forum/1072982/otdelnyy-columnheader-v-listview-sv-v-otnosyashhihsya-k-shriftu-svoego-teksta-ne-imeet


публикация полей типа Вложения во внешних приложениях типа Word

Пятница, 24 Января 2014 г. 17:16 + в цитатник
Всем привет! Как лучше выложить поле типа Вложение с тремя подполями во внешний файл Word через стандартный способ слияния? Или так не получится? Желательно, чтобы картинка в Word была видна, а не ссылка на неё.

============================================================================================================
"О, сколько нам открытий чудных готовит просвещения дух, и опыт - сын ошибок трудных, и гений - парадоксов друг, и случай - бог изобретатель" (Пушкин, однако).

http://www.sql.ru/forum/1072967/publikaciya-poley-tipa-vlozheniya-vo-vneshnih-prilozheniyah-tipa-word


как зайти в интерфейс написания sql-запросов в access 2010

Пятница, 24 Января 2014 г. 14:55 + в цитатник
Добрый день, уважаемые форумчане, подскажите пожалуйста, никак не могу найти следующее, есть SQl база открытая через Access 2010, куда нужно зайти в Access 2010, чтобы открыть интерфейс для написания SQL-запросов?. Заранее спасибо

http://www.sql.ru/forum/1072921/kak-zayti-v-interfeys-napisaniya-sql-zaprosov-v-access-2010



Поиск сообщений в rss_sql_ru_access_programming
Страницы: 353 ... 12 11 [10] 9 8 ..
.. 1 Календарь