I am building an Outlook form that has several Combo Boxes that i intend to populate from >CSV files. I have written the follow VB code that work great but VBScript is not liking the Line -- Open wFname For Input As wFileNum
I have removed the extra declarations and replaced the variable with #1 . It tells me that end of line is expected.
Any general direction would be great.
Public Sub ReadCategoryText()
Dim wFname As String
Dim wStr As String
Dim wFileNum As Integer
wFname = "c:\KACEData\Category.csv"
wFileNum = FreeFile()
Open wFname For Input As wFileNum
Do While Not EOF(wFileNum)
Line Input #wFileNum, wStr