FSO는 Microsoft ASP의 파일 작업 제어입니다. 따라서 잘못된 새 채널의 편집자는 FSO 코드에 대한 자세한 분석을 공유합니다.
FSO를 사용하여 파일 별 컨텐츠를 수정하는 기능
functionfsochange (파일 이름, 대상, 문자열)
dimobjfso, objcountfile, filetempdata
setobjfso = server.createobject ( "scripting.filesystemobject")
setobjcountfile = objfso.opentextfile (server.mappath (filename), 1, true)
filetempdata = objcountfile.readall
objcountfile.close
filetempdata = replace (filetempdata, target, string)
setObjCountFile = objfso.createTxtFile (Server.Mappath (Filename), True)
objcountfile.writeFileTempData
objcountfile.close
setobjcountfile = 아무것도 없습니다
setobjfso = 아무것도
최종 기능 장애
FSO를 사용하여 파일 내용을 읽는 기능
functionfsofileread (filename)
dimobjfso, objcountfile, filetempdata
setobjfso = server.createobject ( "scripting.filesystemobject")
setobjcountfile = objfso.opentextfile (server.mappath (filename), 1, true)
fsofileread = objcountfile.readall
objcountfile.close
setobjcountfile = 아무것도 없습니다
setobjfso = 아무것도
최종 기능 장애
FSO를 사용하여 파일 줄을 읽는 함수
functionfsolinedit (filename, linenum)
iflinenum
Dimfso, F, Temparray, tempcnt
setfso = server.createobject ( "scripting.filesystemobject")
ifnotfso.fileExists (server.mappath (filename)) exitfunction
setf = fso.opentextfile (Server.mappath (filename), 1)
ifnotf.atendofstreamthen
tempcnt = f.readall
f.close
setf = 아무것도
템플릿 = split (tempcnt, chr (13) & chr (10))
iflinenum> Ubund (Temparray)+1then
종료 기능
또 다른
fsolinedit = temparray (linenum-1)
endif
endif
최종 기능 장애
FSO를 사용하여 특정 파일의 특정 줄을 작성하는 함수
functionfsolinewrite (filename, linenum, linecontent)
iflinenum
Dimfso, F, Temparray, tempcnt
setfso = server.createobject ( "scripting.filesystemobject")
ifnotfso.fileExists (server.mappath (filename)) exitfunction
setf = fso.opentextfile (Server.mappath (filename), 1)
ifnotf.atendofstreamthen
tempcnt = f.readall
f.close
템플릿 = split (tempcnt, chr (13) & chr (10))
iflinenum> Ubund (Temparray)+1then
종료 기능
또 다른
템플릿 (Linenum-1) = 경주
endif
tempcnt = Join (Temparray, chr (13) 및 chr (10))
setf = fso.creatextFile (Server.Mappath (filename), true)
f.writetempcnt
endif
f.close
setf = 아무것도
최종 기능 장애
fso를 사용하여 파일의 새 줄을 추가하는 함수
functionfsoappline (filename, linecontent)
Dimfso, f
setfso = server.createobject ( "scripting.filesystemobject")
ifnotfso.fileExists (server.mappath (filename)) exitfunction
setf = fso.opentextfile (Server.mappath (filename), 8,1)
F.Writechr (13) 및 chr (10) 및 Linecontent
f.close
setf = 아무것도
최종 기능 장애
파일의 마지막 줄을 읽는 함수
functionfsolastline (filename)
Dimfso, F, Temparray, tempcnt
setfso = server.createobject ( "scripting.filesystemobject")
ifnotfso.fileExists (server.mappath (filename)) exitfunction
setf = fso.opentextfile (Server.mappath (filename), 1)
ifnotf.atendofstreamthen
tempcnt = f.readall
f.close
setf = 아무것도
템플릿 = split (tempcnt, chr (13) & chr (10))
fsolastline = temparray (Ubund (Temparray))
endif
최종 기능 장애
FSO는 지정된 파일의 문자를 대체합니다
프로그램 코드 :
'FSO는 지정된 파일의 문자를 대체합니다
functionfsolineedit (파일 이름, 대상, 문자열)
dimobjfso, objcountfile, filetempdata
setobjfso = server.createobject ( "scripting.filesystemobject")
setobjcountfile = objfso.opentextfile (server.mappath (filename), 1, true)
filetempdata = objcountfile.readall
objcountfile.close
filetempdata = replace (filetempdata, target, string)
setObjCountFile = objfso.createTxtFile (Server.Mappath (Filename), True)
objcountfile.writeFileTempData
objcountfile.close
setobjcountfile = 아무것도 없습니다
setobjfso = 아무것도
최종 기능 장애
'response.writefsolineedit ( "test.txt", "World", "내일은 좋은 날입니다")
파일 삭제
프로그램 코드 :
'파일을 삭제하십시오
FunctionDelfile (Filename)
iffilename ""그런 다음
setfso = server.createobject ( "scripting.filesystemobject")
iffso.fileExists (filename)
fso.deletefilefilename
endif
setfso = 아무것도
endif
최종 기능 장애
파일이 존재하는지 확인하십시오
프로그램 코드 :
'파일이 존재하는지 확인하십시오
FunctionReportFilestatus (filespec)
Dimfso, MSG
setfso = createobject ( "Scripting.FilesyStemObject")
if (fso.fileExists (filespec))
msg = filespec & "존재합니다."
또 다른
msg = filespec & "exexist."
endif
reportFilestatus = msg
최종 기능 장애
FSO를 사용하여 파일 별 컨텐츠를 수정하는 기능
프로그램 코드 :
'FSO를 사용하여 파일 별 컨텐츠 기능을 수정하십시오
functionfsochange (파일 이름, 대상, 문자열)
dimobjfso, objcountfile, filetempdata
setobjfso = server.createobject ( "scripting.filesystemobject")
setobjcountfile = objfso.opentextfile (server.mappath (filename), 1, true)
filetempdata = objcountfile.readall
objcountfile.close
filetempdata = replace (filetempdata, target, string)
setObjCountFile = objfso.createTxtFile (Server.Mappath (Filename), True)
objcountfile.writeFileTempData
objcountfile.close
setobjcountfile = 아무것도 없습니다
setobjfso = 아무것도
최종 기능 장애
FSO를 사용하여 특정 파일의 특정 줄을 작성하는 함수
프로그램 코드 :
'FSO를 사용하여 특정 파일 줄이있는 함수를 작성하십시오.
functionfsolinewrite (filename, linenum, linecontent)
iflinenum
Dimfso, F, Temparray, tempcnt
setfso = server.createobject ( "scripting.filesystemobject")
ifnotfso.fileExists (server.mappath (filename)) exitfunction
setf = fso.opentextfile (Server.mappath (filename), 1)
ifnotf.atendofstreamthen
tempcnt = f.readall
f.close
temparray = split (tempcnt, chr (13) & chr (10))
iflinenum> ubound (temparray)+1then
종료 기능
또 다른
템플릿 (Linenum-1) = 경주
endif
tempcnt = Join (Temparray, chr (13) 및 chr (10))
setf = fso.creatextFile (Server.Mappath (filename), true)
f.writetempcnt
endif
f.close
setf = 아무것도
최종 기능 장애
디렉토리를 만드는 프로그램. 여러 수준의 디렉토리가있는 경우 한 번에 한 레벨을 작성하십시오.
프로그램 코드 :
'디렉토리를 만드는 프로그램. 여러 수준의 디렉토리가 있으면 한 번에 한 레벨을 만듭니다.
functioncreatedir (byvallocalpath)
onerrorresumenext
LocalPath = Replace (LocalPath, "/", "/")
setFileObject = server.createObject ( "scripting.filesystemobject")
patharr = split (LocalPath, "/")
path_level = ubound (patharr)
fori = 0topath_level
ifi = 0thenpathtmp = patharr (0) & "/"elsepathtmp = pathtmp & patharr (i) & "/"
cpath = 왼쪽 (pathtmp, len (pathtmp) -1)
ifnotfileobject.folleerxists (cpath) thefileobject.createfoldercpath
다음
setFileObject = 아무것도 없습니다
iferr.number0then
createir = false
err.clear
또 다른
createir = true
endif
최종 기능 장애
다음은 이러한 불안하지만 매우 멋진 기능 중 일부입니다.
거의 이해되지 않는 FSO 기능
GetSpecialfolderMethod 특정 Windows 폴더의 경로를 반환합니다. Windows 설치 디렉토리; Windows 시스템 디렉토리; Windows 임시 디렉토리 FSO.GetSpecialFolder ([0,1, OR2])
getTempnamemEthod 임시 데이터가 필요할 때 사용되는 무작위로 생성 된 파일 또는 디렉토리 이름을 반환합니다.
getAbsolutePathnamemeDOD는 폴더에 대한 절대 경로를 반환합니다 (Server.Mappath와 유사).
예를 들어, fso.getabsolutepathname ( "region")은 다음과 유사한 결과를 반환합니다.
getextensionnamemethod 경로의 마지막 부분의 확장을 반환합니다.
(예 : fso.getextensionName ( "c : docsest.txt")은 txt를 반환합니다)
getBasenAmeAndGetParentFolderMethods 경로의 마지막 부분의 상위 폴더를 반환합니다.
(예 : fso.getParentfolder ( "C : Docsmydocs")는 '문서'를 반환합니다)
DrivesProperty는 자원 브라우저와 같은 사용자 인터페이스를 구축하기 위해 로컬로 사용 가능한 모든 드라이브 모음을 반환합니다.
위의 함수를 사용하는 경우 오류 처리를위한 코드를 만드는 것이 가장 좋습니다. 필요한 매개 변수가 존재하지 않으면 귀찮은 정보가 생성되기 때문입니다.
위의 것은 FSO 코드에 대한 자세한 분석입니다. 나는 당신이 모든 것을 배웠다고 믿습니다. 더 많은 관련 컨텐츠는 Wuxin Technology Channel에 계속주의를 기울이십시오.