ASP.net 实现打开服务器FTP文件夹

给你一个访问ftp类。传入用户密码等，直接调用里面方法就可以了。能实现文件下载等

using System;

using SystemNet;

using SystemNetSockets;

using SystemText;

using SystemIO;

namespace JySoftSaleFrameFacade

{

/// <summary>

/// FTP 的摘要说明。

/// </summary>

public class FTPServer

{

private string strRemoteHost;

private int strRemotePort;

private string strRemotePath;

private string strRemoteUser;

private string strRemotePass;

private Boolean bConnected;

#region 内部变量

/// <summary>

/// 服务器返回的应答信息(包含应答码)

/// </summary>

private string strMsg;

/// <summary>

/// 服务器返回的应答信息(包含应答码)

/// </summary>

private string strReply;

/// <summary>

/// 服务器返回的应答码

/// </summary>

private int iReplyCode;

/// <summary>

/// 进行控制连接的socket

/// </summary>

private Socket socketControl;

/// <summary>

/// 传输模式

/// </summary>

private TransferType trType;

/// <summary>

/// 传输模式:二进制类型、ASCII类型

/// </summary>

public enum TransferType

{

/// <summary>

/// Binary

/// </summary>

Binary,

/// <summary>

/// ASCII

/// </summary>

ASCII

};

/// <summary>

/// 接收和发送数据的缓冲区

/// </summary>

private static int BLOCK_SIZE = 512;

Byte[] buffer = new Byte[ BLOCK_SIZE];

/// <summary>

/// 编码方式

/// </summary>

Encoding ASCII = EncodingDefault;

#endregion

#region 内部函数

#region 构造函数

/// <summary>

/// 缺省构造函数

/// </summary>

public FTPServer()

{

strRemoteHost = "";

strRemotePath = "";

strRemoteUser = "";

strRemotePass = "";

strRemotePort = 21;

bConnected = false;

}

/// <summary>

/// 构造函数

/// </summary>

/// <param name="remoteHost"></param>

/// <param name="remotePath"></param>

/// <param name="remoteUser"></param>

/// <param name="remotePass"></param>

/// <param name="remotePort"></param>

public FTPServer( string remoteHost, string remotePath, string remoteUser, string remotePass, int remotePort )

{

strRemoteHost = remoteHost;

strRemotePath = remotePath;

strRemoteUser = remoteUser;

strRemotePass = remotePass;

strRemotePort = remotePort;

Connect();

}

#endregion

#region 登陆

/// <summary>

/// FTP服务器IP地址

/// </summary>

public string RemoteHost

{

get

{

return strRemoteHost;

}

set

{

strRemoteHost = value;

}

}

/// <summary>

/// FTP服务器端口

/// </summary>

public int RemotePort

{

get

{

return strRemotePort;

}

set

{

strRemotePort = value;

}

}

/// <summary>

/// 当前服务器目录

/// </summary>

public string RemotePath

{

get

{

return strRemotePath;

}

set

{

strRemotePath = value;

}

}

/// <summary>

/// 登录用户账号

/// </summary>

public string RemoteUser

{

set

{

strRemoteUser = value;

}

}

/// <summary>

/// 用户登录密码

/// </summary>

public string RemotePass

{

set

{

strRemotePass = value;

}

}

/// <summary>

/// 是否登录

/// </summary>

public bool Connected

{

get

{

return bConnected;

}

}

#endregion

#region 链接

/// <summary>

/// 建立连接

/// </summary>

public void Connect()

{

socketControl = new Socket(AddressFamilyInterNetwork,SocketTypeStream,ProtocolTypeTcp);

IPEndPoint ep = new IPEndPoint(IPAddressParse(RemoteHost), strRemotePort);

// 链接

try

{

socketControlConnect(ep);

}

catch(Exception)

{

throw new IOException("连接不上FTP服务器！");

}

// 获取应答码

ReadReply();

if(iReplyCode != 220)

{

DisConnect();

throw new IOException(strReplySubstring(4));

}

try

{

// 登陆

SendCommand("USER "+strRemoteUser);

if( !(iReplyCode == 331 || iReplyCode == 230) )

{

CloseSocketConnect();//关闭连接

throw new IOException(strReplySubstring(4));

}

if( iReplyCode != 230 )

{

SendCommand("PASS "+strRemotePass);

if( !(iReplyCode == 230 || iReplyCode == 202) )

{

CloseSocketConnect();//关闭连接

throw new IOException(strReplySubstring(4));

}

}

}

catch

{

throw new IOException("登录用户名密码错误!");

}

bConnected = true;

// 切换到目录

ChDir(strRemotePath);

}

/// <summary>

/// 关闭连接

/// </summary>

public void DisConnect()

{

if( socketControl != null )

{

SendCommand("QUIT");

}

CloseSocketConnect();

}

#endregion

#region 传输模式

/// <summary>

/// 设置传输模式

/// </summary>

/// <param name="ttType">传输模式</param>

public void SetTransferType(TransferType ttType)

{

if(ttType == TransferTypeBinary)

{

SendCommand("TYPE I");//binary类型传输

}

else

{

SendCommand("TYPE A");//ASCII类型传输

}

if (iReplyCode != 200)

{

throw new IOException(strReplySubstring(4));

}

else

{

trType = ttType;

}

}

/// <summary>

/// 获得传输模式

/// </summary>

/// <returns>传输模式</returns>

public TransferType GetTransferType()

{

return trType;

}

#endregion

#region 文件 *** 作

/// <summary>

/// 获得文件列表

/// </summary>

/// <param name="strMask">文件名的匹配字符串</param>

/// <returns></returns>

public string[] Dir(string strMask)

{

// 建立链接

if(!bConnected)

{

Connect();

}

//建立进行数据连接的socket

Socket socketData = CreateDataSocket();

//传送命令

SendCommand("NLST " + strMask);

//分析应答代码

if(!(iReplyCode == 150 || iReplyCode == 125 || iReplyCode == 226))

{

return null;

}

//获得结果

strMsg = "";

while(true)

{

int iBytes = socketDataReceive(buffer, bufferLength, 0);

strMsg += ASCIIGetString(buffer, 0, iBytes);

if(iBytes < bufferLength)

{

break;

}

}

char[] seperator = {'\n'};

string[] strsFileList = strMsgSplit(seperator);

socketDataClose();//数据socket关闭时也会有返回码

if(iReplyCode != 226)

{

ReadReply();

if(iReplyCode != 226)

{

throw new IOException(strReplySubstring(4));

}

}

return strsFileList;

}

/// <summary>

/// 获取文件大小

/// </summary>

/// <param name="strFileName">文件名</param>

/// <returns>文件大小</returns>

private long GetFileSize(string strFileName)

{

if(!bConnected)

{

Connect();

}

SendCommand("SIZE " + PathGetFileName(strFileName));

long lSize=0;

if(iReplyCode == 213)

{

lSize = Int64Parse(strReplySubstring(4));

}

else

{

throw new IOException(strReplySubstring(4));

}

return lSize;

}

/// <summary>

/// 删除

/// </summary>

/// <param name="strFileName">待删除文件名</param>

public void Delete(string strFileName)

{

if(!bConnected)

{

Connect();

}

SendCommand("DELE "+strFileName);

if(iReplyCode != 250)

{

throw new IOException(strReplySubstring(4));

}

}

/// <summary>

/// 重命名(如果新文件名与已有文件重名,将覆盖已有文件)

/// </summary>

/// <param name="strOldFileName">旧文件名</param>

/// <param name="strNewFileName">新文件名</param>

public void Rename(string strOldFileName,string strNewFileName)

{

if(!bConnected)

{

Connect();

}

SendCommand("RNFR "+strOldFileName);

if(iReplyCode != 350)

{

throw new IOException(strReplySubstring(4));

}

// 如果新文件名与原有文件重名,将覆盖原有文件

SendCommand("RNTO "+strNewFileName);

if(iReplyCode != 250)

{

throw new IOException(strReplySubstring(4));

}

}

#endregion

#region 上传和下载

/// <summary>

/// 下载一批文件

/// </summary>

/// <param name="strFileNameMask">文件名的匹配字符串</param>

/// <param name="strFolder">本地目录(不得以\结束)</param>

public void Get(string strFileNameMask,string strFolder)

{

if(!bConnected)

{

Connect();

}

string[] strFiles = Dir(strFileNameMask);

foreach(string strFile in strFiles)

{

if(!strFileEquals(""))//一般来说strFiles的最后一个元素可能是空字符串

{

Get(strFile,strFolder,strFile);

}

}

}

/// <summary>

/// 下载一个文件

/// </summary>

/// <param name="strRemoteFileName">要下载的文件名</param>

/// <param name="strFolder">本地目录(不得以\结束)</param>

/// <param name="strLocalFileName">保存在本地时的文件名</param>

public void Get(string strRemoteFileName,string strFolder,string strLocalFileName)

{

if(!bConnected)

{

Connect();

}

SetTransferType(TransferTypeBinary);

if (strLocalFileNameEquals(""))

{

strLocalFileName = strRemoteFileName;

}

if(!FileExists(strLocalFileName))

{

Stream st = FileCreate(strLocalFileName);

stClose();

}

FileStream output = new

FileStream(strFolder + "\\" + strLocalFileName,FileModeCreate);

Socket socketData = CreateDataSocket();

SendCommand("RETR " + strRemoteFileName);

if(!(iReplyCode == 150 || iReplyCode == 125

|| iReplyCode == 226 || iReplyCode == 250))

{

throw new IOException(strReplySubstring(4));

}

while(true)

{

int iBytes = socketDataReceive(buffer, bufferLength, 0);

outputWrite(buffer,0,iBytes);

if(iBytes <= 0)

{

break;

}

}

outputClose();

if (socketDataConnected)

{

socketDataClose();

}

if(!(iReplyCode == 226 || iReplyCode == 250))

{

ReadReply();

if(!(iReplyCode == 226 || iReplyCode == 250))

{

throw new IOException(strReplySubstring(4));

}

}

}

/// <summary>

/// 上传一批文件

/// </summary>

/// <param name="strFolder">本地目录(不得以\结束)</param>

/// <param name="strFileNameMask">文件名匹配字符(可以包含和)</param>

public void Put(string strFolder,string strFileNameMask)

{

string[] strFiles = DirectoryGetFiles(strFolder,strFileNameMask);

foreach(string strFile in strFiles)

{

//strFile是完整的文件名(包含路径)

Put(strFile);

}

}

/// <summary>

/// 上传一个文件

/// </summary>

/// <param name="strFileName">本地文件名</param>

public void Put(string strFileName)

{

if(!bConnected)

{

Connect();

}

Socket socketData = CreateDataSocket();

SendCommand("STOR "+PathGetFileName(strFileName));

if( !(iReplyCode == 125 || iReplyCode == 150) )

{

throw new IOException(strReplySubstring(4));

}

FileStream input = new

FileStream(strFileName,FileModeOpen);

int iBytes = 0;

while ((iBytes = inputRead(buffer,0,bufferLength)) > 0)

{

socketDataSend(buffer, iBytes, 0);

}

inputClose();

if (socketDataConnected)

{

socketDataClose();

}

if(!(iReplyCode == 226 || iReplyCode == 250))

{

ReadReply();

if(!(iReplyCode == 226 || iReplyCode == 250))

{

throw new IOException(strReplySubstring(4));

}

}

}

#endregion

#region 目录 *** 作

/// <summary>

/// 创建目录

/// </summary>

/// <param name="strDirName">目录名</param>

public void MkDir(string strDirName)

{

if(!bConnected)

{

Connect();

}

SendCommand("MKD "+strDirName);

if(iReplyCode != 257)

{

throw new IOException(strReplySubstring(4));

}

}

/// <summary>

/// 删除目录

/// </summary>

/// <param name="strDirName">目录名</param>

public void RmDir(string strDirName)

{

if(!bConnected)

{

Connect();

}

SendCommand("RMD "+strDirName);

if(iReplyCode != 250)

{

throw new IOException(strReplySubstring(4));

}

}

/// <summary>

/// 改变目录

/// </summary>

/// <param name="strDirName">新的工作目录名</param>

public void ChDir(string strDirName)

{

if(strDirNameEquals("") || strDirNameEquals(""))

{

return;

}

if(!bConnected)

{

Connect();

}

SendCommand("CWD "+strDirName);

if(iReplyCode != 250)

{

throw new IOException(strReplySubstring(4));

}

thisstrRemotePath = strDirName;

}

#endregion

/// <summary>

/// 将一行应答字符串记录在strReply和strMsg

/// 应答码记录在iReplyCode

/// </summary>

private void ReadReply()

{

strMsg = "";

strReply = ReadLine();

iReplyCode = Int32Parse(strReplySubstring(0,3));

}

/// <summary>

/// 建立进行数据连接的socket

/// </summary>

/// <returns>数据连接socket</returns>

private Socket CreateDataSocket()

{

SendCommand("PASV");

if(iReplyCode != 227)

{

throw new IOException(strReplySubstring(4));

}

int index1 = strReplyIndexOf('(');

int index2 = strReplyIndexOf(')');

string ipData =

strReplySubstring(index1+1,index2-index1-1);

int[] parts = new int[6];

int len = ipDataLength;

int partCount = 0;

string buf="";

for (int i = 0; i < len && partCount <= 6; i++)

{

char ch = CharParse(ipDataSubstring(i,1));

if (CharIsDigit(ch))

buf+=ch;

else if (ch != ',')

{

throw new IOException("Malformed PASV strReply: " +

strReply);

}

if (ch == ',' || i+1 == len)

{

try

{

parts[partCount++] = Int32Parse(buf);

buf="";

}

catch (Exception)

{

throw new IOException("Malformed PASV strReply: " +

strReply);

}

}

}

string ipAddress = parts[0] + ""+ parts[1]+ "" +

parts[2] + "" + parts[3];

int port = (parts[4] << 8) + parts[5];

Socket s = new

Socket(AddressFamilyInterNetwork,SocketTypeStream,ProtocolTypeTcp);

IPEndPoint ep = new

IPEndPoint(IPAddressParse(ipAddress), port);

try

{

sConnect(ep);

}

catch(Exception)

{

throw new IOException("Can't connect to remote server");

}

return s;

}

/// <summary>

/// 关闭socket连接(用于登录以前)

/// </summary>

private void CloseSocketConnect()

{

if(socketControl!=null)

{

socketControlClose();

socketControl = null;

}

bConnected = false;

}

/// <summary>

/// 读取Socket返回的所有字符串

/// </summary>

/// <returns>包含应答码的字符串行</returns>

private string ReadLine()

{

while(true)

{

int iBytes = socketControlReceive(buffer, bufferLength, 0);

strMsg += ASCIIGetString(buffer, 0, iBytes);

if(iBytes < bufferLength)

{

break;

}

}

char[] seperator = {'\n'};

string[] mess = strMsgSplit(seperator);

if(strMsgLength > 2)

{

strMsg = mess[messLength-2];

//seperator[0]是10,换行符是由13和0组成的,分隔后10后面虽没有字符串,

//但也会分配为空字符串给后面(也是最后一个)字符串数组,

//所以最后一个mess是没用的空字符串

//但为什么不直接取mess[0],因为只有最后一行字符串应答码与信息之间有空格

}

else

{

strMsg = mess[0];

}

if(!strMsgSubstring(3,1)Equals(" "))//返回字符串正确的是以应答码(如220开头,后面接一空格,再接问候字符串)

{

return ReadLine();

}

return strMsg;

}

/// <summary>

/// 发送命令并获取应答码和最后一行应答字符串

/// </summary>

/// <param name="strCommand">命令</param>

private void SendCommand(string strCommand)

{

Byte[] cmdBytes = ASCIIGetBytes((strCommand + "\r\n")ToCharArray());

socketControlSend(cmdBytes, cmdBytesLength, 0);

ReadReply();

}

#endregion

}

}

分类: 电脑/网络 >> 程序设计 >> 其他编程语言

问题描述:

网上搜的多而且杂，越看越迷糊

最好把每页的代码都写一下，大致两三个页就可以解决了，谢谢达人帮助！！！！！！

解析:

三个页：选择页，上传页sub，调用的代码页uploadinc，

我自己就在用这个，LZ给分吧

1浏览上传：

<form action="sub" method="post" enctype="multipart/form-data" target="_self">

<input type=file name=src size="20" value="浏览">

<input type=submit value="上传" name=B1 IsShowProcessBar="True">

</form>

sub 执行上传并返回地址，同时保存文件名在session(ccc)中

<!--#include FILE="uploadinc"-->

<%

dim upload,file,formName,formPath,iCount,fileformat

set upload=new upload_F

function MakedownName()

dim fname

fname = now()

fname = replace(fname,"-","")

fname = replace(fname," ","")

fname = replace(fname,":","")

fname = replace(fname,"PM","")

fname = replace(fname,"AM","")

fname = replace(fname,"上午","")

fname = replace(fname,"下午","")

fname = int(fname) + int((10-1+1)Rnd + 1)

MakedownName=fname

end function

formPath="/upload/"

iCount=0

for each formName in uploadfile ''列出所有上传了的文件

set file=uploadfile(formName) ''生成一个文件对象

fileformat=lcase(right(filefilename,4))

if fileformat="" or fileformat="" then

responsewrite"<script>alert('文件格式不对，请重新上传！');location='"&requestServerVariables(">

ASP使用流输出文件下载

这里的fullpath就是你的输出文件具体的完整路径

function downloadfile(fullpath)

downloadfile = false

dim strfilename, s, fso, f, intfilelength

set fso = servercreateobject("scriptingfilesystemobject")

if not fsofileexists(fullpath) then

exit function

end if

set f = fsogetfile(fullpath)

'获取文件大小

intfilelength = fsize

set s = servercreateobject("adodbstream")

sopen

stype = 1

sloadfromfile(fullpath)

responsebuffer = true

responseclear

'responseaddheader "content-type","application/x-msdownload"

responseaddheader "content-disposition","attachment;filename=" & fname

responseaddheader "content-length" ,intfilelength

responsecontenttype = "application/octet-stream"

while not seos

responsebinarywrite sread(1024 64)

responseflush

wend

sclose

set s = nothing

downloadfile = true

end function

我解释一下主要的

==========================

<%

dim upNum '定义变量

dim upload,file,formName,formPath,iCount,filename,fileExt '定义变量

set upload=new upload_5xSoft ''建立上传对象

formPath=uploadform("filepath") '设置上传路径

''在目录后加(/)

if right(formPath,1)<>"/" then formPath=formPath&"/"

responsewrite "<body bgcolor=#ffffff leftmargin=5 topmargin=3>"

iCount=0

for each formName in uploadfile ''列出所有上传了的文件

set file=uploadfile(formName) ''生成一个文件对象

if filefilesize<100 then '判断是否选择了要上传的文件

responsewrite "<font size=2>请先选择你要上传的文件 [ <a href=# onclick=historygo(-1)>重新上传</a> ]</font>"

responseend

end if

if filefilesize>1000000 then '判断上传文件的大小

responsewrite "<font size=2>文件大小超过了限制 1M [ <a href=# onclick=historygo(-1)>重新上传</a> ]</font>"

responseend

end if

fileExt=lcase(right(filefilename,4)) '取上传文件的扩展名

if fileEXT<>"gif" and fileEXT<>"jpg" and fileEXT<>"bmp" then '判断扩展名合法性

responsewrite "<font size=2>文件格式不正确 [ <a href=# onclick=historygo(-1)>重新上传</a> ]</font>"

responseend

end if

randomize

ranNum=int(90000rnd)+10000 '随机生成一列数字

filename=formPath&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&fileEXT '重新设置文件名

if fileFileSize>0 then ''如果 FileSize > 0 说明有文件数据

fileSaveAs Servermappath(FileName) ''保存文件

responsewrite "<script>parentdocumentthisformpicvalue='"&FileName&"'</script>" '将上传好的文件路径和名字显示在一个form里

iCount=iCount+1

end if

set file=nothing

next

set upload=nothing ''删除开始时建立的对象

Htmend iCount&" 个文件上传结束!"

sub HtmEnd(Msg)

set upload=nothing

if upNum="" then upNum=1

' responsecookies("harticle_upNum")=upNum+1

responsewrite "<font size=2>文件上传成功 [ <a href=# onclick=historygo(-1)>点击重新上传</a> ]</font>"

responseend

end sub

%>

以上就是关于ASP.net 实现打开服务器FTP文件夹全部的内容，包括:ASP.net 实现打开服务器FTP文件夹、急求ASP源码：上传文件大小限定，图片尺寸自动调整、ASP下载更改文件名和生成文件的问题等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！