G
Guest
Hi everybody!
Please, can anybody tell me how to solve this problem? I've written a procedure for opening data from a file, make some changes in this file and then save it to the disk for later import into a table.
This is the code that enables this:
Set oFileSystem = CreateObject("Scripting.FileSystemObject")
Set OpenText = oFileSystem.OpenTextFile("Dane.txt", ForReading, False)
Do While Not OpenText.AtEndOfLine
Dim liniatemmp As String
liniatemmp = OpenText.ReadLine
.....
Loop
Everything works OK in Access 2002, but when compilled in Access 97, I get an error in the line replacing "," with ";" .....
How to do that in Access 97?
Any help will be appreciated.
liniatemmp = Replace(liniatemmp, Chr(44), Chr(59))
Please, can anybody tell me how to solve this problem? I've written a procedure for opening data from a file, make some changes in this file and then save it to the disk for later import into a table.
This is the code that enables this:
Set oFileSystem = CreateObject("Scripting.FileSystemObject")
Set OpenText = oFileSystem.OpenTextFile("Dane.txt", ForReading, False)
Do While Not OpenText.AtEndOfLine
Dim liniatemmp As String
liniatemmp = OpenText.ReadLine
.....
Loop
Everything works OK in Access 2002, but when compilled in Access 97, I get an error in the line replacing "," with ";" .....
How to do that in Access 97?
Any help will be appreciated.
liniatemmp = Replace(liniatemmp, Chr(44), Chr(59))