【www.gdgbn.com--手机软件】

     投 票 例 子
    
    
    功能：对软件和电脑工作室栏目进行投票，选择你喜欢的栏目。
    实现方法：把投票的结果存在Result.txt文件中，当前工作的网页是Voting.asp，提交的对象是Voted.asp，当单击查看按钮时，可以查看当前选票的结果。中间存在的Bug，就是当提交之后，继续刷新Voted.asp，这样选票结果会自动的添加，想想这是为什么？用什么方法来解决？你时候碰到过类似的网站。
    
    Voting.asp的关键是：
    1：显示查看结果
    <script language=javascript>
    function windowOpen(loadpos)
    { window.open(loadpos,"surveywin","toolbar,resizable,scrollbars,dependent,width=400,height=480");
    }
    </script>
    
    2：提交数据给Voted.asp

    
    3：Voted.asp的关键是对下面两句话，第一行保存的是软件栏目选票的数量，第二行保存的是电脑工作室栏目的选票数量。下面一段程序，就是根据提交的数据自动的更新软件栏目的选票数量或者电脑工作室栏目的选票数量。
    <%
    Set FileS= Server.CreateObject("Scripting.FileSystemObject")
    If Request.Form("R1")="Soft" then
    Set FileR= FileS.OpenTextFile(Server.MapPath("Result.txt"), 1, True)
    Soft = FileR.Readline
    Studio = FileR.Readline
    FileR.Close
    
    Soft=Int(Soft)+1
    Set FileR= FileS.OpenTextFile(Server.MapPath("Result.txt"), 2, True)
    FileR.WriteLine Soft
    FileR.WriteLine Studio

本文来源：http://www.gdgbn.com/shoujikaifa/8124/