在网站后台上传图片,显示上传成功,但是网站里并不能显示缩略图,请大神指点。上传编程文件为asp格式。 5

<%Server.ScriptTimeOut=9999999response.Buffer=true%><!--#includefile="../include/subc... <%
Server.ScriptTimeOut=9999999
response.Buffer=true
%>
<!--#include file="../include/subconn.asp"-->
<!--#include FILE="UploadUp.asp"-->
<%
dim cls
if session("admin")="" then
Response.Redirect("admin.asp")
else
if session("flag")<>"0" then

cls = Instr(session("flag"), "prod")
if cls <= 0 then
%>
<script language="javascript">
if (confirm("您的操作权限不够,系统拒绝你的访问,请点确定返回,或者点取消退出重新登录"))
location.href="admin.asp";
else
location.href="quit.asp";
</script>
<%
end if
end if
end if
%>
<html>
<head>
<title>文件上传</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="css/Style.css" rel=stylesheet type=text/css>
<SCRIPT language=javascript>
function check()
{
var strFileName=document.form1.strFile1.value;
if (strFileName=="")
{
alert("请选择要上传的文件");
document.form1.strFile1.focus();
return false;
}
return true;
}
</SCRIPT>
</head>
<body class="a3">
<%
dim sortname,folder,formPath
formPath= "upload/"

contrl=request("contrl")
if contrl="" then contrl="photo"

folder=request("folder")
if folder<>"" then formpath=formpath & folder & "/"

up=request("up")

if up="up" then
%>
<table border="0" cellpadding="0" cellspacing="0" bordercolor="#3D5489"><tr><td>
<%
dim request2

'建立上传对象
set request2=New UpLoadClass
'上传总大小为1000M
request2.TotalSize= 1048576000
'单文件最大500M
request2.MaxSize = 100288000
'允许上传rar/zip格式文件
request2.FileType = "rar/zip/mp3/doc/jpg/gif/xls/swf/bmp/png/pdf/exe/txt/wmv/avi/mpg/mpeg"
request2.SavePath="../" & formPath
request2.open()

if request2.Error=-1 then
response.Write("请选则文件!")
elseif request2.Error=4 then
response.Write("总数据量超过限制,上传失败")
elseif request2.Error=1 then
response.Write "文件大小超过限制,允许最大文件为"&request2.MaxSize&"k"
elseif request2.Error=2 then
response.Write "文件格式不对!"
else
response.Write "<SCRIPT>parent.prodtable."&contrl&".value='"&replace(request2.SavePath,"../","")&request2.Form("strFile1")&"'</SCRIPT>"

response.Write("上传成功:<a href="&request2.SavePath&request2.Form("strFile1")&" target=_blank>"&request2.SavePath&request2.Form("strFile1")&"</a>")
end if

'释放上传对象
set request2=nothing
%>
</td></tr></table>
<%
up=""
response.End()
end if
%>

<form action="?up=up&contrl=<%=contrl%>&folder=<%=folder%>" enctype="multipart/form-data" name="form1" method="post" onSubmit="return check()">
<table border="0" cellpadding="0" cellspacing="0">
<tr bgcolor="#3D5489">
<td><input name="strFile1" type="file" id="strFile1"><input type="submit" name="Submit" value="上传"></td>
</tr>
</table>
</form>
</body>
</html>
展开
 我来答
网海1书生
科技发烧友

2017-02-08 · 擅长软件设计、WEB应用开发、小程序
网海1书生
采纳数:12311 获赞数:26228

向TA提问 私信TA
展开全部
你可以通过ftp看看文件有没有实际上传到服务器,坦尺如果没有,就可能是你这个上传类有问题;如果有,但前台又没有旅罩显示,那就是前台的图片路径搞错了。光看你这些代码是发现不了问拆信闹题的,因为我们又不知道你服务器的目录结构。
追问

上传的时候显示上传成功,但是前台没有显示。

你现在能看出来是上传类有问题还是路径有问题吗?感谢~

推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式