variabele over meerdere procedures

[jvondermans]

Als ik een formulier open laad ik daarin direct een query

Private Sub Form_load()
strsql = "SELECT * FROM Totaallijst_voor_selectie"
End Sub

In dat formulier staat een knop, waarmee ik de query wil laten uitvoeren

Private Sub Knop0_Click()
DoCmd.RunSQL strsql
End Sub

Dit is allemaal een basis waar ik de query verder mee wil opbouwen, maar zelfs dit lukt me niet

de variabele strsql wordt dus binnen verschillende procedures gebruikt en ik denk dat het daar mis gaat. Als ik de knop aanklik krijg ik een foutmelding:

"fout 3129" er is een ongeldige sql instructie gevonden.

Ik heb al gelezen dat ik die dan ergens anders moet declareren, maar hoe en waar?

Groetjes,
Jordy

 

[ReneDirks]

Bovenaan je code als public

 

[jvondermans]

misschien heeldom, maar hoe doe ik dat, ik begrijp datmijn andere procedures private zijn, en dan?

in ieder geval vast bedankt

 

[ReneDirks]

Bijvoorbeeld code in formulier:

Option Compare Database
Option Explicit

Public strSQL As String

Private Sub Form_load()
strSQL = "SELECT * FROM Totaallijst_voor_selectie"
End Sub

Private Sub Knop0_Click()
DoCmd.RunSQL strSQL
End Sub

 

[jvondermans]

geweldig bedankt ik ga weer verder!