Заполнение me.recordset в форме константами

Grayscale
Дата: 08.03.2008 20:04:25
имеется следующий код

If param > 0 Then
Set rc = CurrentDb.OpenRecordset("SELECT fldDistrName FROM dbo_dataDistr WHERE (((fldDistrParentID)=" & param & "))")
Set Me.Recordset = rc
Else
Set rc = CurrentDb.OpenRecordset("SELECT '<none>' as fldDistrName")
Set Me.Recordset = rc
End If

при этом в случае когда param>0 форма отображает записи корректно, а вот если param<=0 то форма пуста. подскажите в чем проблемма?
_restavraciya
Дата: 08.03.2008 20:30:41
так работает

Set rc = CurrentDb.OpenRecordset("SELECT DISTINCT '<none>' as fldDistrNameFROM dbo_dataDistr")
_restavraciya
Дата: 08.03.2008 20:34:15
Таблицу другую использовать
Set rc = CurrentDb.OpenRecordset("SELECT DISTINCT '<none>' as fldDistrName FROM MSysObjects")
Latuk
Дата: 08.03.2008 20:34:27
насколько я помню JET-SQL не позволяет SELECT без FROM
DISTINCT тут лишний лучше top
SELECT TOP 1 '<none>' as fldDistrName FROM любая таблица
_restavraciya
Дата: 08.03.2008 20:39:01
Позволяет, но в форме почемуто не отображается
Grayscale
Дата: 08.03.2008 20:41:10
Спасибо всем уже сделал distinct, но почему не работало так и не понял.