ASP+access 实现无组件上传图片 这节课我来给大家讲 ASP+access 数据库实现无组件上传图片文件，我们的最终目的是将图片文件上传到文件夹，并将文件名写入数据库中。 一、 建立数据库myfile.mdb， 建表myfile ， 表中有四个字段 id(自动编号)， upname(文本，表示上传者名字)， filename（文本，表示上传后的文件名），uptime(日期/时间，表示上传的时间)。 二、建立一个名为myfile 的文件夹，用来放上传后的图片。 三、代码部分 1、 upload_5xsoft.inc （这是一个写好的上传类，我们不对它作解释，一会将该文件包含进去，只要会用就可以了）
ASP+access 实现无组件上传图片 这节课我来给大家讲 ASP+access 数据库实现无组件上传图片文件，我们的最终目的是将图片文件上传到文件夹，并将文件名写入数据库中
一、 建立数据库myfile
mdb， 建表myfile ， 表中有四个字段 id(自动编号)， upname(文本，表示上传者名字)， filename（文本，表示上传后的文件名），uptime(日期/时间，表示上传的时间)
二、建立一个名为myfile 的文件夹，用来放上传后的图片
三、代码部分 1、 upload_5xsoft
inc （这是一个写好的上传类，我们不对它作解释，一会将该文件包含进去，只要会用就可以了） '注意：如果运行出现错误，请将此句和对应的结束语句改为asp 符号 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,
