13-04-13, 05:55 AM
If rs.State = adStateOpen Then rs.Close
rs.Open "Select SUM(salary) as salary From tabel1 where da '" & Text2.Text & "' and '" & Text10.Text & "'", db, adOpenKeyset, adLockPessimistic
Text3.Text = rs![salary]
rs.Open "Select SUM(salary) as salary From tabel1 where da '" & Text2.Text & "' and '" & Text10.Text & "'", db, adOpenKeyset, adLockPessimistic
Text3.Text = rs![salary]
