Another (maybe simple) ADO question

I want to know how I can convert this DOA code:

Code:

---

    Case CMD_ADDRCD, CMD_EDITRCD, CMD_DELRCD
      FindCrit = "ArtikelID>=" & GetParmInString(gsFormParm, 2)
    datPrimaryRS.Recordset.FindFirst (FindCrit)
      If (datPrimaryRS.Recordset.RecordCount <> 0) And _
        datPrimaryRS.Recordset.NoMatch Then
        datPrimaryRS.Recordset.MoveFirst
      End If

---

I though it would be something like this, it is just that NoMatch is not accepted:

Code:

---

    Case CMD_ADDRCD, CMD_EDITRCD, CMD_DELRCD
      FindCrit = "ArtikelID>=" & GetParmInString(gsFormParm, 2)
      rs.Find (FindCrit)
      If (rs.RecordCount <> 0) And _
        rs.NoMatch Then
        rs.MoveFirst
      End If

---

The WiseGuy

Does the find return a success value ?

If so use that to determine whether to goto the first record or not.


Vince

The problem is that I don't completely understand the code especially this part:

FindParm = GetParmInString(gsFormParm, 2)

so maybe you can explain it a little bit for me?

WiseGuy

Put the mouse over it, click the Right mouse button and select "definition".

I don't know but it looks like a custom function.

I can guess that it supplies (possibly) the second value of a list or the first to characters. Although it could be anything.

It's more likely to return an id number though...


Is this your project ? If the definition doesn't work try highlighting the word and pressing F1 (for help on it).

Vince

ADO recordsets don't have a NoMatch property. If the record isn't found, I think you end up at the end of the recordset. This code should do it:

VB Code:

Case CMD_ADDRCD, CMD_EDITRCD, CMD_DELRCD
      FindCrit = "ArtikelID>=" & GetParmInString(gsFormParm, 2)
      rs.Find (FindCrit)
      'If (rs.RecordCount <> 0) And rs.NoMatch Then
      If (rs.RecordCount <> 0) And rs.EOF Then
        rs.MoveFirst
      End If

Well I gues it works, becouse I'm not getting any errors but my datagrid isn't filled yet how can I enter some SQL stuff I thought it was somthing like this but it doesn't work:

SQL="select * from artikelen"

apperantly you need to declare 'SQL' but how, or is there a whole ather was to execute sql?
btw the name of the datagrid is grdDataGrid

many thanks in advance,


The WiseGuy