ASP网页编程之使用ASP.NET设计FTP文件上传(asp.net)

大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧asp.net|上传|设计|asp.net|上传   @版本和前_的上黝似是一拥墓δ埽皇⑶搬崤_的代ao分_了

.aspx
＜%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm6.aspx.vb" Inherits="MyData.WebForm6"%>
＜!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
＜HTML>
＜HEAD>
＜title>WebForm6＜/title>
＜meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.1">
＜meta name="CODE_LANGUAGE" content="Visual Basic .NET 7.1">
＜meta name="vs_defaultClientScript" content="JavaScript">
＜meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
＜/HEAD>
＜body MS_POSITIONING="GridLayout">
＜ASP:panel id="FileUploadForm" visible="true" runat="server">
＜FORM id="Form2" method="post" encType="multipart/from-data" runat="server">
＜P>＜INPUT id="loFile" type="file" name="loFile" runat="server">＜/P>
＜P>
＜asp:TextBox id="dir" runat="server">＜/asp:TextBox>＜BR><!--可以指定上髀-->
＜asp:Button id="Button1" runat="server" Text="Button">＜/asp:Button>＜BR>
＜/P>
＜/FORM>
＜/ASP:panel>
＜ASP:panel id="AnswerMsg" visible="false" runat="server">
＜ASP:label id="FileName" runat="server">＜/ASP:label>
＜BR>
＜ASP:label id="FileLength" runat="server">＜/ASP:label>
＜BR>
＜ASP:label id="FileType" runat="server">＜/ASP:label>
＜BR>
＜/ASP:panel>
＜/body>
＜/HTML>

.vb
Imports System.IO
Imports System.Data

Public Class WebForm6
Inherits System.Web.UI.Page

#Region " Web フォ`ム デザイナで生成されたコ`ド "

'この呼び出しは Web フォ`ム デザイナで需要です。
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

End Sub
Protected WithEvents FileUploadForm As System.Web.UI.WebControls.Panel
Protected WithEvents FileName As System.Web.UI.WebControls.Label
Protected WithEvents FileLength As System.Web.UI.WebControls.Label
Protected WithEvents FileType As System.Web.UI.WebControls.Label
Protected WithEvents AnswerMsg As System.Web.UI.WebControls.Panel
Protected WithEvents loFile As System.Web.UI.HtmlControls.HtmlInputFile
Protected WithEvents Button1 As System.Web.UI.WebControls.Button
Protected WithEvents dir As System.Web.UI.WebControls.TextBox

'メモ : 次のプレ`スホルダ宣言は Web フォ`ム デザイナで需要です。
'削除および移婴筏胜い扦坤丹ぁ
Private designerPlaceholderDeclaration As System.Object

Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
' CODEGEN: このメソッド呼び出しは Web フォ`ム デザイナで需要です。
' コ`ド エディタを使って涓筏胜い扦坤丹ぁ
InitializeComponent()
End Sub

#End Region

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' ペ`ジを早期化するユ`ザ` コ`ドをここに啡毪筏蓼埂
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim lstrFileName As String
Dim lstrFileNamePath As String
Dim lstrFileFolder As String

If dir.Text <> "" Then '假如上髂垮h榭眨褪褂" c:\ "作缺省上髂垮h
lstrFileFolder = dir.Text '@得上鞯椒掌鞯哪垮h名Q
Else
lstrFileFolder = "c:\"
End If

Dim files As System.Web.HttpFileCollection = System.Web.HttpContext.Current.Request.Files
Dim postedFile As System.Web.HttpPostedFile = files(0)

lstrFileName = System.IO.Path.GetFileName(postedFile.FileName) '@得文件名Q
'注： loFile.PostedFile.FileName 前往的是通^文件υ框x竦奈募, @当中包括了文件的目h信息

lstrFileName = Path.GetFileName(lstrFileName) '去失落目h信息，前往文件称号

If (Not Directory.Exists(lstrFileFolder)) Then ' 判别上髂垮h是不是存在，不存在就创立
Directory.CreateDirectory(lstrFileFolder)
End If

lstrFileNamePath = lstrFileFolder & lstrFileName '上魑募椒掌
loFile.PostedFile.SaveAs(lstrFileNamePath) '失掉上髂垮h及文件称号

' @得并@示上魑募傩 </p>  当然了,现在国内CRM厂商的产品与其说是CRM,但从至少从我的角度分析上来看,充其量只是一个大型的进销存而已了,了解尚浅,不够胆详评,这里只提技术问题

在平时的学习过程中要注意现学现用，注重运用，在掌握了一定的基础知识后，我们可以尝试做一些网页，也许在开始的时候我们可能会遇到很多问题，比如说如何很好的构建基本框架。

ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。

多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。

跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。

运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write

学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点:

尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。

哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?

学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

仓酷云

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

不能只是将它停留在纸上谈兵的程度上。