Ok.. I think I got it compiled down correctly to this:
const ForReading = 1
const TristateFalse = 0
dim strSearchThis
dim objFS
dim objFile
dim objTS
set objFS = CreateObject("Scripting.FileSystemObject")
set objFile = objFS.GetFile(PW_GetJobFilename)
set objTS =...
[COLOR=red] I think I understand.
The problem I'm having is that I have to replace those invalid characters with a variety of other characters, and I'm not sure how to integrate the three parts of the code together.
I know I want something like this to read the file (it's supposed to be fairly...
I'm working with some VERY large ascii lpd data files and it turns out there are some non-printing character sequences that are causing problems for my print management software. I need to do some heavy search and replace functions on the data for it to work properly.
I found a website with...
Thank you very much, both of you.
The script works now, and it dynamically changes the forms for my data a LOT faster than my manual settings when combined with a data splitter.
As a warning, I have little to no VBScript knowledge whatsoever.
Here's the snippet of code first, then I'll provide some background with my objective.
---
'Get the input file from PPWatch and open it.
Set fsObject = CreateObject("Scripting.FileSystemObject")
Set inFile =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.