I'm trying to build a simple asp page where I want to show records from an existing access database. Whenever there is data everything is fine and dandy.

Whenever there's an empty row of records I want to apply the "Show if recordset is empty"-behaviour.

But somehow...... this doesn't work.

2 examples - a hand made one and the dreamweaver version:

<b>1: Handmade (this one works):</b>
&lt;%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%&gt;
&lt;%
Set Conn = Server.CreateObject("ADODB.Connection"
Set rsMenu = Server.CreateObject("ADODB.recordset"
conn.open = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\home\franskantikdk\www\_private\franskantik.mdb"
SQLMenu = "SELECT * FROM tblVarer WHERE category='lys';"
conn.Execute (SQLMenu)
rsMenu.Open SQLMenu, conn
%&gt;
&lt;!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "www.w3.org/TR/html4/loose.dtd"&gt;
&lt;html&gt;
&lt;head&gt;
&lt;title&gt;untitled&lt;/title&gt;
&lt;meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"&gt;
&lt;/head&gt;

&lt;body&gt;
&lt;%
if rsMenu.bof and rsMenu.eof then
response.Write("No data"
else
if rsMenu("thumbnail" = "" then
response.write("No picture"
else
response.Write(rsMenu("thumbnail")
end if
end if
%&gt;
&lt;/body&gt;
&lt;/html&gt;

<b>2: Dreamweaver - this one doesn't work....</b>
&lt;%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%&gt;
&lt;!--#include file="Connections/conn.asp" --&gt;
&lt;%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset"
Recordset1.ActiveConnection = MM_conn_STRING
Recordset1.Source = "SELECT * FROM tblVarer where category = 'lys';"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%&gt;
&lt;!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "www.w3.org/TR/html4/loose.dtd"&gt;
&lt;html&gt;
&lt;head&gt;
&lt;title&gt;Untitled Document&lt;/title&gt;
&lt;meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"&gt;
&lt;/head&gt;

&lt;body&gt;
&lt;p&gt;
&lt;% If Recordset1.EOF And Recordset1.BOF Then %&gt;
No data
&lt;% End If ' end Recordset1.EOF And Recordset1.BOF %&gt;
&lt;/p&gt;
&lt;p&gt;&lt;%=(Recordset1.Fields.Item("thumbnail".Value)%&gt; &lt;/p&gt;
&lt;/body&gt;
&lt;/html&gt;
&lt;%
Recordset1.Close()
Set Recordset1 = Nothing
%&gt;

What in heavens name am I doing wrong - this seems so simple!!!!

Edited by - fridge on 16 Dec 2004 08:07:40

Edited by - fridge on 16 Dec 2004 08:08:36

Hi Jens

I can't see anything wrong - I'm deaf in one eye though <img src=../images/dmxzone/forum/icon_smile_blackeye.gif border=0 align=middle>, have you checked the settings in conn.asp?

Digga

Sharing Knowledge Saves Valuable Time!!!

I can see database and tables as well from the conn properties. All seems OK <img src=../images/dmxzone/forum/icon_smile_sad.gif border=0 align=middle>

Hi Jens,

Are you saying that if there is no thumbnail image for a given record in your recordset that you want to display no data?
The Show if recordset empty only works if the entire recordset returns no results.
But if you get results back and some of those results do not have a thumbnail then you should stick in an IF ELSE statement
e.g.
&lt;% If Recordset1("thumbnail" &lt;&gt; "" then %&gt;
&lt;%=(Recordset1.Fields.Item("thumbnail".Value)%&gt;
&lt;% Else %&gt;
sorry no picture
&lt;% End if %&gt;

though you could tidy that up / display a default image if you wanted to

HTH

Live the life you love
Love the life you live

Simon

[DWMX 2004]|[SQL]|[ASP/VBScript]|[XP-Pro]

That did it - thanks again Simon <img src=../images/dmxzone/forum/icon_smile.gif border=0 align=middle>