Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - VBA

Страница:

 

  Вопрос: В чем ошибка Recordset'а? Добавлено: 16.03.05 23:33  

Автор вопроса:  DiMAN
Function NaclNomer() As Long
Dim SQL As String
Dim myRecSet As ADODB.Recordset

Set myRecSet = New ADODB.Recordset
    
  SQL = "SELECT Max(Выдано.НомерНакладной) AS [№ Накладной]FROM Выдано "
  SQL = SQL & "WHERE ((Year([Дата]))=Year(Now()))"
  SQL = SQL & "AND((Выдано.Продукция)=[Forms]![ВыдачаСпецПродукции]![ПРОД])"
При запуске появляется ошибка "Отсутсвует значение для одного или нескольких параметров" именно для предыдущей строчки.
  
myRecSet.Open SQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic, -1
    
End Function

Ответить

  Ответы Всего ответов: 0  

Нет ответов

Страница:

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам