查找字符串strscan

;Author : Bing 
;Date : 1/10/2019
;Usage: modify log drictory according to actual drictory

fileopen fh 'd:\test.log' 0

while 1
filereadln fh line  #读取文件
pause 2
waitln 'cd0( 43'
strscan inputstr ')' #以43后面开头查找
start_p=result+1
strscan inputstr '8' #以8结尾之前查找
end_p=result-1
len=end_p-start_p+1
strcopy inputstr start_p len file_size #copy查找的字符串up or down到inputstr

statusbox file_size 'title' #显示查找的字符串,在状态框中
endwhile
fileclose fh
closesbox

猜你喜欢

转载自www.cnblogs.com/maisha/p/12264423.html