高分征集，遍历文件内容的程序？？？？？？？？

Question

只是读文本？
using System.IO;
...
StreamReader reader = new StreamReader(@"f:\CWProxy.cs",System.Text.Encoding.Default);
while (reader.Peek()>=0)
Response.Write(reader.ReadLine() +"<br>");
reader.Close();

Answer 1

using System.IO;
...
StreamReader reader = new StreamReader(@"f:\CWProxy.cs",System.Text.Encoding.Default);
while (reader.Peek()>=0)
Response.Write(reader.ReadLine() +"<br>");
reader.Close();
foreach(word,reader.ReadLine())
{
  .........  }

Answer 2

楼主说的是不是要模仿打字，一个字一个字地逐字显示到页面上？
是的话如下：
<DIV class=ttl1 id=ttl0><SPAN class=ttl1></SPAN></DIV>
<SCRIPT language="JavaScript">
<!-- Begin
var layers = document.layers, style = document.all, both = layers || style, idme=908601;
if (layers) { layerRef = 'document.layers'; styleRef = ''; } if (style) { layerRef = 'document.all'; styleRef = '.style'; }
function writeOnText(obj, str) {
  if (layers) with (document[obj]) { document.open();  document.write(str); document.close(); }
  if (style) eval(obj+'.innerHTML= str');
}
var dispStr = new Array("你的文字1","你的文字2"
);
var overMe=0;
function txtTyper(str, idx, idObj, spObj, clr1, clr2, delay, plysnd) {
  var tmp0 = tmp1 = '', skip = 0;
    if (both && idx <= str.length) {
if (str.charAt(idx) == '<') { while (str.charAt(idx) != '>') idx++; idx++; }
if (str.charAt(idx) == '&' && str.charAt(idx+1) != ' ') { while (str.charAt(idx) != ';') idx++; idx++; }
tmp0 = str.slice(0,idx);
tmp1 = str.charAt(idx++);
if (overMe==0 && plysnd==1) {
  if (navigator.plugins[0]) {
    if (navigator.plugins["LiveAudio"][0].type=="audio/basic" && navigator.javaEnabled()) {
document.embeds[0].stop();
setTimeout("document.embeds[0].play(false)",100); }
  } else if (document.all) {
ding.Stop();
setTimeout("ding.Run()",100);
  }
  overMe=1;
} else overMe=0;
writeOnText(idObj, "<span class="+spObj+"><font color='"+clr1+"'>"+tmp0+"</font><font color='"+clr2+"'>"+tmp1+"</font></span>");
setTimeout("txtTyper('"+str+"', "+idx+", '"+idObj+"', '"+spObj+"', '"+clr1+"', '"+clr2+"', "+delay+" ,"+plysnd+")",delay);
  }
}
function init() {
txtTyper(dispStr[0], 0, 'ttl0', 'ttl1', '#339933', '#99FF33', 50, 0);
}
init()
//  End -->
</SCRIPT>
在你的文字1及你的文字2...中可写入你的文字，如果要用服务器端传来的文字，可用一个隐藏文本来获取。

Answer 3

string strCurrentDir,NewFolder,TempAction;
//string showMode;
//showMode = Request.QueryString["showMode"];
NewFolder = Request.QueryString["NewFolder"];
TempAction = Request.QueryString["Action"];
//Label1.Text = "NetIE V1.0 Power by Pot"; //获取驱动器 string[] drives = System.IO.Directory.GetLogicalDrives(); DiskList.Items.Add("选择驱动器");
foreach (string str in drives) 
{
DiskList.Items.Add(str);
}

//分情况显示数据
if(TempAction == null && NewFolder == null)
{
strCurrentDir = Server.MapPath(".");
DisplayList(strCurrentDir); }
else if(TempAction != null)
{
strCurrentDir = NewFolder;
UpFolder(strCurrentDir);
}
else
{
strCurrentDir = NewFolder;
DisplayList(strCurrentDir);
}
}
catch (System.IO.IOException) 
{
ErrorText.Text = "An I/O error occurs.";
}
catch (System.Security.SecurityException) 
{
ErrorText.Text = "The caller does not have the required permission.";
}
catch(Exception ex)
{
ErrorText.Text = ex.Message;
}
} public void DisplayList(string strCurrentDir) //显示文件和文件夹列表
{
strCurrentDir = strCurrentDir.Replace(@"：",@":");
strCurrentDir = strCurrentDir.Replace(@"、",@"\");
strCurrentDir = strCurrentDir.Replace(@"\\",@"\");

FileInfo fi;
DirectoryInfo di; StringBuilder TempStr = new StringBuilder();
TempStr.Capacity = 100;
string FileName; //文件名
string FileExe; //文件扩展名
string FilePic; //文件图片
string FileSize; //文件大小
DateTime FileModify; //最后修改日期
string ShortName; //文件或文件夹简称
string lFileProperty = "1"; //文件或文件夹属性
string lFileName;
string lFileModify;
string lFileSize;
int isFile;
int FileNum = 0;
int FolderNum = 0; fileShow.Text = ""; //初始化显示层
DirectoryInfo dir = new DirectoryInfo(strCurrentDir);
foreach(FileSystemInfo fsi in dir.GetFileSystemInfos())
{
FilePic = "";
FileName = "";
FileExe = "";
FileSize = "0";
FileNum++; if(fsi is FileInfo)
{
//当前是文件
isFile = 1;
fi = (FileInfo)fsi;
FileName = fi.Name;
//FileName = Server.UrlEncode(FileName);
FileExe = fi.Extension;
lFileProperty = fi.Attributes.ToString();

if(fi.Length > (1024*1024*1024))
FileSize = ((double)fi.Length/(1024*1024*1024)).ToString(".##")+"&nbsp;GB";
else if(fi.Length > (1024*1024))
FileSize = ((double)fi.Length/(1024*1024)).ToString(".##")+"&nbsp;MB";
else if(fi.Length > 1024)
FileSize = ((double)fi.Length/1024).ToString(".##")+"&nbsp;KB";
else
FileSize = ((double)fi.Length/1).ToString(".##")+"&nbsp;字节";

// FileSize = fi.Length;
FileModify = fi.LastWriteTime; switch(FileExe.ToLower())
{
case ".gif":
FilePic = "images/gif.gif";
ShortName = "GIF图象";
break;
case ".jpg":
FilePic = "images/gif.gif";
ShortName = "JPEG图象";
break;
case ".asp":
FilePic = "images/asp.gif";
ShortName = "Active Server Page";
break;
case ".txt":
FilePic = "images/txt.gif";
ShortName = "文本文档";
break;
case ".htm":
FilePic = "images/htm.gif";
ShortName = "HTML Document";
break;
case ".html":
FilePic = "images/htm.gif";
ShortName = "HTML Document";
break;
case ".doc":
FilePic = "images/doc.gif";
ShortName = "Microsoft Word 文档";
break;
case ".exe":
FilePic = "images/exe.gif";
ShortName = "应用程序";
break;
case ".rar":
FilePic = "images/zip.gif";
ShortName = "WinRAR 档案文件";
break;
case ".zip":
FilePic = "images/zip.gif";
ShortName = "WinRAR Zip 档案文件";
break;
case ".aspx":
FilePic = "images/aspx.gif";
ShortName = "ASP.NET Server Page";
break;
case ".cs":
FilePic = "images/cs.gif";
ShortName = "C# Source file";
break;
case ".mdb":
FilePic = "images/mdb.gif";
ShortName = "Microsoft Access 应该程序";
break;
case ".dll":
FilePic = "images/dll.gif";
ShortName = "应用程序扩展";
break;
case ".wma":
FilePic = "images/mp3.gif";
ShortName = "Winamp media file";
break;
case ".mp3":
FilePic = "images/mp3.gif";
ShortName = "Winamp media file";
break;
default:
FilePic = "images/other.gif";
ShortName = FileExe.Replace(".","")+"文件";
break;
}
FilePic = "<img src='"+FilePic+"'border=0 align=absmiddle>"; lFileName = ShortName.Replace(" ","&nbsp;").ToString();
lFileSize = FileSize.ToString();
lFileModify = FileModify.ToString();
}
else
{
FolderNum++;
isFile = 0;
di = (DirectoryInfo)fsi;
FileName = di.Name;
//FileName = Server.UrlEncode(FileName);
FileExe = di.Extension;
FileModify = di.LastWriteTime;
FilePic = "<img src='images/directory.gif' border=0 align=absmiddle>"; lFileName = "文件夹";
lFileSize = "0&nbsp;字节";
lFileModify = FileModify.ToString();
lFileProperty = di.Attributes.ToString(); }
TempStr.Append("<div class=imagespacer><div class=imageholder onclick=SelectDiv(this,'"+FileName.Replace(" ","&nbsp;").ToString()+"','"+lFileName.ToString()+"','"+lFileSize.ToString()+"','"+FileModify.ToString().Replace(" ","&nbsp;").ToString()+"','"+lFileProperty.Replace(" ","&nbsp;").ToString()+"',"+isFile+") ondblclick=OpenObject('"+Server.UrlEncode(FileName)+"',"+isFile+")>"+FilePic+"</div><div class=titleholder>"+FileName+"</div></div>");
}
fileShow.Text = TempStr.ToString();
FolderPath.Value = strCurrentDir;
FolderPath.Value = strCurrentDir;
FolderUrl.Value = Server.UrlEncode(strCurrentDir);
ObjectNum.Value = FolderNum+"|"+FileNum;
if(Path.GetFileName(strCurrentDir) != "")
{
ListImage.ImageUrl = "images/left_directory.gif";
ListLabel.Text = Path.GetFileName(strCurrentDir);
IMG1.Src = "images/turnup.gif";
IMG1.Attributes.Add("onclick","window.location=('NetIE.aspx?Action=up&NewFolder='+form1.FolderUrl.value)");
}
else
{
ListImage.ImageUrl = "images/left_disk.gif";
ListLabel.Text = Directory.GetDirectoryRoot(strCurrentDir);
IMG1.Src = "images/turnup1.gif";
}
}

Answer 4

/   .
                                                          ' /  .- .
                                                          .  .- .-
                                                        ./    .--...
                                              .-------- 0    .--
                                             /                 .......
                                            '                  ..
                                             '........            ----
                                                      .          --..
                                                       .   .---..   -
                                   分  o               .  '     -.
                                     分               /   '
                                                     / ' ' '
                                   \-分--/....... . '  ' '  '
                                    \ __/ -      - -'  '  ' '
                                                    '  '  ' '
                                     o              '   ' ' '
                                                    '   '  '
                                                     -..'.----------.
                                                        I   ----------
                                                 /////////.