Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Как изменить Названия  (Прочитано 4082 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Алекс
Гость
« : 13-01-2004 15:56 » 

памагите,
как переделать эту команду
я хочу задовать город Лондон в TextBox Каторай распаложен на моей форме

Dim varBookmark As Variant
Dim rsCustomers As ADODB.Recordset

varBookmark = rsCustomers.Bookmark
rsCustomers.MoveFirst
rsCustomers.Find "City = 'Лондон'"
If rsCustomers.EOF Then
    MsgBox "Customer not found. " & _
           "Returning to previous record."
    rsCustomers.Bookmark = varBookmark
Else
    MsgBox "Located desired customer."
End If
Записан
PSD
Главный специалист

ru
Offline Offline
Пол: Мужской

« Ответ #1 : 14-01-2004 06:01 » 

С делай так
rsCustomers.Find "City = '" & frmYou.Text1.text & "'"
Записан

Да да нет нет все остальное от лукавого.
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines