网络文件管理系统的设计与实现_毕业论文(编辑修改稿)内容摘要:

数字YES编号Userid数字YES用户编号Filedir_id数字YES文件编号Size数字NO文件大小ShareNO图片是否共享 4 系统功能模块的实现 系统登录模块。 主要代码如下:Function Checkdim username,errstr,pwderrstr=提示信息==amp。 nbsp。 username=replace((username),39。 ,)pwd=replace((pwd),39。 ,)if trim(username)= thenerrstr=errstramp。 用户名错误elseset rs=()sql=select * from vip_Admin where username=39。 amp。 usernameamp。 39。 sql,conn,1,3if thenerrstr=errstramp。 无此用户set rs=nothingelseif rs(pwd)md5(pwd) thenerrstr=errstramp。 密码错误set rs=nothingelsers(Times)=Now()session(admin)=UserNameset rs=nothing end ifend ifend if errstrEnd Function 用户管理模块、删除用户,设置他们的上传级别,设定他们的管理范围(此系统为文件目录),对他们进行编辑(修改其上传级别,上传目录,权限等)。 代码如下:opendataDim Web_Vip_reg,Web_Vip_Name,Web_Vip_CallerWeb_Config%HTMLHEADTITLE%=Web_Vip_Name%/TITLEmeta equiv=ContentType content=text/html。 charset=gb2312meta equiv=ContentLanguage content=zhMETA name=description content=网络硬盘,ASP,数据库,SQLlink rel=stylesheet href=../style type=text/css.photo image {width:100px。 height:100px。 cursor:hand。 border:1px solid A58A52}/stylescript Language=JavaScript src=../js//scriptSCRIPT LANGUAGE=JavaScript!function Add(){ = Add。 =。 ()。 }function exit(){ = exit。 =。 ()。 }function check_edit() { errfound = false。 if (==) { if (!errfound) { (请输入口令。 )。 ()。 errfound = true。 } }if (==) { if (!errfound) { (请输入信箱。 )。 ()。 errfound = true。 } }if ((@) 0) { if (!errfound) { (错误的信箱。 )。 ()。 errfound = true。 } } return ! errfound。 } 用户注册,主要代码如下:IF (action)=reg thencall regend ifSub regdim Username,Pwd,Sex,Age,Address,Maildim errstrerrstr=提示信息==amp。 nbsp。 Username=replace((username),39。 ,)Pwd=replace((Pwd),39。 ,)Pwd1=replace((Pwd1),39。 ,)Sex=replace((Sex),39。 ,)Age=replace((Age),39。 ,)=replace((),39。 ,)Mail=replace((Mail),39。 ,)if len(Username)10 then errstr=用户名不能超过5个汉字elseif instr(Username, )0 or instr(Pwd, )0 thenerrstr=用户名,密码不能包含空格elseif trim(UserName)= or trim(Pwd)= or trim(Mail)= then errstr=errstramp。 带*号的必须填写elseif PwdPwd1 thenerrstr=errstramp。 两次密码不一致elseif not IsNumeric(Age) thenerrstr=errstramp。 年龄必须为数字elseIF not IsNumeric() thenerrstr=errstramp。 必须为数字elseif isnull(Address) thenerrstr=errstramp。 请填写地址elsesql=select Username from vip_user where Username=39。 amp。 Usernameamp。 39。 set rs=(sql)if not thenerrstr=errstramp。 用户名已存在set rs=nothingelsePwd=md5(pwd)sql=insert into vip_user (username,pwd,sex,age,address,mail,times,Vip,loginip)values(39。 amp。 Usernameamp。 39。 ,39。 amp。 Pwdamp。 39。 ,amp。 Sexamp。 ,amp。 Ageamp。 ,amp。 amp。 ,39。 amp。 Mailamp。 39。 ,39。 amp。 Now()amp。 39。 ,amp。 Web_Vip_regamp。 ,39。 amp。 (REMOTE_ADDR)amp。 39。 ) (Sql)errstr=errstramp。 注册成功amp。 nbsp。 a href=font color=red点此登陆/font/aset rs=nothing 文件管理。 主要可实现以下功能:目录的建立、删除、更名,文件的更名、建立、剪切、粘贴、复制、删除、上传、下载及编辑。 文件的建立、剪切、粘贴、复制、删除因为ASP没有内置专用的对象来访问服务器端的文件夹或文件,所以如果要访问服务器端的文件夹或文件,必须使用FileSystemObject服务器组件。 而且我们无法做到直接访问FileSystemObject服务器的集合、属性或方法。 所以,,然后使用此对象实例去访问其集合、属性或方法,以实现文件的建立、剪切、粘贴、复制、删除功能。 大致方法如下:full_path=(path)//获取文件的实际路径set obj_fso=()//建立FileSystemObject组件的实例obj。
阅读剩余 0%
本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体),仅供学习参考。 用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权,请联系我们反馈本站将在三个工作日内改正。