WEB开发初学者提问，求帮助

现在程序要求从某服务器上获得某文件的内容，此文件的内容小于1K，请问该如何编程实现，我初学这方面的编程，请大家给予帮助。
比如打开并获得www.abc.com/1.txt的内容，此文件内容小于1K的。

解决方案 »

  1.   

    <%
    Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
    Dir = Request.ServerVariables("SCRIPT_NAME")
    Dir = StrReverse(Dir)
    Dir = Mid(Dir, InStr(1, Dir, "/"))
    Dir = StrReverse(Dir)
    HitsFile = Server.MapPath(Dir) & "\hits.txt" On Error Resume Next
    Set InStream= FileObject.OpenTextFile (HitsFile, 1, false )
    OldHits = Trim(InStream.ReadLine)
    %><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"><html>
    <head>
    <title></title>
    </head>
    <body>
    <%
    L=Len(OldHits)
    i = 1
    For i = i to L
    num = Mid(NewHits,i,1)
    Display = Display & "<img src=""" & num & ".gif"">"
    Next
    Response.Write Display
    %>
    </body>
    </html>
    以上这个例子是从服务器上读文本文件的例子 应该有用 呵呵
      

  2.   

    我还有一个asp.net版的：
    <%@ Page Language="C#" %>
    <script runat="server">    void Page_Load(object sender, EventArgs e) {
        System.IO.StreamReader srReadLine = System.IO.File.OpenText(System.Web.HttpContext.Current.Server.MapPath("Test.txt"));
        while (srReadLine.Peek() > -1) {
        Label1.Text="<marquee>"+srReadLine.ReadLine()+"</marquee>";
        }
        srReadLine.Close();
        }
        
        void Button1_Click(object sender, EventArgs e) {
        
        
        System.IO.StreamWriter srWriteLine = System.IO.File.CreateText(System.Web.HttpContext.Current.Server.MapPath("Test.txt"));
        srWriteLine.WriteLine(TextBox1.Text);
        srWriteLine.Close();
        }</script>
    <html>
    <head>
    </head>
    <body>
        <form runat="server">
            <p>
                <asp:Label id="Label1" runat="server" width="475px" forecolor="Blue"></asp:Label>
            </p>
            <p>
                请输入您要修改的文本内容： 
            </p>
            <p>
                <asp:TextBox id="TextBox1" runat="server" Width="554px"></asp:TextBox>
            </p>
            <p>
                <asp:Button id="Button1" onclick="Button1_Click" runat="server" Text="提交修改"></asp:Button>
            </p>
            <!-- Insert content here -->
        </form>
    </body>
    </html>
      

  3.   

    问题是我要使用DELPHI编程实现的啊
      

  4.   

    我再简单说吧，如何从服务器上下载此文件，不要使用FTP协议，因为服务器不开放21端口的，只有80端口，请问如何操作。急啊。谢谢大家了。使用DELPHI语句和控件啊，由于我刚开始涉足这方面的编程，所以越简单越好。
      

  5.   

    呵呵 用什么开发也不能避免用脚本实现一些功能呀，这是delphi所不能替代的
      

  6.   

    从服务器上下载文件可以使用<a href="card.rar">下载详细信息</a>