Code: Select all
dim as string Content
dim as string InputFile
dim as string OutputFile
open InputFile for input as #1
open OutputFile for append as #2
do until eof(1)
line input #1, Content
if left(Content,3) = "UID" then
print #2, Content
print left(Content,30) & ". . . ."
end if
if left(Content,1) = "{" then
print #2, Content
print left(Content,30) & ". . . ."
end if
sleep 250
loop
close #1
close #2
Code: Select all
UID: storm5510/3570_Ivy_Bridge, M44587 completed....
{"exponent":"92893093", "worktype":"PM1"....
I am missing something, but I do not know what it may be.....