[AccessXP & VBA] SELECT COUNT - Softwareontwikkeling

vrijdag 2 mei 2003 10:39

Acties:

Verwijderd

Topicstarter

Hoi,

heb volgend probleem:
Ben bezig met een formulier waarin een waarde moet komen, deze waarde is het aantal rijen die op 'Yes' staan in voor komt.

Ik wil dit met onderstaande code doen maar krijg dan een syntax error.

code:

1	Form![Time_points] = CurrentDb.Execute "SELECT COUNT * FROM Pull_Window WHERE " & Form![Storage_time] & " = yes"

Weet iemand een andere manier?? of wat hier fout aan is. Alvast bedankt.

Swaab

vrijdag 2 mei 2003 10:53

Acties:

Verwijderd

Ik werk volgens de '97 manier, en daarbij moet je iniedergeval eerst zeggen van welke recordset je de waarde wilt hebben. Weet niet of XP nog met DAO werkt, maar denk dat zoiets meer zal doen:

Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("SELECT blahblah..." , dbOpenDynaset)
Form![Time_points] = rs(0)

vrijdag 2 mei 2003 11:04

Acties:

Verwijderd

Topicstarter

ok, ik heb nu:

code:

1
2
3

Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("SELECT COUNT * FROM Pull_Window WHERE " & Form![Storage_time] & " = yes", dbOpenDynaset)
Form![Time_points] = rs(0)

en krijg als fout:
Syntax error (missing operator) in querie expresion 'COUNT *'

iemand een idee?

vrijdag 2 mei 2003 11:08

Acties:

syllaz

code:

1	Form![Time_points] = CurrentDb.Execute "SELECT COUNT(Storage_time) FROM Pull_Window WHERE " & Form![Storage_time] & " = yes"

Je moet wel het veld wat je wilt tellen definieren in COUNT. Bovenstaande code zou moeten werken....

vrijdag 2 mei 2003 11:17

Acties:

Verwijderd

Tip: bouw eerst je query eens op in de ontwerpweergave in access zelf. Deze werken nl ook in VBA. vergeet niet de enters er tussen uit te halen en alle overbodige haakjes

.