Выбор организации при наборе первых букв

@Venterpk · Регистрация: 12.06.2013

Author24 — интернет-сервис помощи студентам

Создана форма регистрации документов в MS Access, вношу даные, например организации, как сделать так, чтобы в последующих записях формы, при наборе нескольких букв названия уже указанной в форме организации, автоматически добавлялось название нужной организации? В эксель эта функция реализована по умолчанию.

Добавлено через 39 минут
И еще проблема, добавлено 38 записей в форму MS Access, при добавлении новой записи, нажимаю кнопку сохранить, но больше записи не сохраняются, чем может быть вызвана проблема?

mobile · 20.06.2013, 12:07

1. Сходным функционалом обладает контрол формы Combobox (поле со списком) при включенной опции Автозаполнение (AutoExpand). Несложно сделать самому и более развитые варианты, пользуясь событием Change (Изменение) и свойством Text обычного текстового поля.

2. Причин может быть множество. Но неужели просто втихую не запоминает, ничего не говоря? Без сообщений? Первые 38 прошли, дальше затык и при этом ничего не говорится? А в таблице есть эти первые 38 записей?

@Venterpk · 20.06.2013, 12:28 **[ТС]**

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

Добавлено через 6 минут

Сообщение от mobile

2. Причин может быть множество. Но неужели просто втихую не запоминает, ничего не говоря? Без сообщений? Первые 38 прошли, дальше затык и при этом ничего не говорится? А в таблице есть эти первые 38 записей?

Что интересно что данные в таблице были, а вот внесение информации производилось через форму, но даные после 32-й записи не сохранялись. Проблема решилась сжатием даных с 14 мб до 480 кб.

@GenaY · 20.06.2013, 18:06

Сообщение от Venterpk

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

Добавлено через 6 минут

Что интересно что данные в таблице были, а вот внесение информации производилось через форму, но даные после 32-й записи не сохранялись. Проблема решилась сжатием даных с 14 мб до 480 кб.

Предельный размер файла базы есть - 2 Гб, но Вам до него еще далеко. Может у Вас на диске место заканчивается или есть другие ограничения.

Все таки должно быть сообщение об ошибке при сохранении записи.

@Venterpk · 21.06.2013, 12:04 **[ТС]**

Сообщение от GenaY

Предельный размер файла базы есть - 2 Гб, но Вам до него еще далеко. Может у Вас на диске место заканчивается или есть другие ограничения.

Все таки должно быть сообщение об ошибке при сохранении записи.

Нет, сообщения об ошибке не показывалось, где посмотреть возможные ограничения?

@ltv_1953 · 21.06.2013, 12:12

Сообщение от Venterpk

при добавлении новой записи, нажимаю кнопку сохранить, но больше записи не сохраняются, чем может быть вызвана проблема?

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

@GenaY · 21.06.2013, 13:54

@Venterpk, Microsoft Access ограничения

@Venterpk · 21.06.2013, 16:33 **[ТС]**

В форме набран № 02-22-999/2013 потом № 02-22-1000/2013 дальше в форме, после сохранения, номера пошли не по порядку а перемешались. Использовал сортировку, но первым идет номер 02-22-1000/2013, вместо первого набранного в форме 02-22-934/2013 Как исправить проблему, чтобы номера шли по порядку?

mobile · 21.06.2013, 16:53

@Venterpk, в общем модуле запишите функцию

Visual Basic

Public Function sortNomer(fld)
    Dim p, i
    p = Split(Left(fld, InStr(1, fld, "/") - 1), "-")
    For i = UBound(p) To 0 Step -1
        sortNomer = sortNomer & p(i)
    Next
End Function

А в запросе-источнике формы задайте сортировку в виде

SQL

1	ORDER BY Val(RIGHT([№],4)), Val(sortNomer([№]))

@GenaY · 21.06.2013, 18:20

Сообщение от Venterpk

В форме набран № 02-22-999/2013 потом № 02-22-1000/2013 дальше в форме, после сохранения, номера пошли не по порядку а перемешались. Использовал сортировку, но первым идет номер 02-22-1000/2013, вместо первого набранного в форме 02-22-934/2013 Как исправить проблему, чтобы номера шли по порядку?

Сортировка по текстовым полям так и работает. По первому отличному символу, отсчет слева.
1. № 02-22-1000/2013
2. № 02-22-999/2013

Можно так сделать, изменив маску.
1. № 02-22-00999/2013
2. № 02-22-01000/2013

Но лучше предусмотреть сортировку по числовому полю: в базе хранить числовую часть, тот вид который у вас собирать оператором &

Visual Basic

1	"№ 02-22-999/2013" = "№ 02-22-" & [ЧисловоеПолеВбазе] & "/2013"

Тогда сортировка по [ЧисловоеПолеВбазе] будет как вам нужно.

Добавлено через 1 минуту
Или как @mobile предложил.

@Makc1985 · 30.07.2014, 04:42

Сообщение от mobile

1. Сходным функционалом обладает контрол формы Combobox (поле со списком) при включенной опции Автозаполнение (AutoExpand). Несложно сделать самому и более развитые варианты, пользуясь событием Change (Изменение) и свойством Text обычного текстового поля.

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

Visual Basic

Private Sub Наименование_документа_Change()
Dim aFind As String
Me.[Наименование документа].SetFocus
aFind = Nz(Me.[Наименование документа].Text, "")
If aFind <> "" Then
Dim s As String
Dim cn As ADODB.Connection, TS As New ADODB.Recordset, dSQL As String
Set cn = Application.CurrentProject.Connection
 
dSQL = "SELECT Документ.[Наименование документа] as Наим " _
& "FROM Документ " _
& "GROUP BY Документ.[Наименование документа] " _
& "HAVING (((Документ.[Наименование документа]) Like '" & aFind & "'));" 
TS.Open dSQL, cn
 
s = TS.Fields("Наим")
 
End If
 
TS.Close
Set TS = Nothing
End sub

Пока мысль на этом обрывается

Выдает ошибку "BOF или EOF имеет значение True, либо текущая запись удалена
Что я не так делаю?

@Venterpk 0 / 0 / 0 Регистрация: 12.06.2013 Сообщений: 11
		1
	Выбор организации при наборе первых букв 20.06.2013, 11:48. Показов 1354. Ответов 10 Метки нет (Все метки) Создана форма регистрации документов в MS Access, вношу даные, например организации, как сделать так, чтобы в последующих записях формы, при наборе нескольких букв названия уже указанной в форме организации, автоматически добавлялось название нужной организации? В эксель эта функция реализована по умолчанию. Добавлено через 39 минут И еще проблема, добавлено 38 записей в форму MS Access, при добавлении новой записи, нажимаю кнопку сохранить, но больше записи не сохраняются, чем может быть вызвана проблема? 0

mobile 26806 / 14485 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782
	20.06.2013, 12:07	2
	1. Сходным функционалом обладает контрол формы Combobox (поле со списком) при включенной опции Автозаполнение (AutoExpand). Несложно сделать самому и более развитые варианты, пользуясь событием Change (Изменение) и свойством Text обычного текстового поля. 2. Причин может быть множество. Но неужели просто втихую не запоминает, ничего не говоря? Без сообщений? Первые 38 прошли, дальше затык и при этом ничего не говорится? А в таблице есть эти первые 38 записей? 0

@Venterpk 0 / 0 / 0 Регистрация: 12.06.2013 Сообщений: 11
	20.06.2013, 12:28 [ТС]	3
	Применил сжатие данных и появилась возможность добавлять записи. Получается что есть предельный размер файла, после которого нельзя добавлять записи в базу даных? Добавлено через 6 минут Сообщение от mobile 2. Причин может быть множество. Но неужели просто втихую не запоминает, ничего не говоря? Без сообщений? Первые 38 прошли, дальше затык и при этом ничего не говорится? А в таблице есть эти первые 38 записей? Что интересно что данные в таблице были, а вот внесение информации производилось через форму, но даные после 32-й записи не сохранялись. Проблема решилась сжатием даных с 14 мб до 480 кб. 0

@GenaY 383 / 209 / 5 Регистрация: 29.05.2013 Сообщений: 337
	20.06.2013, 18:06	4
	Сообщение от Venterpk Применил сжатие данных и появилась возможность добавлять записи. Получается что есть предельный размер файла, после которого нельзя добавлять записи в базу даных? Добавлено через 6 минут Что интересно что данные в таблице были, а вот внесение информации производилось через форму, но даные после 32-й записи не сохранялись. Проблема решилась сжатием даных с 14 мб до 480 кб. Предельный размер файла базы есть - 2 Гб, но Вам до него еще далеко. Может у Вас на диске место заканчивается или есть другие ограничения. Все таки должно быть сообщение об ошибке при сохранении записи. 0

@Venterpk 0 / 0 / 0 Регистрация: 12.06.2013 Сообщений: 11
	21.06.2013, 12:04 [ТС]	5
	Сообщение от GenaY Предельный размер файла базы есть - 2 Гб, но Вам до него еще далеко. Может у Вас на диске место заканчивается или есть другие ограничения. Все таки должно быть сообщение об ошибке при сохранении записи. Нет, сообщения об ошибке не показывалось, где посмотреть возможные ограничения? 0

@ltv_1953 17486 / 7248 / 1651 Регистрация: 21.06.2012 Сообщений: 13,864
	21.06.2013, 12:12	6
	Сообщение от Venterpk при добавлении новой записи, нажимаю кнопку сохранить, но больше записи не сохраняются, чем может быть вызвана проблема? А что происходит при нажатии этой кнопки? Возможно в процедуре, вызываемой нажатием кнопки, сохранение не происходит из-за ошибки, а сообщения об ошибке в ней подавлены. 1

@GenaY 383 / 209 / 5 Регистрация: 29.05.2013 Сообщений: 337
	21.06.2013, 13:54	7
	@Venterpk, Microsoft Access ограничения 0

@Venterpk 0 / 0 / 0 Регистрация: 12.06.2013 Сообщений: 11
	21.06.2013, 16:33 [ТС]	8
	В форме набран № 02-22-999/2013 потом № 02-22-1000/2013 дальше в форме, после сохранения, номера пошли не по порядку а перемешались. Использовал сортировку, но первым идет номер 02-22-1000/2013, вместо первого набранного в форме 02-22-934/2013 Как исправить проблему, чтобы номера шли по порядку? 0

	30.07.2014, 04:42