hallo guys, look I am not the guy that usually bug others, but I am now in a state where I need to ask someone for help ..
I have tried several methods to solve this problem, but with no result. anyway the problem is like this :
When you press the button add in the booking form the onclick even should have the following effect :
check in quryControl in field Status, if the status is having the integer 0 then add record else tell the user the capacity is reached. I have tried the following vba code :
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
rst.ActiveConnection = CurrentProject.Connection
rst.Properties("Jet OLEDB:Inconsistent") = True
rst.Open _
Source:="SELECT query1.status" & _
" FROM query1" & _
" WHERE (query1.show_id) = " & Me.SHOW_ID.Value, _
Options:=adCmdText
If rst!Status = 0 Then
MsgBox "Application Form Successfully Added"
Cancel = True
Else
MsgBox "ERROR: Too many members! This application Form is now being deleted"
End If
Set rst = Nothing
when this gets executed it would ALWAYS give me the following error : "no value given for one or more required parameters."
Would someone please help me ?
I have tried several methods to solve this problem, but with no result. anyway the problem is like this :
When you press the button add in the booking form the onclick even should have the following effect :
check in quryControl in field Status, if the status is having the integer 0 then add record else tell the user the capacity is reached. I have tried the following vba code :
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
rst.ActiveConnection = CurrentProject.Connection
rst.Properties("Jet OLEDB:Inconsistent") = True
rst.Open _
Source:="SELECT query1.status" & _
" FROM query1" & _
" WHERE (query1.show_id) = " & Me.SHOW_ID.Value, _
Options:=adCmdText
If rst!Status = 0 Then
MsgBox "Application Form Successfully Added"
Cancel = True
Else
MsgBox "ERROR: Too many members! This application Form is now being deleted"
End If
Set rst = Nothing
when this gets executed it would ALWAYS give me the following error : "no value given for one or more required parameters."
Would someone please help me ?