edojanssen
Registered User.
- Local time
- Today, 20:48
- Joined
- Jun 21, 2006
- Messages
- 23
I've build a program for making invoices. The invoicenumbers come from an external program. To lower down the insertion of wrong invoicenumbers would like an inbuild controller on the invoicenumbers.
The invoicenumber begins with the last two digits of the year followed by 71 and a sequence of 4 digits. Example 10710172.
This is what I have right now. But unfortunately is doesn't work. If I use the invoicenumber 10710172 or similar the code goes right to the Else in the code.
Who can help me out?
Edo
The invoicenumber begins with the last two digits of the year followed by 71 and a sequence of 4 digits. Example 10710172.
This is what I have right now. But unfortunately is doesn't work. If I use the invoicenumber 10710172 or similar the code goes right to the Else in the code.
PHP:
Dim iJaarE As Integer
Dim sJaarE As Integer
Dim sInputE As String
sInputE = InputBox("Geef het ErBo-faktuurnummer uit Exact op!", "ErBo-faktuurnummer")
iJaarE = Format(Date, "yyyy")
sJaarE = Right(CStr(iJaarE), 2)
If sInputE = sJaarE & "71*" Then
[Faktuurnr] = sInputE
Me.ErBo.Value = True
Me.Refresh
DoCmd.GoToControl "Datum"
Else
MsgBox "Het ingevoerd faktuurnummer is niet juist"
End If
Who can help me out?
Edo
Last edited: