摘要： 0 then OutErr("清除类时发生错误!") End Sub '分析上传的数据 Public Sub GetData (MaxSize) '定义变量 on error Resume Next if isGetData_=false then Dim RequestBinDate,sSpace,bCrLf,sInfo,iInfoStart,iInfoEnd,tStream,i... 阅读全文

摘要： Public Function GetNewFileName() dim ranNum dim dtNow dtNow=Now() randomize ranNum=int(90000*rnd)+10000 GetNewFileName=year(dtNow) & right("0" & month(dtNow),2) & right("0"... 阅读全文

摘要： 无效的过程调用或参数: 'MidB' 使用化境无组件上传文件，提交表单之后，出现了“无效的过程调用或参数: 'MidB'” 这样的错误提示 在网上一搜同问题的还不少哈~ 呵呵 原来里忘记写 enctype="multipart/form-data" 了 下次一定记的enctype="multipart/form-data" 阅读全文