<%@ Page Language=
"VB"
MasterPageFile=
"~/MasterPage.master"
Title=
"Upload"
%>
<script runat=
"server"
>
Protected
Sub
btnUpload_Click(
ByVal
sender
As
Object
,
ByVal
e
As
System.EventArgs)
If
FileUpload1.HasFile
Then
Try
lblStatus.Text =
"Uploading File "
+ FileUpload1.FileName
FileUpload1.SaveAs(
"~/Files/"
+ FileUpload1.FileName)
lblStatus.Text =
"Soubor uložen"
Catch
lblStatus.Text =
"Soubor se nepodařilo uložit"
End
Try
Else
lblStatus.Text =
"Musíš vybrat soubor"
End
If
End
Sub
</script>
<asp:Content ID=
"Content1"
ContentPlaceHolderID=
"head"
Runat=
"Server"
>
<div class=
"NadpisStranky"
>
Upload
</div>
<asp:Label ID=
"lblStatus"
runat=
"server"
Text=
"Label"
></asp:Label>
</asp:Content>
<asp:Content ID=
"Content2"
ContentPlaceHolderID=
"ContentPlaceHolder1"
Runat=
"Server"
>
<asp:FileUpload ID=
"FileUpload1"
runat=
"server"
Width=
"217px"
/>
<br />
<br />
<asp:Button ID=
"btnUpload"
runat=
"server"
onclick=
"btnUpload_Click"
Text=
"Upload"
/>
</asp:Content>