В открытой форме есть поле FN, в которе занесено имя формы и контрола (Forms!Forma1!Forma2.Form!Field1), переданное через OpenArgs.
Как обновить это поле при закрытии этой формы?

http://www.sql.ru/forum/1120458/obnovlenie-polya-v-forme

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

http://www.sql.ru/forum/1120415/chtenie-bazy

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

http://www.sql.ru/forum/1120392/v-pole-s-tipom-dannyh-giperssylka-vtavit-v-znachenie-po-umolchaniu-giperssylku

Здравствуйте, помогите, пожалуйста. Голову сломал, не могу понять, как составить условие отбора записей в запросе. Мне нужно, чтобы выводились записи в подчиненной таблице, содержащие значения из поля в форме. Но, если поле пустое нужно вывести все записи запроса. И тут проблема. Access не выводит записи с пустыми полями. Я ставил is null, но в параметрах IIf не получается использовать [Таблица].[№билета] or [Таблица1].[№билета] is Null.

http://www.sql.ru/forum/1120375/uslovie-otbora-cherez-pole-formy

Вот собственно сам код:

CurrentDb.Execute ("INSERT INTO Tbl (Flok,Vec_Mettler,Kol_Easytrack,Doa,Vet_Brak,Kol_IN_Frize,Ves_IN_Frize,Kol_OUT_Frize,Ves_OUT_Frize )" & _
" VALUES (" & .Cells(nf, 1).Value & "," & _
" cast(REPLACE('" & .Cells(nf, 6).Value & "',',','.')as float) ,/*111*/" & _
.Cells(nf + 1, 15).Value & "," & _
.Cells(nf + 1, 14).Value & "," & _
.Cells(nf + 1, 18).Value & "," & _
.Cells(nf + 1, 19).Value & "," & _
" cast(REPLACE('" & .Cells(nf, 19).Value & "',',','.')as float) ," & _
.Cells(nf + 1, 21).Value & "," & _
" cast(REPLACE('" & .Cells(nf, 21).Value & "',',','.')as float));")

при отработке выдаёт ошибку:
Ошибка синтаксиса (Пропущен оператор) в выражении запроса
'cast(REPLACE('12747',',','.')as float)'


пытаясь найти ошибку передал текст запроса в простое поле на форме, скопировал и вставил в "SQL Server Management Studio"
Добавил перед insert, creat
Вот что получилось.

CREATE TABLE #tbl
([Flok] decimal(12,0)
,Vec_Mettler float
,Kol_Easytrack int
,Doa int
,Vet_Brak int
,Kol_IN_Frize int
,Ves_IN_Frize float
,Kol_OUT_Frize int
,Ves_OUT_Frize  float)
/* Текст запроса не изменял, только добавил # перед названием таблицы*/
INSERT INTO #Tbl (Flok,Vec_Mettler,Kol_Easytrack,Doa,Vet_Brak,Kol_IN_Frize,Ves_IN_Frize,Kol_OUT_Frize,Ves_OUT_Frize ) VALUES (424412001465, cast(REPLACE('12747',',','.')as float) ,/*111*/6153,9,17,6136, cast(REPLACE('11683,2262666667',',','.')as float) ,6060, cast(REPLACE('10217,2193766048',',','.')as float));

select * from #tbl
drop table #tbl

запустил, всё работает.

помогите найти ошибку.

http://www.sql.ru/forum/1120274/neponyatnaya-oshibka-v-zaprose-sql

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

P.S. База крутиться на SQL сервере.
P.S.S. Если кто знает как сделать с помощью VB, то буду очень признателен.

http://www.sql.ru/forum/1120270/knopka-na-otkrytie-zaprosa

Здравствуйте!
На форме имеется комбобокс. Источником данных комбо служит соответствующая таблица первое поле которой - код, второе - наименование. По первому полю таблицы в комбо выводится соответствующий текст. (Выставлено число столбцов -2; ширина столбцов 0;3см). Однако часть данных в комбо выводится, а часть нет, хотя в исходной таблице все поля заполнены.
В чем может быть проблема?
Access 2003 SP3 + MS SQL 2007. Проект АДП.

http://www.sql.ru/forum/1120212/gluki-komboboks

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

Вот не задача изначально БД создана с кириллическими таблицами и полями х, запросами и полями. Теперь появилась необходимость переводить данные на MySQL. Тем самым появилась потребность перевести все с кириллицы на латиницу. Может кто сталкивался с такой проблемой и использовал скрипт? Приложение? чтобы автоматически переименовать большой объем запросов полей таблиц?

http://www.sql.ru/forum/1120169/pereimenovanie-kirillicheskih-tablic-i-poley-v-latinicu

Приветствую всех!
Такая проблема. Файл mdb с интерфейсной частью базы хранится на сервере. При первом запуске (через отдельную утилитку) база копируется на клиентский комп. В базе имеется форма с подформой, в которой используется TreeView. При открытии основной формы появляется ошибка (см. рис.) После экспорта формы с TreeView из базы на сервере ошибка исчезает. Не могу понять в чем дело.

http://www.sql.ru/forum/1120168/treeview

Господа, подскажите пожалуйста.
Можно ли в поле таблицы (Access) прописать выражение или создать макрос, которое могло бы преобразовать целое слово из одного поля в одну первую букву в другом поле или из нескольких слов одного поля, в соответствующее количество первых букв данных слов в другом поле. Например: "Закрытое Акционерное Общество" (одно поле) в "ЗАО" (другого поля), т.е. вводится словосочетание в первое поле, а во втором поле автоматом появляется краткое.
Кто может подсказать, пропишите плиз выражение или макрос.
Искренне благодарен всем за помощь.

http://www.sql.ru/forum/1120153/proshu-sovet-i-pomoshhi

Люди добрые, помогите кто знает.
Для лучшей дружелюбности формы, границу активного поля крашу иным цветом, а когда оно становиться пассивным цвет границы становится обычной. Чтобы действие не прописывать для каждого поля в отдельности использую подпрограмму. Как в эту подпрограмму прописать чтобы заодно менялся цвет текста подписи активного поля (например: Подпись_Имя)

Private Sub Имя_Enter()
Активный
End Sub

Private Sub Имя_Exit(Cancel As Integer)
Пассивный
End Sub

Sub Активный()
Me.ActiveControl.Properties("BorderColor") = 800
End Sub

Sub Пассивный()
Me.ActiveControl.Properties("BorderColor") = 0
End Sub

http://www.sql.ru/forum/1120082/vizualnoe-vydelenie-aktivnogo-polya-formy

Как можно закрыть доступ на изменения макета перекрестного запроса? Или хотя бы не сохранять если изменили?

http://www.sql.ru/forum/1120026/ne-izmenyat-maket-perekrestnogo-zaprosa

Добрый день.
Ищу по форуму - не могу найти.
Не могу понять, как "идеально" правильно сделать личную карточку.
Есть таблица - назовем ее клиенты.
Есть таблица - заказы.
Связь один ко многим. Каскадное обновление.

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

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

Сильно не пинайте. Заранее спасибо. Аксесс 2003

http://www.sql.ru/forum/1120025/lichnaya-kartochka

Есть форма со определенным кол-вом записей, у каждой записи есть поле Дата. Нужно выбрать просроченные записи, просроченной считается запись которой больше 50 дней. То есть [сегодняшняя дата] - [дата записи] >60 вывод в отдельную форму запроса. На delphi написал бы, в sql знаю куда код вставлять и все))))) подскажите как такой запрос сделать в sql

http://www.sql.ru/forum/1120013/sdelat-zapros-po-date

Как в msgbox вывести сообщение из двух строк?

http://www.sql.ru/forum/1119960/msgbox-iz-2-h-strok

с параметрами по умолчанию заточена под My_Edit_Control.ControlTipText
---
столкнулся с ситуацией: на форме много текстовых полей, в некоторых длина текста превышает 300 знаков,
в то время, как видимая на экране - 70-80 знаков. решил реализовать проблему следующей функцией.
---
CrLfText() - возвращает строку
-
Входные параметры:
- Обязательный
-- LongText - однострочный тект
- Не обязательные
-- ShortTextLen - длина блоков (35 по умолчанию)
-- OnlyEndText - Правая(True) или левая(False) часть возвращаемого текста (True по умолчанию)
-- MaxReturnLen - максимальная длина возвращаемого текста (255 по умолчанию)
-- TextTerminator - терминатор обрезаемой части ("..." по умолчанию)
---
Пример вызова:
например Поле1 содержит текст:
-
это длинный текст который содержится в поле номер один и состоит из нескольких слов разделенных пробелами в одну длинную строку составленных без других разделителей
-

' Модуль формы
Private Sub Поле1_AfterUpdate()
    Поле1.ControlTipText = CrLfText(Поле1, 20, , 100)
End Sub

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

Public Function CrLfText(LongText As Variant, Optional ShortTextLen As Long = 35, Optional OnlyEndText As Boolean = True, Optional MaxReturnLen As Long = 255, Optional TextTerminator As String = "...") As String
    Dim n As Long, s As String, r As String, i As Long, ii As Long, j As Long
    s = Nz(LongText, ""): n = Len(s): i = 1: ii = ShortTextLen: j = InStr(1, s, " ")
    While j < n And j > 0
        While j < ii And j > 0
            j = InStr(j + 1, s, " ")
        Wend
        If j > 0 Then r = r & Mid(s, i, j - i) & vbCrLf Else r = r & Mid(s, i)
        i = j + 1
        ii = i + ShortTextLen
    Wend
    If Len(r) > MaxReturnLen Then
        n = MaxReturnLen - Len(TextTerminator)
        If OnlyEndText Then
            r = Right(r, n)
            j = InStr(r, " ")
            If j Then r = TextTerminator & Mid(r, j)
        Else
            r = Left(r, n)
            j = InStrRev(r, " ")
            If j Then r = Left(r, j) & TextTerminator
        End If
    End If
    CrLfText = r
End Function

http://www.sql.ru/forum/1119955/funkciya-preobrazovaniya-odnostrochnogo-teksta-v-mnogostrochnyy

Здравствуйте. Вроде бы есть несложная задача, но в access только второй день и не знаю, как реализовать.

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

SELECT SUM(столбец1) AS Сумма
FROM таблица
WHERE столбец2 <> NULL

Но, как я понимаю, в выражениях использовать sql запросы нельзя... или как-то можно? Здесь ведь возвращается всего лишь одно значение. В общем прошу помощи.

http://www.sql.ru/forum/1119949/vyrazhenie-dlya-nahozhdeniya-summy

Ленточная форма, 10 полей, слева и справа от каждого заголовка - по кнопочке (итого 20 шт.). Одна - сортировка по убыванию, другая - по возрастанию.
В модуле одна процедура:

Function fnСортировка(strИмяПоля As String, intПорядокСорт As Integer)
...................................

В окне "Свойства", вкладка "Событие" на событие "Нажатие" указано:

=fnСортировка(<имя кнопки>.[Tag];<0 или 1>)

соответственно, в св-ве Tag, кнопок указано имя поля формы, к которой они относятся.
Очень редко, но случается так, что по нажатию любой из кнопок сама процедура вызывается, но параметр Tag в неё не передаётся.
Хотя, если выполнение приостановить и в отладке написать:

 ? <имя кнопки>.Tag 

то значение выводится

http://www.sql.ru/forum/1119948/podskazhite-optimizaciu-koda-mnogo-knopok-s-odnotipnymi-deystviyami

Доброго времени суток!
Прошу помощи.

Как будет выглядеть код VBA если нужно из таблицы получить набор записей отвечающих определенному критерию по полю "Б". Затем, перебором, каждую запись проверить на соответствие другому критерию по полю "В". При первом же совпадении прекратить перебор и получить значение поля "А" (ключевое поле) данной записи.

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

http://www.sql.ru/forum/1119946/perebor-i-obrabotka-kazhdoy-zapisi-iz-vyborki-v-vba

запрос-источник Списка.
значение его, например, пятого столбца в окне отладки смотрю так:

 ? Me!ctlSpysok!Column(4) 

а как посмотреть имя (подпись) этого столбца? И ...Name, и ...Caption вызывают ошибку "Требуется объект".

http://www.sql.ru/forum/1119928/imya-stolbca-zaprosa