Добрый день. У меня есть файл акцесс к примеру "База1". Как мне, работая в "База1", открыть из другого файла, например "База2", форму "Форма1"?

http://www.sql.ru/forum/1248987/vyzov-formy-iz-drugogo-fayla

База данных расположена в MySql
Подчинённая таблица через ODBC подключена к Аксес
Две таблицы связаны по полю "idsub" 1:М.
Характеристики основной таблицы :
- кол строк - 1,0 млн (может больше )
- количество столбцов ~ 20 штук
Характеристики подчинённой таблицы:
- кол строк - > 1,0 млн
- количество столбцов ~ 20 штук

Если увеличить количество строк в подчинённой таблице - более 100 000, то при
перемещении курсором по записям основной таблицы компьютер начинает тормозить.

Вопрос.
1. Что можно сделать чтобы не было торможения?
2. Приемлемо ли использование такие инструменты - MySql, Аксес для такой базы?
3. Какое программное обеспечение желательно применять в таких ситуациях?
4. Или как правильно организовать взаимодействие между таблицами?
Ссылка на файл http://transfiles.ru/1b4s0

http://www.sql.ru/forum/1248948/rabota-s-tablicami-raspolozhennymi-v-mysql

Добрый день есть 2000000 записей. Задача переформатировать их в csv. Вопрос как это сделать максимально быстро?

http://www.sql.ru/forum/1248865/kak-konvertirovat-fayl-tablicy-access-v-csv

1) Существует несколько полей и для "TITLE" хочу присвоить значения из Me.[1_txt], Me.[2_txt], Me.[3_txt], Me.[4_txt]
в зависимости от того, на какое поле будет сделано нажатие. Не знаю, как именно присвоить, вроде все варианты испробованы.

  Const TooltipTitle As String = "TITLE"

А также, непонятно, как работает эта строчка и почему мне показывает для каждого поля разные значения, вместо одного и того же значения.

    .lpszText = TooltipText & Me.[3_txt]

=========================================================

Private Sub Ctl1_Click()
    Call PopupView(Ctl1)
End Sub

SRC vba]Private Sub Ctl2_Click()
    Call PopupView(Ctl2)
End Sub

SRC vba]Private Sub Ctl3_Click()
    Call PopupView(Ctl3)
End Sub

SRC vba]Private Sub Ctl4_Click()
    Call PopupView(Ctl4)
End Sub

Function PopupView(TH)
If i = 0 Then
  Dim hWndParent As Long
  Dim hInstance As Long
  Dim EditRect As tRect
  Const TooltipText As String = " "
  
[quote автор]  Dim THT As String
  THT = """ & Me.[3_txt] & """

  Const TooltipTitle As String = "TITLE"
 
  Call TH.SetFocus
  hWndParent = GetFocus()
  hInstance = GetWindowLong(Application.hWndAccessApp, GWL_HINSTANCE)
  FHandle = CreateWindowEx(WS_EX_TOPMOST, _
    FTooltipClassName, 0&, _
    TTS_NOPREFIX Or TTS_BALLOON Or TTS_CLOSE, _
    0, 0, 0, 0, hWndParent, 0, hInstance, 0)
  With FToolInfo
    .cbSize = Len(FToolInfo)
    .uFlags = TTF_TRACK
    .hwnd = hWndParent
    Call GetClientRect(.hwnd, .rect)
    .rect.Top = 500
    .rect.Bottom = .rect.Top + 100
 '   .lpszText = TooltipText & TH & " " & Me.[3_txt]
    .lpszText = TooltipText & Me.[3_txt]
  End With
  Call SendMessage(FHandle, TTM_ADDTOOLA, 0, FToolInfo)
  Call SendMessage(FHandle, TTM_SETTITLE, TTI_INFO, ByVal TooltipTitle) 
  'ïîêàçûâàåì tooltip
  Call GetWindowRect(hWndParent, EditRect)
  Call SendMessage(FHandle, TTM_TRACKPOSITION, 0, _
    ByVal (EditRect.Left + 1) Or ((EditRect.Top + 1) * 65536)) 
  Call SendMessage(FHandle, TTM_TRACKACTIVATE, True, FToolInfo)
  i = 1
End If
End Function

http://www.sql.ru/forum/1248675/vsplyvaushhaya-podskazka-i-znacheniya-poley

Добрый день.
Не могу воспользоваться свойством Action для рамок объектов OLE в форме. Для чистоты эксперимента написал скрипт:

Private Sub Кнопка11_Click()
On Error GoTo Ошибка
Debug.Print Me![шаблон].Action
Debug.Print Me!полеОбъект.Action
Exit Sub
Ошибка:                                                                         'Обработка ошибки
MsgBox (Err.Description & "  " & Err.Number)
Resume Next
End Sub

шаблон - свободная рамка объекта, полеОбъект - присоединенная рамка объекта.
На обе строки пишет "приложению "access" не удается получить значение этого свойства", Ошибка 2196

http://www.sql.ru/forum/1248617/svoystvo-action

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

Спасибо

http://www.sql.ru/forum/1248610/nahozhdenie-pervogo-kirillicheskogo-simvola-v-stroke

В Акссесс и ВБА я откровенный новичок. Но пришлось автоматизировать то, что ранее делалось в Экселе, потому начал постольку поскольку изучать вопрос. Все было нормально, но воткнулся в проблемы. Неделю пытаюсь побороть самостоятельно, но чтото не справляюсь.
Суть в том, что есть база данных, где ведется учет прихода товара Форма DISTRIB, затем, продаваясь, он разбрасывается по двум разным таблицам (часть в архив (форма SOLD), часть на склад (STOCK)).
Все это я сделал, все работало.
Далее понадобилось прикрутить авторизацию и чтоб было видно, кто именно из пользователей вносил изменения - для этого решил добавить в таблицы поле МЕМО, в которое предполагается вносить логин пользователя, дату текущую и может еще чтото, чтоб было видно, что именно он менял.
Проблема появилась в самом начале. При нажатии кнопки Входа формы Auth_start (а именно с нее предполагается запускать работу с базой) мне нужно, чтоб значение поля Логин переносилось на открываемую стартовую форму Distrib. Пробовал и через переменную и напрямую - никак не получается. Ругается на Out of memory и все тут. Голову уже сломал и гугл уже устал от меня... прошу, подскажите, что я накриворучил в базе... ))
База в 150 кб не вложилась, потому вот ссылка:
http://dropmefiles.com/4Njxf

http://www.sql.ru/forum/1248596/nikak-ne-mogu-prisvoit-znachenie-polu-formy

Добрый день.

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

Есть какие-нибудь другие идеи для реализации? Или как лучше реализовать мой вариант?

http://www.sql.ru/forum/1248559/dobavlenie-stroki-v-seredinu-tablicy

Допустим на форме есть элемент управления "Вэб-браузер". Нужно программно кликнуть мышкой в этом браузере на точку с нужными относительно окна браузера координатами. То есть нажать не на кнопу или другой элемент, а просто на точку с координатами.
Как сделать?
Спасибо.

http://www.sql.ru/forum/1248523/kak-sdelat-klik-myshkoy-v-nuzhnom-meste-na-forme

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

http://www.sql.ru/forum/1248521/nizhniy-kolontitul-v-otchete-access

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

Делаю небольшую базу данных, произошел затык. В связи с этим прошу помощи.

Была сделана простая база Access, где данные для строк области данных брались из таблицы.
При нажатии на кнопку (тут она в форме блокнота) напротив какой-либо строки открывалась новая форма, в которой были данные о заявке из этой строки. Условие отбора было сделано в макросе открытия формы, где выражением было записано ="[№ заявки]=" & [№ заявки] и это работало.

После чего перевел базу в ADP клиент-сервер, таблица подгружается запросом к SQL Server. Макрос работать перестал. Пишет, что не может найти Номер заявки. Пытался указать ему и через [Формы]![Заявки]![№ заявки] - не помогло.
VBA я знаю не очень хорошо, несколько дней всего его изучаю. И никак не могу придумать как мне реализовать эту функцию в данном случае.

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

Заранее спасибо большое :-)

http://www.sql.ru/forum/1248415/poluchit-znachenie-konkretnogo-polya-iz-oblasti-dannyh

добрый день! подскажите, как вставить (например, в тот же msgbox) символ и (это код 0232). Пробовал через ChrW, но он выдает знак вопроса на любын комбинации.

http://www.sql.ru/forum/1248387/specialnye-simvoly

Есть отчет в базе .mdb A2003
Все печатается хорошо до тех пор, пока количество записей в подчиненном отчете не перевалит на другую страницу.
Колонтитулы подчиненного отчета не выводятся. Так и должно быть?
Колонтитулы основного отчета печатаются нормально.
При запуске подчиненного отчета самостоятельно - колонтитулы, как положено, на каждой странице.

http://www.sql.ru/forum/1248297/kolontituly-podchinennogo-otcheta

Есть вот такой запрос. Выполняется долго от 5 секунд и выше.

SELECT Студенты.Код, ДисцИзучСемСпец.КодСеместра, ДисцИзучСемСпец.КодДисциплины, ДисцИзучСемСпец.КодСпециальности, Студенты.Курс, Студенты.Фамилия, ДисцИзучСемСпец.КодСпециализации
FROM (Студенты INNER JOIN ДисцИзучСемСпец ON Студенты.Специальность = ДисцИзучСемСпец.КодСпециальности) INNER JOIN КонтрДисцИзучКурсСпец ON ДисцИзучСемСпец.КодДисцИзучСеместрСпециальн = КонтрДисцИзучКурсСпец.КодДисцИзучСеместрСпециальн
WHERE (((ДисцИзучСемСпец.КодСеместра)<=[Студенты].[Курс]*2) AND ((Студенты.Курс)<4) AND ((ДисцИзучСемСпец.КодСпециализации)=0) AND ((Студенты.Состояние)<6) AND ((ДисцИзучСемСпец.ГодВвода)=2014)) OR (((ДисцИзучСемСпец.КодСеместра)<=[Студенты].[Курс]*2) AND ((Студенты.Курс)<4) AND ((ДисцИзучСемСпец.КодСпециализации)=[Специализация]) AND ((Студенты.Состояние)<6) AND ((ДисцИзучСемСпец.ГодВвода)=2014))
ORDER BY Студенты.Код, ДисцИзучСемСпец.КодСеместра, ДисцИзучСемСпец.КодДисциплины;

вид запроса в конструкторе

+

Смыл выборки в том, чтобы к студенту присоединить все предметы его специальности без специализации (значение 0 или пусто). а также предметы специальности с его специализацией.

Формируем список предметов, которые должен сдать студент к текущему его курсу.

http://www.sql.ru/forum/1248270/skorost-vypolneniya-zaprosa

Здравствуйте.
Мне помнится, что в Access была такая возможность - автоматически построить отчет, где будут выписаны имена всех таблиц базы и всех полей, имена запросов, форм, отчетов и модулей.
Не могу найти теперь. Access 2003. Не подскажете, куда заходить?

http://www.sql.ru/forum/1248059/svedeniya-o-baze-dannyh

Можно ли настроить акцесс так чтобы при в ходе в базу через что - то отфильтровывались "лишние" данные. Так например захотел бы поработать со сведениями по кошкам мне бы сначала вышел выпадающий список: Животный или растительный мир? Выбрав животный, вновь в выпадающем списке Теплокровные или хладнокровные выбрать Теплокровных и т.д. до четвероногих и кошек? Спасибо. Это для того чтобы подгружались нужные шаблоны отчетов.

http://www.sql.ru/forum/1247884/interaktivnost-v-akcess

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

http://www.sql.ru/forum/1247876/znachenie-po-umolchaniu-vremya-dobavleniya-zapisi

Уважаемые форумчане, здравствуйте!

Подскажите пожалуйста, по быстродействию сетевого приложения MS Access?!

два компа А и В. А - сервер - в расшаренной папке на нем находится база данных (Таб.mdb) - 10 связанных таблиц.
на А и на В запускаются одинаковые приложения (Форма.mdb), содержащие формы, запросы, отчеты и программный код. Эти приложения подключаются к серверу (на компе А - напрямую, на В - по сети).

несколько лет все было замечательно , но от роста объема базы данных постепенно стало падать быстродействие на компе В, но только в том случае, когда на компе А пользователь начинает редактировать базу.

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

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

http://www.sql.ru/forum/1247858/setevoe-bystrodeystvie

Есть таблица с числовыми полями:

t1

t2

t3

t4

t5

t6

t7

t8

t9

t10

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

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

А может существует какой-нибудь попроще вариант?

http://www.sql.ru/forum/1247716/proverka-vsey-tablicy-na-konkretnoe-chislo

Подскажите решение, плз. Может кто сталкивался...

Есть переменная (пусть будет tSQL) содержащая код SQL, в котором содержаться ' (одинарные кавычки).

В VBA формирую еще один скрипт SQL, который запишет в таблицу Oracle запись описание скрипта tSQL и сам его код.

Условный пример:
tSQL="select 'mama' as nm from dual"
nazn="Скрипт ни о чем"

строка выполняемого скрипта: "insert into table1 (nazn, tSQL) select " & nazn & " as nazn, " & tSQL &" as tSQL from dual"

Наличие одинарных кавычек не позволяют сформировать корректную строку, замена одинарных на кавычек на какой-либо символ не выход, так как необходимо, чтобы на сервере Oracle он выполнялся в исходном виде при этом tSQL может быть большой.

Каким образом возможно передать неизменный текст скрипта tSQL в поле CLOB Oracle?

http://www.sql.ru/forum/1247713/odinarnye-kavychki