asp限制上传文件大小实例_ASP教程

教程Tag：暂无Tag,欢迎添加,赚取U币!

缂傚倷绀佸ú锕傚焻缁€鎱筪eCMS闁荤喐鐟ュΛ婵嬨€傞崼鏇炴瀬婵炲棙鍨熼弻锟�婵炴垶姊规竟鍡涘煘閺嶎厽鈷掗柨鐕傛嫹缂備礁顦遍崰鎰耿閸ヮ剙绀夐柍銉ㄦ珪閻濓拷闂備緡鍋勯ˇ杈╃礊婢跺本鍏滈柡鍥ㄦ皑闂夊秹鏌ゆ潏銊︻棖缂佹唻鎷� 闂佸搫鍟版慨鎾椽閺嶎偆鍗氭繛鍡樻尰濮ｆ劗鈧鎮堕崕閬嶅矗閿燂拷,闂佽皫鍕姢閻庤濞婂鍫曞礃椤斿吋顏熸繛鎴炴尨閸嬫捇姊哄▎鎯ф灈闁告瑥绻樺濠氭晸閿燂拷!

推荐：一个实用asp分页函数
分享一个asp分页函数，感觉挺好看的。视图如图：可以根据自己的情况修改，代码： % '谢亮修分页程序 'call pagecontrol(记录总数,页码总数,当前页) Sub PageControl(iCount,pagecount,page) response.Write(style type=text/css/*谢亮分页CSS*/div.pager{padding:10px

一款利用asp文件上传组件把文件上传到服务器之前进行判断文件大小否超过指定大小了，本实例讲的是upload_5xsoft文件上传组件哦,file.filesize>1000000就可以限制文件为多少k。

dim upload,file,formname,formpath,icount,filename,fileext
set upload=new upload_5xsoft                '建立上传对象
formpath="download/"                                '在目录后加(/)
if right(formpath,1)<>"/" then formpath=formpath&"/"
for each formname in upload.file            '列出所有上传了的文件
set file=upload.file(formname)                '生成一个文件对象
if file.filesize>1000000 then
    message=1
else                                        '如果 filesize <20000 说明有文件数据
    fileext=lcase(right(file.filename,4))
    if fileext<>".exe" and fileext<>".zip" and fileext<>".rar" and fileext<>".mxp" then
        message=2
    else
        randomize
        rannum=int(90000*rnd)+10000
        filename=formpath& "lemongtree_" & year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&rannum&fileext
        file.saveas server.mappath(filename)    '保存文件
        if fileext=".zip" then
            uploadtype = "zip"
        elseif fileext=".rar" then
            uploadtype = "rar"
        elseif fileext=".mxp" then
                uploadtype = "mxp"
        elseif fileext=".exe" then
                uploadtype = "exe"
        end if
        uploadchar = filename
        size = clng(file.filesize)/1000
        message=3
    end if
end if
next
%>
<% if message=1 then%>
<html>
<head>
<title>大小超标</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<script language=网页特效>
function error_size()
{
    alert("文件大小超过1000kb，请重新选择。");
    window.location="upload.asp";
}
</script>
</head>
<body bgcolor="#f2f2f2" leftmargin="0" topmargin="0" onload="error_size()">
</body>
</html>
<% elseif message=2 then%>
<html>
<head>
<title>类型不匹配</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<script language=javascript>
function error_type()
{
    alert("只能上传 zip / rar / exe /mxp 文件n请选择正确的文件类型！");
    window.location="upload.asp";
}
</script>
</head>
<body bgcolor="#f2f2f2" leftmargin="0" topmargin="0" onload="error_type()">
</body>
</html>
<% elseif message=3 then%>
<html>
<head>
<title>上传成功</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<script language=javascript>
function image_success()
{
    alert("文件上传成功！");
    parent.form1.url1.value="<%=uploadchar %>"
    parent.form1.size.value="<%=size%>k"
    window.location="upload.asp";
}
</script>
</head>
<body bgcolor="#f2f2f2" leftmargin="0" topmargin="0" onload="image_success()">
</body>
</html>
<% end if %>
<%
set file=nothing
set upload=nothing ''删除此对象
%>

分享：网站制作ASP语言的特点与功能
ASP(Active Server Page的缩写) 意思是活动服务器网页。ASP是微软公司开发,用于代替CGI脚本程序的一种应用. 它可以与数据库和其它程序进行交互,是一种简单,方便的编程工具。ASP的网页文件的格式为.asp,现常用于各种动态网站中。 ASP是一种服务器端脚本编写环境,可以用