Помогите мне!

[nikemike]

Проблема с БД!
Пишу :

Код: Выделить всё

Private Sub Form_Load()
sour = "Author"
Data1.RecordSource = sour
txt = Data1.Recordset.Fields(1)
Text1.Text = txt
Data1.UpdateRecord
End Sub

после запускаю приложение и выдает ошибку :
Run-time Error '91'
Object variable or With block variable not set

[Amed]

Ошибка на какой строке?
Переменные объявили?

[nikemike]

на txt = Data1.Recordset.Fields(1)

[A.A.Z.]

dim txt$ поможет

[nikemike]

Неа, ты пойми все нормально проходит когда этот код я выстовляю на кнопку, а вот в form_load не получается!

[d3drm]

где-то переменные не объявил

[Amed]

Нигде-то переменные не объявил

[Al Khamid]

[]

[nikemike]

Al Khamid
а как программно?!