영삼넷IT 강국 = 김영삼 블로그에 오신걸 환영합니다.

컴포넌트는 첨부되어 있는 파일을 사용하면 됩니다.

DLL등록하는 방법은

regsvr32 경로\aspftp.dll

라고

981203.zip

압축을 풀면 나오는 파일의 aps파일의 소스를 참고 하시면 쉽게 사용

가능 합니다.

그래도 잠깐 살펴 본다면..

‘대충 변수를 설정하고요

Dim objFTP

Dim ftpErrMsg

ftpErrMsg = ""

'객체를 만들어 줍니다

Set objFTP = Server.CreateObject("NIBLACK.ASPFTP")

'인자1 서버이름

'인자2 아이디

'인자3 패스

'인자4 소스파일

'인자5 타겟파일

'인자6 전송형태

'인자7 overWrite

If objFTP.bQPutFile("주소","아뒤","패스워드","경로", "대상",TRANSFER_TYPE_ASCII) Then

ftpErrMsg = ""

Else

ftpErrMsg = "objFTP.sError" '실패시 실패이유가 변수에 저장 됩니다

End If

'이제 객체를 닫아 주고요

Set objFTP = Nothing

if ftpErrMsg = "" then

call 성공시 실행할 함수

else

response.Write "전송실패 : "&ftpErrMsg

end if

머 대충 이렇게 사용하면 됩니다