asp+ VB上传文件代码
发表于:2007-06-30来源:作者:点击数:
标签:
<html>
<script language="
VB" runat=server>
Sub UploadBtn_Click(Sender as Object, E as EventArgs)
UploadFile.PostedFile.SaveAs(Server.MapPath("test.jpg"))
MyImage.ImageUrl = "test.jpg"
MyImage.Visible = true
End Sub
</script>
<body>
<form enctype="multipart/form-data" runat=server>
<h3>
Select File To Upload: <input id="UploadFile" type=file runat=server>
<asp:button Text="Upload Me!" OnClick="UploadBtn_Click" runat=server/>
<hr>
<asp:image id="MyImage" Visible=false runat=server/>
</form>
</body>
</html>
原文转自:http://www.ltesting.net