upload.aspx

是可以运行的电子光盘 有程序与PPT介绍 对于学习VB。NET的有参考意义

<%@ Page Language="VB" MasterPageFile="~/MainMasterPage.master" AutoEventWireup="false" CodeFile="Upload.aspx.vb" Inherits="FileManager_Upload" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<div style="border-right: blue 1px solid; border-top: blue 1px solid; border-left: blue 1px solid; border-bottom: blue 1px solid; font-size: small;">
<table width ="100%">
    <tr>
        <td style="width: 575px">
            <img src="../Images/pick.gif" />上传文件&nbsp;&nbsp;&nbsp;&nbsp;<A href="javascript:history.go(-1);" ><IMG src="../Images/link_back.gif" align=absMiddle border=0 ></A>
            <hr />
        </td>
    </tr>
    <tr>
        <td style="width: 575px">
            <H4>路径: <asp:label id="txtpath" runat="server"></asp:label></H4>类型： 
             <input id=click1 onclick=show1() type=radio CHECKED value=1 
                  name=optshow> <label for=click1 >上传文件</label>
            <input id=click3 
                  onclick=show3() type=radio value=2 name=optshow > <label for=click3 >外部下载</label> <br>
            <label for=autorename >重名文件自动更名</label>
        </td>
    </tr>
    <tr>
        <td style="width: 575px">
            &nbsp;<asp:Table ID="TableFooter" runat="server">
                <asp:TableRow>
                    <asp:TableCell Font-Bold="True" Text="Upload file:" Width="80px"></asp:TableCell>
                    <asp:TableCell>
                        <input id="UploadedFile" runat="server" name="UploadedFile" size="35" type="file" />
                    </asp:TableCell>
                    <asp:TableCell>
                        <asp:Button ID="Upload" runat="server" CssClass="Button" OnClick="Upload_Click" Text="Upload" />
                    </asp:TableCell>
                </asp:TableRow>
            </asp:Table>
        </td>
    </tr>
    <tr>
        <td style="width: 575px">
            <label for=click3 >下载地址：</label>
            <INPUT class=kuan  id=textBoxFileURL type=text size=52 name=textBoxFileURL  runat="server">
            <br />
            （如http://www.xxx.com/xxx.zip）</td>
    </tr>

</table>
</div>
    <asp:Label ID="StatusMessage" runat="server" ForeColor="Red"></asp:Label>
 
</asp:Content>