GregoryWest
Registered User.
- Local time
- Yesterday, 22:19
- Joined
- Apr 13, 2014
- Messages
- 161
I have a large loop running, inside this loop, the program needs to stop for operator intervention. (See code below) Once the user and adjusted the data the loop continues on. At least that is how I need it to work. What is happening now is the program completes until the end of the file it is processing, and then stops. Does not stop for input for the records that need user interaction. What a, I missing??
code:
code:
Code:
addrin = Mid(rs_datain!InputText, 15, 210)
working = Trim(addrin)
rs_code_5!postalcode = Mid(working, (Len(working) - 6), 7)
working = Trim(Mid(working, 1, Len(working) - 8))
rs_code_5!prov = Mid(working, (Len(working) - 1), 2)
working = Trim(Mid(working, 1, Len(working) - 2))
rs_code_5!city = Mid(working, (Int(Len(working) / 30) * 30 + 1), 255)
rs_code_5!addr1 = Mid(working, 1, 30)
rs_code_5!addr2 = Mid(working, 31, 30)
rs_code_5!addr3 = Mid(working, 61, 30)
rs_code_5!addr4 = Mid(working, 91, 30)
rs_code_5!ref = Mid(rs_datain!InputText, 227, 30) '13
rs_code_5!clientno = Val(Mid(rs_datain!InputText, 257, 8)) '14
rs_code_5!created = Date
rs_code_5!lastupdate = Date
rs_code_5!active = True
rs_code_5.Update
DoCmd.OpenForm FormName:="CheckAddr", View:=acNormal, DataMode:=acFormEdit
Last edited by a moderator: