100高分求助，在form中使用此方法enctype="multipart/form-data"，退出sub子程序出错的问题，在线等待！

chiying2000 2003-05-07 04:25:46

在form中使用此方法enctype="multipart/form-data"，以下的sub子程序在调用后，不知是程序不能刷新还是如何，总是提示无法找到页，如果去掉
enctype="multipart/form-data"，调用此sub子程序不会出错，但form必须使用enctype="multipart/form-data"，如何处理这段程序，问题解决肯定送分100。

<SCRIPT LANGUAGE=vbscript>
sub Submit1_onclick()
str1=document.form1.file1.value
if right(str1,3)<>"bmp" then
MsgBox "此文件不是图片文件，不能上传！",vbExclamation
document.form1.file1.select
exit sub
end if
document.form1.action ="../bugmanager/upfile.asp?"
document.form1.submit
end sub
</script>
<body bgcolor="#FFFFFF" text="#000000">
<form name="form1" method="post" enctype="multipart/form-data" >
</form>

...全文

23 3 打赏收藏转发到动态举报

写回复

用AI写文章

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

chiying2000 2003-05-07

打赏
举报

可以执行此sub子程序，但并没有return false，而是form仍然执行了action的表单上传了文件，还要改什么地方，谢谢！

cpp2017 2003-05-07

打赏
举报

<SCRIPT LANGUAGE=vbscript>
sub Submit1_onclick()
str1=document.form1.file1.value
if right(str1,3)<>"bmp" then
MsgBox "此文件不是图片文件，不能上传！",vbExclamation
document.form1.file1.select
exit sub
end if

document.form1.submit
end sub
</script>
<body bgcolor="#ffffff" text="#000000">
<form name="form1" method="post" enctype="multipart/form-data" >
<P> </P>
<P> </P>
<P><INPUT type=file id=file1></P>
<P><INPUT id=button1 type=button action="="../bugmanager/upfile.asp" value=Button name=Submit1 ></P>
<P> </P>

</form></BODY></HTML>

xuya 2003-05-07

打赏
举报

<SCRIPT LANGUAGE=vbscript>
function check()
str1=document.form1.file1.value
if right(str1,3)<>"bmp" then
MsgBox "此文件不是图片文件，不能上传！",vbExclamation
document.form1.file1.select
return false
end if
return true
end function
</script>
<body bgcolor="#FFFFFF" text="#000000">
<form name="form1" method="post" action ="../bugmanager/upfile.asp" enctype="multipart/form-data" onsubmit="return check">
</form>