---

Første problem.

Hvordan kan jeg teste om der findes en artikkel i linien med strSQL3? Som
det er nu, vil jeg jo få en fejl i linien Test = oRs3("ArticleListOrder")
hvis strSQL3 er tom. Jeg kan jo tælle først og hvis Count = 0 så sætte Test
= oRs3("ArticleListOrder") til 1. Kan man gøre det lettere ?


strSQL3 = "SELECT TOP 1 ArticleListOrder FROM tblArticle WHERE
ArticleMenuHeaderID = " & intMenuHeader & " ORDER BY ArticleListOrder DESC"
Set oRs3 = openRecordset(strSQL3)
Test = oRs3("ArticleListOrder")

Næste problem er så, hvis oRs3 er tom, så skal Test gives værdien 1, men jeg
tror jeg har overset noget, for Test bliver ver med at være tom (null)


if Test = "" then 'her er også prøvet med **** if Test = null or Test
= " " or Test = "" or Test = 0 then****** men det giver samme resultat.
Test = 1
else
Test = Test +1
end if

--

Mvh / Regards
-=< Christian >=-
What capital has 164 letters in its name? See my web page to find out.
http://www.cmnielsen.dk ICQ: 25308942
" If something's hard to do, then it's not worth doing. Homer J. Simpson"

---

Christian M. Nielsen skrev:

> Hvordan kan jeg teste om der findes en artikkel i linien med
> strSQL3?

Undersøg egenskaben EOF.

> strSQL3 = "SELECT TOP 1 ArticleListOrder FROM tblArticle
> WHERE ArticleMenuHeaderID = " & intMenuHeader & " ORDER BY
> ArticleListOrder DESC"
> Set oRs3 = openRecordset(strSQL3)

Her indsætter du:

   If oRs3.EOF Then
       ' Gør hvad der skal gøres når postsættet er tomt
   Else
    ' De tildelinger du har nu

> Test = oRs3("ArticleListOrder")

(husk at lukke med End If til sidst)


> Næste problem er så, hvis oRs3 er tom, så skal Test gives
> værdien 1

Skriv Test = 1 oppe i første del af if-sætningen.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html