Помогите правильно написать процедуру

[seasanya]

Добрый день!

Суть проблемы:
у меня есть таблица sent (в ней один столбец с текстовыми данными)
процедура будет брать из этой таблицы в произвольном порядке одну строку:
s=int(Rnd()*70), 70 - количество записей в таблице

Я не знаю как описать,что s - это строки именно в таблицу sent.

Спасибо!

[Sparxy]

'не знаю как у тебя называется столбец, но вот что у меня получилось
Dim dbs As DAO.Database
Dim rst As As DAO.Recordset
Dim s as String
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("SELECT * FROM [sent];")

rst.Move Int((70 * Rnd))
{это переход по записям, выбирает число то 0 до 69. Если кол-во записей не фиксированное, то перед этим делаешь rst.MoveLast и вместо 70 пишешь rts.RecordCount}

s = rst![название твоего столбца]
rst.close
dbs.close