Få resultat fra en SQL sætning

Set db = CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & App.Path & "db.mdb"

sSQL = "SQLSÆTNINGEN"
Set RS = db.Execute sSQL

Do while not (rs.eof or rs.bof)
  //indsæt i tabel
  //value = rs("feltnavn")
  //...

loop

db.Close
Set db = Nothing

og mon ikke der skal paranteser i din:
Set RS = db.Execute(sSQL)

hmm det virker ik...
Set db = CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & App.Path & "db.mdb"

sSQL = "Select sum(tal) from tabel"
Set RS = db.Execute sSQL

Do while not (rs.eof or rs.bof)

lblflaf.caption = rs("tal")


loop

db.Close
Set db = Nothing

har prøvet med () omkring sSQL

hvad er fejlen?