示例:文件上传

最新推荐文章于 2024-02-02 11:19:58 发布

xuandhu

最新推荐文章于 2024-02-02 11:19:58 发布

阅读量815

点赞数

分类专栏：其它 ASP.NET文件/邮件文章标签： server button file input exception web服务

本文链接：https://blog.csdn.net/xuandhu/article/details/105427

版权

其它同时被 2 个专栏收录

39 篇文章 0 订阅

订阅专栏

ASP.NET文件/邮件

20 篇文章 0 订阅

订阅专栏

<html>
<title>第九例 HtmlInputCheckBox和HtmlInputFile控件使用</title>
<head>

    <script language="VB" runat="server">
       Sub Button1_Click(Source As Object, e As EventArgs)

If Check1.Checked = True Then
'判断是否HtmlInputCheck被选中
            If Text1.Value = "" Then
                Span1.InnerHtml = "错误：你必须键入一个文件名"
                Return
            End If

            If Not (File1.PostedFile Is Nothing) Then
                Try
                        File1.PostedFile.SaveAs(("c:/" + Text1.Value))
'如果上传成功，显示成功信息
                        Span1.InnerHtml = "文件成功的上传到 <b>c:/" & _
                                      Text1.Value & "</b> Web服务器上"
                Catch exc As Exception
                        Span1.InnerHtml = "文件没有保存到 <b>c:/" & _
                                      Text1.Value & "</b><br>" & exc.ToString()
                End Try
            End If
   else
'如果没有选中HtmlInputCheck，则不会返回文件上传信息
   If Text1.Value = "" Then
                  Return
            End If

            If Not (File1.PostedFile Is Nothing) Then
                File1.PostedFile.SaveAs(("c:/temp/" + Text1.Value))

            End If
End if

        End Sub
    </script>

</head>
<body>

    <h3><font face="Verdana">第九例 HtmlInputCheckBox和HtmlInputFile控件使用</font></h3>

    <form enctype="multipart/form-data" runat="server">

       选择一个文件上传:
       <input id="File1"
              type="file"
              runat="server">

       <p>
       保存文件名字 (不需要路径):
       <input id="Text1"
              type="text"
              runat="server">

       <p>
       <span id=Span1
             style="font: 8pt verdana;"
             runat="server" />

       <p>
<input id="Check1" type=checkbox runat="server" checked/>
            显示文件上传信息   

xuandhu

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
示例:文件上传

第九例 HtmlInputCheckBox和HtmlInputFile控件使用 Sub Button1_Click(Source As Object, e As EventArgs) If Check1.Checked = True Then判断是否HtmlInputCheck被选中 If Text1.Value = "" Th
复制链接

扫一扫