<%
'-loader.asp--
'-version1.5.2
'-rastupdated12/5/2002
'
'Faisalkhan
'[email protected]
'www.stardeveloper.com
'ClassForHandlingBinaryUploads
클래스 로더
개인
privatesubclass_initialize
setDict = server.createObject ( "scripting.dictionary")
Endsub
privatesubclass_terminate
ifisobject (intdict)
intdict.removeall
setIntDict = 아무것도
endif
그런 다음 ifisobject (dict)
dict.removeall
setDict = 아무것도
endif
Endsub
PublicpropertygetCount
count = dict.count
엔드 프로페티
대중 서부화
ifrequest.totalBytes> 0then
DIMBINDATA
bindata = request.binaryread (request.totalBytes)
getDatabIndata
endif
Endsub
PublicFunctionGetFiledata (이름)
그런 다음 ifdict.exists (이름)입니다
getFiledata = dict (name) .item ( "value")
또 다른
getFiledata = ""
endif
최종 기능 장애
publicFunctionGetValue (이름)
Dimgv
그런 다음 ifdict.exists (이름)입니다
gv = cstr (dict (name) .item ( "value"))
gv = 왼쪽 (GV, Len (GV) -2)
getValue = gv
또 다른
getValue = ""
endif
최종 기능 장애
