differentiate empty and zero

  • Thread starter Thread starter RB Smissaert
  • Start date Start date
R

RB Smissaert

I have the following situation:
An Interbase table with integer and string fields.

Then the following code fragment:

Dim rs As ADODB.Recordset
Dim strQuery As String
Dim arrData

strQuery = "SELECT G.* FROM GPP_INVESTIGATION G WHERE G.ENTRY_ID = " &
lENTRY

Set rs = New ADODB.Recordset

rs.Open Source:=strQuery, _
ActiveConnection:=ADOConn, _
CursorType:=adOpenForwardOnly, _
LockType:=adLockReadOnly, _
Options:=adCmdText

arrData = rs.GetRows

Now I need to know if elements in this array are empty or zero. The problem
is that I can't find a way to
differentiate between these two.
Thanks for any advice on this.


RBS
 
RB Smissaert said:
I have the following situation:
An Interbase table with integer and string fields.

Then the following code fragment:

Dim rs As ADODB.Recordset
Dim strQuery As String
Dim arrData

strQuery = "SELECT G.* FROM GPP_INVESTIGATION G WHERE G.ENTRY_ID = " &
lENTRY

Set rs = New ADODB.Recordset

rs.Open Source:=strQuery, _
ActiveConnection:=ADOConn, _
CursorType:=adOpenForwardOnly, _
LockType:=adLockReadOnly, _
Options:=adCmdText

arrData = rs.GetRows

Now I need to know if elements in this array are empty or zero.

In the Immediate Window:

a = Array(0,Null)
? IsNull(a(0))
False
? IsNull(a(1))
True

BTW why are you operating on the array and not the recordset? You risk
the values changing due to Excel's/VBA's habit of coercing values.

Jamie.

--
 
That is a good thought. I am just more used to work with arrays than
recordsets.
Will see.

RBS
 
Back
Top