VBScript to read specific line and extract characters and store it as a variable

Question

I have a VB script that reads the 11th line from a text file. However from that line I need to extract characters 48 through 53 and save it as a variable. After this is acco

Answer 1

Take a look at InStr function. It lets you search for a substring.

http://www.w3schools.com/vbscript/func_instr.asp

Then you can use the Right function to parse out the end bit of the line.

You can also look at the Split function so you can parse the lines into arrays and deal with it that way which would be best.

http://www.w3schools.com/vbscript/func_split.asp

Answer 2

The following works!

Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("szCPUSer.dat", ForReading)
For i = 1 to 10
    objTextFile.ReadLine
Next
strLine = objTextFile.ReadLine
Wscript.Echo strLine
objTextFile.Close

'Gets 6 chars starting from Right side
SerNum = Right(strLine, 6)
'Gets 6 chars starting from Left side
SerNum = Left(SerNum, 5)
'Wscript.Echo SerNum
url = "http://seriallookup.com/serial=" & SerNum
Wscript.Echo url