Undgå fejlmeddelser hvis DB er tomt

Når du laver et udtræk kan du tjekke om recordset'et er tom.

Set rs = Conn.Execute(SQL)

if rs.EOF then
  'Tomt recordset
else
  'udskriv fra recordsetet her

end if

er det sådan noget du tænker på?

Ja men koden skulle dække alle udtræk på en gang, så jeg ikke skal i på hvert enkelt udtræk og lave en IF,else

Du bliver nød til at medtage alle de recordset du laver du kan tage flere med i samme:

if rs1.EOF or rs2.EOF or rs3.EOF then
  'Et eller flere recordsets er tomt
else


end if

Lige for at skære det ud i pap for mig.
Hvis jeg har et felt der hedder mandag, tirsdag, onsdag med ingeting i
Hvordan vil du lave det så det skriver ingenting

Har du prøvet at spørge på www.eksperten.dk/

Du kan tjekke om et felt er tomt med isNull.

if isNull(rs("mandag")) then
  'feltet mandag er tomt
else

end if

Jeg troede lige at jeg kunne lave en genvej, Tak for hjælpen.
Til Lockd: Jeg synes at jeg prøver
til Eagleeye Giver du et svar

Ja det gør jeg.

Hvis du for hver post vil tjekke at alle felterne indeholder noget kan du lave en for sætning som tjekker en post ad gangen eks:


do while not rs.EOF
  okUdskriv = true
  for each f in rs.Fields
    if isNull(f) then
      okUdskriv = false
      exit for
    end if
  next
  if okUdskriv = true then
    'Udskriv posten

  end if
  rs.Movenext
loop

Tak igen