04. januar 2007 - 08:04Der er
15 kommentarer og 1 løsning
Tjek på records
Hej, så er den gal igen
Jeg har et hurtigt opslag der kører på form open, som skal tjekke en forespørgsel for records. Jeg har fundet frem til følgende, men der mangler et eller andet:
Dim Form As String Dim db As DAO.Database Dim rs As DAO.Recordset
Form = Forms!Menu!txtReport
Set db = CurrentDb Set rs = db.OpenRecordset(Form)
If Not rs.BOF And Not rs.EOF Then MsgBox "Ingen Records" Else MsgBox "Records"
Problemet er at uanset om den forespørgsel jeg trigger har records eller ej, så kommer beskeden "Ingen Records" frem... Hvorfor?
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
rs.moveLast rs.MoveFirst If rs.Recordcount = 0 Then MsgBox "Ingen Records" else ...
Synes godt om
Slettet bruger
04. januar 2007 - 09:04#8
Nu har jeg forsøgt med følgende (hvor jeg skriver hvilket recordset der skal bruges manuelt), men får nu en parameters fejl: Too Few paramaters. Expected 4.
Private Sub Form_Open(Cancel As Integer) Dim db As Database Dim rs As Recordset
Set db = CurrentDb Set rs = db.OpenRecordset("q_Tracker_Agent", dbOpenDynaset)
If Not rs.BOF And Not rs.EOF Then MsgBox "Ingen Records" Else MsgBox "Records" End If End Sub
Try this Private Sub Form_Open(Cancel As Integer) Dim db As Database Dim rs As Recordset
Set db = CurrentDb Set rs = db.OpenRecordset("q_Tracker_Agent")
If rs.BOF And rs.EOF Then MsgBox "Ingen Records" Else MsgBox "Records" End If End Sub
Synes godt om
Slettet bruger
04. januar 2007 - 09:34#11
I finaly figured it out.
First off, the code used the wrong query hehe, after fixing that, I found out OpenRecordset doesn't work very well with queries that have parameters in them.
So I'm gonna go with DCount, which works perfectly.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
