Makumbi256
Programmer
Note: i would want to read the data from the table newstreamtrap in the database then iam using MVC visual studio 2019
Code:
Dim audit As New ADODB.Recordset
audit.Open "Newstreamtrap", CurrentProject.Connection
audit.Find ("stream= '" & Forms!studentsearch!ADDNEW!STREAM & "'")
If audit.EOF Then
' MsgBox ("not found")
Else
If audit!dif <= 0 Then
MsgBox ("THIS STREAM IS ALREADY FULL"), vbCritical, "UNIFORM MANAGER"
Forms!studentsearch!ADDNEW!STREAM = Null
'Me.Undo
Exit Sub
End If
End If