怎么在上传的时候也能接收表单数据

来源：百度知道 编辑：UC知道 时间：2024/05/25 00:05:21
怎么在上传的时候也能接收表单数据!!
麻烦大哥大姐们给指点~~要是要在.inc文件里加代码请告诉我~我会追加分数
怎么在.inc里面定义这个
set upload=new upload_5xSoft'//-------这个将类upload_5xSoft进行初始化，创建upload对象
barid=upload.form("barid") '//-------调用类中的form方法接受前面表单传过来的title值
wname=upload.form("wname")

哥哥可以解释一下什么意思么？

<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
dim Data_5xsoft

Class upload_5xsoft

dim objForm,objFile,Version

Public function Form(strForm)
strForm=lcase(strForm)
if not objForm.exists(strForm) then
Form=""
else
Form=objForm(strForm)
end if
end function

Public function File(strFile)
strFile=lcase(strFile)
if not objFile.exists(strFile) then
set File=new FileInfo
else
set File=objFile(strFile)
end if
end function

Private Sub Class_Initialize
dim RequestData,sStart,vbCrlf,sInfo,iInfoStart,iInfoEnd,tStream,iStart,theFile
dim iFileSize,sFilePath,sFileType,sFormValue,sFileName
dim iFindStart,iFindEnd
dim iFormStart,iFormEnd,sFormName
Version="上传程序 Version 2.0"
set objForm=Server.CreateObject("Scripting.Dictionary")
set objFile=Server.