Еще один вопрос

@Arm@ · Регистрация: 20.05.2007

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

Прошу прощения если помешала. У меня возник еще один вопрос: вот моя прога. Мне нужно, чтобы в поля serФамилия, serИмя, serОтчество вводилась инфа из таблицы.

Visual Basic
1
2
3
4
5
6
7
8
9
Private Sub Поиск_Click()
On Error GoTo Err_Поиск_Click
If Me![Поле2] < 1 Or Me![Поле2] > 20 Then
MsgBox "Неверный номер клиента"
Else
Me![serФамилия] = "Фамилия"
Me![serИмя] = "Имя"
Me![serОтчество] = "Отчество"
End If

А у мя вводятся только слова "Фамилия", "Имя", "Отчество". Помогите исправить ошибку. (я только начала работать в Access)

@Ирча · 21.05.2007, 18:59

Судя по:

Visual Basic
1
2
If Me![Поле2] < 1 Or Me![Поле2] > 20 Then
  MsgBox "Неверный номер клиента"

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

А Вы присваиваете полям формы текстовые значения.

Вам надо показать, что данные беруться из таблицы. В данном случае я бы воспользовалась функцией Dlookup()

@Arm@ · 21.05.2007, 19:54 **[ТС]**

Огромное спасибо. Очень помогла. У мя остался последний вопрос:
Я вывела данные из таблицы, изменила их, подскажи как мне теперь измененные данные внести на место прежних в таблицу? Я попыталась использовать CurrentDb.Execute "UPDATE " но у мя мало, что получилось.

@Ирча · 22.05.2007, 10:27

Подход был правильный.

Мало что получилось - это как?

Какой вышел запрос (текст в студию), как сработал, какие были ошибки?

@Arm@ · 22.05.2007, 15:07 **[ТС]**

Вобщем, я сейчас пытаюсь поменять фамилию. Вот прога

Visual Basic
1
2
3
4
5
6
7
8
9
Private Sub Кнопка22_Click()
On Error GoTo Err_Кнопка_Click
CurrentDb.Execute "UPDATE " & "Клиенты" & " SET " & "Фамилия =" & Me![serФамилия] & " WHERE " & "Номер=" & Me![Поле2]
Exit_Кнопка22_Click:
    Exit Sub
Err_Кнопка22_Click:
    MsgBox Err.Description
    Resume Exit_Кнопка22_Click
End Sub

Скорее всего я не так использую функцию. Ошибка такая: "Label not defined"

@Ирча · 22.05.2007, 16:38

зачем столько конкатенации вставлено???

Visual Basic
1
CurrentDb.Execute "UPDATE Клиенты SET Клиенты.фамилия = """ & Forms!МояФорма!serфамилия & """ WHERE (((Клиенты.Код)=" & [Forms]![МояФорма]![serКод] & "));"

Приметно так...

@Arm@ · 22.05.2007, 21:01 **[ТС]**

Ирча, большое спасибо. Очень выручила.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Arm@ 0 / 0 / 0 Регистрация: 20.05.2007 Сообщений: 6
	21.05.2007, 19:54 [ТС]
	Огромное спасибо. Очень помогла. У мя остался последний вопрос: Я вывела данные из таблицы, изменила их, подскажи как мне теперь измененные данные внести на место прежних в таблицу? Я попыталась использовать CurrentDb.Execute "UPDATE " но у мя мало, что получилось. 0

@Ирча 0 / 0 / 0 Регистрация: 08.02.2010 Сообщений: 345
	22.05.2007, 10:27
	Подход был правильный. Мало что получилось - это как? Какой вышел запрос (текст в студию), как сработал, какие были ошибки? 0

@Arm@ 0 / 0 / 0 Регистрация: 20.05.2007 Сообщений: 6
	22.05.2007, 21:01 [ТС]
	Ирча, большое спасибо. Очень выручила. 0