Just copy and paste the Function Code into the Declarations Section of your Form and when you want to write the data just use:
'strData' in the Function is local to the Function and nothing to do with 'strData' in the calling procedure.Code:intFile = AddToShiftFile(Now, strRX)




Reply With Quote