Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.
Private Sub Command1_Click() Dim rs As ADODB.Recordset Dim sql As String Set rs = New ADODB.Recordset sql = "SELECT SUM(Amount) as 'Total Amount' FROM Deduction WHERE Amount = 'Amount'" rs.LockType = adLockOptimistic rs.CursorType = adOpenKeyset rs.Open sql, cn With rs text1.Text = (rs("Total Amount")) End With Set rs = Nothing End Sub
|Using Round (coverting VB6 code to SQL)||5||41|
|How to determine how many ODD and EVEN digits are in a number using VB6?||3||52|
|How do I check if a control variable has something assigned?||5||40|
|VBA: perform index match based on config sheet with two additional parameters.||9||45|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
13 Experts available now in Live!