急急急为何这里出现未将对象引用设置到对象的实例错误如何阻止？

zeroman20 2007-06-09 10:38:16

代码如下如何阻止？
<% @ import Namespace="System.IO"%>
<script language="vb" runat="server">
sub enter_click(sender as object,e as eventargs)
dim exc as exception
'try
dim filename,filepath,temp as string
temp = uploadfile.postedfile.filename
filename=path.getfilename(temp)
filepath=server.mappath("file")& "\" & filename
uploadfile.postedfile.saveas(filepath)
response.redirect("../isOk.htm")
'catch exc
message.text ="保存文件时出错<br>" & exc.tostring()
'end try

end sub

Sub cancel_Click(ByVal sender As Object, ByVal e As EventArgs)
response.redirect("manioadd.aspx")
End Sub
</script>

<html>
<body>
<h4 align="center">上传文件</h4>
<form enctype="multipart/form-data" runat="server"/>
选择文件：<input id ="uploadfile" type="file" runat="server"/>
<br> <input type="button" id ="enter" value=" 提交 " onserverclick="enter_click" runat="server"/>
<input type="button" id ="Button1" value=" 重置 " onserverclick="cancel_click" runat="server"/>
<asp:Label ID ="message" Runat="server"/>

</form>
</body>

</html>

...全文

231 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

zeroman20 2007-06-10

打赏
举报

我都注释掉还是出错
temp = uploadfile.postedfile.filename 有问题

winner2050 2007-06-10

打赏
举报

若干非要注释try语句，那么你就连message.text ="保存文件时出错<br>" & exc.tostring()
都注释掉，否则一定出错的。

winner2050 2007-06-10

打赏
举报

只有发生异常的时候exc才被赋值。

你把try语句注释掉了，exc不会被赋值了，所以就错误了。

Jinglecat 2007-06-10

打赏
举报

1。
呀，代码本来是正确的，你非得注释人家的 try-cacth，这样，你的 exc 当然没有被 new 出来，但是这句

message.text ="保存文件时出错<br>" & exc.tostring()

却总是执行，

回去看看 try-catch 相关知识要点

dim exc as exception
'try
dim filename,filepath,temp as string
temp = uploadfile.postedfile.filename
filename=path.getfilename(temp)
filepath=server.mappath("file")& "\" & filename
uploadfile.postedfile.saveas(filepath)
response.redirect("../isOk.htm")
'catch exc
message.text ="保存文件时出错<br>" & exc.tostring()
'end try

>>>>>

dim exc as exception
try
dim filename,filepath,temp as string
temp = uploadfile.postedfile.filename
filename=path.getfilename(temp)
filepath=server.mappath("file")& "\" & filename
uploadfile.postedfile.saveas(filepath)
response.redirect("../isOk.htm")
catch exc
message.text ="保存文件时出错<br>" & exc.tostring()
end try

2。
下一次请说明出错的代码在哪一行，编译错误，还是运行错误