ODBC 데이터 베 이 스 를 사용 하여 Serv-U 를 관리 하 는 FTP 사용자 및 관련 ASP 프로 그래 밍[소스 코드 예제 다운로드]
3.ODBC 구축.예제 과정 은 다음 과 같다(1)시스템 DSN(시스템 데이터 원본)을 추가 하고 SQL Server 를 선택 하여 데이터 원본 이름과 서버 를 채 웁 니 다(이 컴퓨터 는 local 을 사용 합 니 다).
Oracle database for use with Serv-U
(2)로그 인 인증 방식 은 mssql 설정 에 따라 결 정 됩 니 다.여 기 는 SQL 인증 방식 으로 로그 인 합 니 다.
(3)데이터 베 이 스 를 변경 하여 Serv-U 표 의 데이터 베 이 스 를 만 들 고 확인 하 며 ODBC 설정 을 완성 합 니 다.현재 Serv-U 라 는 시스템 데이터 원본 이 있 습 니 다.이 이름과 로그 인 을 기억 하고 사용자 와 비밀 번 호 를 사용 하 십시오.
4.Serv-U(1)를 설정 하여 Serv-U 를 닫 고 MS SQL Server ODBC Example 예제 패키지 에서 add-to-Ini.txt 파일 을 가 져 옵 니 다.이 파일 을 열 면 다음 코드 를 완전 하 게 복사 합 니 다.[Domain 1]ODBCTables=ftpusers|ftp_groups|ftp_userAccess|ftp_groupAccess|ftp_userIPs|ftp_groupIPsODBCColumns=ftpUserName|ftpPassword|sKey|dirHome|loginMsgFile|accessRule|disabled|sessionEncryption|dirHomeLock|hideHidden|alwaysAllowLogin|changePassword|quotaEnable|maxUsersLoginPerIP|speedLimitUp|speedLimitDown|maxUsersConcurrent|timeOutIdle|timeOutSession|ratioUp|ratioDown|ratioCredit|quotaCurrent|quotaMax|expiration|privilege|ftpPasswordType|ratioType|groups|notes|indexNo
(2)Serv-U 의 설치 디 렉 터 리 를 열 고 ServUDaemon.ini 파일 을 찾 으 면[Domain 1]과 그 뒤의 대응 설정 을 위의 코드 로 교체 합 니 다.
(3)Serv-U 를 다시 열 고 새로 만 든 도 메 인 을 찾 습 니 다.ODBC 설정 에서 ODBC 링크 설정 을 볼 수 있 을 것 입 니 다.ODBC 소스 이름,계 정,비밀번호 부분 이 비어 있 는 것 을 제외 하고 다른 표 이름과 열 이름 이 모두 설정 되 어 있 습 니 다.
(4)ODBC 원본 이름,계 정,비밀 번 호 를 입력 하고 설정 을 적용 합 니 다.설정 에 문제 가 없 으 면 도 메 인 앞 에 있 는 아이콘 은 더 이상 금지 되 어 있 지 않 습 니 다.(5)사용 자 를 마음대로 만 들 고 ftp 에 대응 하 는 것 을 표시 합 니 다.users 표 에서 존재 하 는 지 찾 아 보 세 요.문제 가 없 으 면 Serv-U 의 ODBC 설정 을 완 료 했 습 니 다.2.프로 그래 밍 실현 ODBC 관리 Serv-U 사용자 가 데이터 베 이 스 를 가지 고 프로 그래 밍 으로 Serv-U 사용 자 를 관리 하 는 것 은 매우 간단 하고 쉬 운 일이 고 유일한 난점 은 암호 화 에 있다.우 리 는 Serv-U 세 가지 암호 화 알고리즘 을 알 고 있 습 니 다.기본 적 인 상황 에서 32 비트 md5 암호 화 알고리즘 입 니 다.이것 은 16 비트 와 64 비트 암호 화 알고리즘 과 다 르 기 때문에 우 리 는 프로 그래 밍 에서 32 비트 MD5 암호 화 알고리즘 을 사용 하여 암호 화 를 실현 해 야 합 니 다.다음은 ASP 프로 그래 밍 을 예 로 들 면 다음 과 같은 두 함수 로 암호 화 를 완성 하고 32 비트 MD5 암호 화 파일 은 여기 서 MD5.ASP Function 을 다운로드 합 니 다. SerUPassEnCode(strPass) Dim Char1,Char2,Seed,prePass,EncodePass,FinalPass If IsNull(strPass) Or strPass="" Then Exit Function Char1 = Chr(Rand(97,122)) Char2 = Chr(Rand(97,122)) Seed = Char1 & Char2 prePass = Seed & strPass EnCodePass = Ucase(md5(prePass)) '32 위 md5 FinalPass = Seed & EnCodePass SerUPassEnCode = FinalPass End Function Function Rand(n,m) Dim a,b,t a = n : b = m If b < a Then t = b : b = a : a = t Randomize Rand = Int(rnd*(b-a+1)+a) End Function 본 고 는 완전히 오리지널 입 니 다.작가 의 노동 을 존중 하고 전재 해 주 십시오.출처 를 밝 혀 주 십시오.감사합니다.