Public Sub import_payroll()
Dim intx As Integer
Dim inputstring As String
intx = 0
Open "c:ProjectsParyoll 2prdata" For Input As #1
Do While Not EOF(1)
, inputstring(intx) <--- Here is location of error
intx = intx + 1
I have created this code to input an ascii file into a string array. I also created a subroutine called string_break that breaks the string accordingly and sends it to a database for storage. I keep getting this error:
Compile Error: Expected Array, and it points to where I marked on the code.
I am not sure why this error is occuring, please help, if you need to see the code for the string break sub let me know if that will help. Thank you all very much.