본문 바로가기

Web Program159

네트워크 드라이드 파일 권한 갖기 안녕 하십니까? 마이크로 소프트 기술 지원부 입니다. Domain이 서로 다르고, 드라이브로 연결된 파일 공유 디렉토리에 대해 접근을 시도하는 Web Server의 익명 계정 생성 및 권한 설정이 되지 않은 경우 문제가 발생 할 수 있습니다. 그럴 경우 다음 처럼 해 보시기 바랍니다. 1. Web Server에서 IUSR_ 계정과 IWAM_ 계정에 대해 Password를 설정 2. Web Server의 Metabase에서 각 계정 Password를 변경 3. 공유 폴더를 소유한 서버에서 Local 계정으로 Web Server에서 사용된 IUSR_... 및 IWAM_.. 계정을 생성 및 권한을 설정 4. IIS의 익명 계정에 대한 Password를 설정 5. IIS를 재시작 6. IIS Appliction.. 2008. 9. 8.
파일 삭제 Set objFso = CreateObject("Scripting.FileSystemObject") strFileName = server.MapPath("file") & "\aaa.txt" If objFso.FileExists(fileFullPath) Then objFso.DeleteFile strFileName end if set objFso = nothing 2008. 9. 8.
파일 읽고 쓰기 Set fso = CreateObject("Scripting.FileSystemObject") Set objFile = fso.OpenTextFile(strFileName, 1) s = objFile.ReadAll set fso = nothing Set objFs = Server.CreateObject("Scripting.FileSystemObject") Set f = objFs.CreateTextFile(strFilename, true) f.Write strKeyData set objFs = nothing 2008. 9. 8.
Base64 encode/decode OPTION EXPLICIT const BASE_64_MAP_INIT = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" dim nl " zero based arrays dim Base64EncMap(63) dim Base64DecMap(127) " must be called before using anything else PUBLIC SUB initCodecs() " init vars nl = "" & chr(13) & chr(10) " setup base 64 dim max, idx max = len(BASE_64_MAP_INIT) for idx = 0 to max - 1 " one based string Base64EncMap(.. 2008. 9. 8.

티스토리툴바