I have this code it works great.
It opens a file and searchs for a value. once its done with that file it goes to the next file. I have 3 files total.
I need to give the total of the value ID. in each file
Does anyone know how to do this?
Thanks in advance
Dim File As String
Dim TextLine As...
Code is not looping through file to get each textline to find value: "ID"
Any help please.
Public Sub Email()
Dim File As String
Dim TextLine As String
Dim i As Integer
Dim stucntr As Integer
Dim filecntr As Integer
stucntr = 0
For filecntr = 1 To 3
File =...
I'm trying to read this file and I want to find the total records within the file.
Search the file and find the value (ID:) and give the total records found in the file
so I'm trying to loop through.
How can I find the total records in the file based on what I have?
For filecntr = 1 To 3...
get an error.
0405T2D1
this is just a name not a variable
Error Type:
Microsoft VBScript compilation (0x800A03EE)
Expected ')'
/App_PDF/PDFIndex.asp, line 117, column 70
Response.Write ("<a href='/File/BUS2006T2D.pdf'> " & BUS & " " & 0405T2D1 & " BUS </a>")...
I have a PDF file in a directory and Im trying to link it
But I have a syntax problem and I have been trying to find out the problem but I have'nt had any luck
any help would be appraciated
Response.Write ("<a href=/File/"BUS2006T2D.pdf"> "+BUS+" "+0405T2D1+" BUS </a>")
onpnt
That works great. Question how would I put each value into one string.
The output looks like this:
ART
ASC
BIO
HUM
JUR
MPS
MUS
SBS
USS
UVC
So I guess this loops through and prints out every 3 characters with a "<br>" for break
I need to put each one of these ART, ASC, BIO, HUM, JUR...
Ok that worked
here is the ouput.
This goes on forever
The starting string is: ARTASCBIOHUMJURMPSMUSSBSUSSUVC i = 1
StartPosition = 1
The value is:
i = 2
StartPosition = 4
The value is:
i = 3
StartPosition = 7
The value is:
i = 4
StartPosition = 10
The value is:
i = 5
StartPosition = 13...
Ok I get a response back from the the first response.write
but the other part does not seem to work
here is the output:
any suggestions
The starting string is: ARTASCBIOHUMJURMPSMUSSBSUSSUVC
Also here is most of the code I'm working with.
It might explain why its not working
colls =...
I get no response from the response.write function
Do u have any other suggestions?
Thanks
SetLength = 3
SetCount = Len(totalcolls) Mod SetLength
For i = 1 to SetCount
StartPosition = i * SetLength
Response.Write Mid(totalcolls, StartPosition, SetLength)
Next
Having a problem. I have this variable that
Response.Write totalcolls gives this line
totalcolls = Mid(colls,i+1,colls_lgth)
Response.Write totalcolls
ARTASCBIOHUMJURMPSMUSSBSUSSUVC this is the line
Now I'm trying to parse this line out every three characters.
Dim strCol2
i = 0
strCol2...
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.