Lines Matching refs:File
26 ' File: NetRube_Upload.asp
50 Public File, Form variable
58 Set File = Server.CreateObject("Scripting.Dictionary")
59 File.CompareMode = 1
72 File.RemoveAll
73 Set File = Nothing
184 Set File(sFormName) = New NetRube_FileInfo
185 File(sFormName).FormName = sFormName
186 File(sFormName).Start = nFormEnd
187 File(sFormName).Size = nFormStart - nFormEnd - 2
190 File(sFormName).ClientPath = Mid(sFormHeader, nPosStart, nPosEnd - nPosStart)
191 …File(sFormName).Name = Mid(File(sFormName).ClientPath, InStrRev(File(sFormName).ClientPath, "\") …
192 … File(sFormName).Ext = LCase(Mid(File(sFormName).Name, InStrRev(File(sFormName).Name, ".") + 1))
195 File(sFormName).MIME = Mid(sFormHeader, nPosStart, nPosEnd - nPosStart)
219 If File(sItem).Size < 1 Then
224 If Not IsAllowed(File(sItem).Ext) Then
235 sFileExt = File(sItem).Ext
236 iFileSize = File(sItem).Size
250 oSourceData.Position = File(sItem).Start
267 oSourceData.Position = File(sItem).Start
268 oSourceData.CopyTo oFileStream, File(sItem).Size