当前位置: 首页 > 图文教程 > 网络编程 > ASP > 一个投票系统的源程序(coveryourasp.com)

ASP
构建你的网站新闻自动发布系统之三
构建你的网站新闻自动发布系统之四
如何用ASP编写网站统计系统一
如何用ASP编写网站统计系统二
如何用ASP编写网站统计系统三
如何用ASP编写网站统计系统四
ASP Error 0115的一些解决办法
ASP 3.0 新特色先睹为快(一)
ASP 3.0 新特色先睹为快(二)
ASP主件中的安全问题
一个汉字转成拼音的代码
使用w3Sockets组件实现域名查询功能
ASP中实现文件上传方法的研究
构建免受FSO组件威胁虚拟主机
用XMLHTTP做一个自己特色的Google
用asp实现的代码批量修改程序
无组件的数据库的备份与还原
用ASPJPEG组件制作图片的缩略图和加水印
解密ASP源代码
XmlHttp异步获取网站数据的例子

ASP 中的 一个投票系统的源程序(coveryourasp.com)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 238 ::
收藏到网摘: n/a

  SurveyDescr.asp
<!--#include file = "include/Startup.asp"-->
<!--#include file = "utils/Survey.asp"-->

<%
// ============================================
// NOTE: all source code downloaded from CoverYourASP was written by
// James Shaw (unless stated otherwise), and is copyright (c) 2000 by
// James Shaw. You may use this source code on your web sites, but
// please don't publish or distribute in any way.
//
// I would appreciate an HTML comment in any code you use, i.e.
//         <!-- portions (c) [email protected]>
// (see Footer(), documented in SSI.asp for details on how to do this)
//
// <shameless plug>
//      Please contact me to discuss any ASP contract work you may have.
// </shameless plug>
// ============================================

// output relevant meta tags
Init( "Survey your readers" );

// output common top of page
Header( 'Survey your readers' );

// output page content
Content ( );

// output common bottom of page
Footer( );

// ============================================
// the content of this page - every page has a function 'Content' that
// is called above.
// ============================================
function Content ( )
{
   Out ( '<td colspan=2 width="80%" valign="top">' );

      // if the survey hasnt been submitted yet...
      if ( !Request.Form.Count )
      {
         //...display some blah, blah
         Out ( 'Finally, surveys come to CoverYourASP! I\'ve been wanting to ask you guys and gals
questions for a long time, and now I can. It\'s up to you if you want to answer of course!' );

         Out ( '<p>Of course, the real benefit to you is that if you tell me what you like I\'ll probably
provide it. If you send in your <a href="Donate.asp">donations</a> the probability increases rather
dramatically!' );

         Out ( '<p>Take the example survey below if you have the time and inclination. I plan to post more
in a special survey category, and start offering incentives to take them.' );

         Out ( '<p>Afterwards, look at the code. I think you\'ll be surprised how simple it is to create
surveys with this code. This page has one function call in it, with just one parameter - the name of the
survey! All questions, answers and results are stored in the database.' );
      }

      // show the survey, or process it's input
      ProcessSurvey ( 'Who are you and what do you think?' );

      if ( !Request.Form.Count )
         Out ( '<p><a href="ShowSource.asp?page=SurveyDescr"><img src="/upload/tech/20091103/20091103102618_6c524f9d5d7027454a783c841250ba71.gif"" align="right"
border=0></a>Please submit the survey first before looking at the source code - this link is on the result
page too!' );
      else
         Out ( '<p><center><a href="ShowSource.asp?page=SurveyDescr"><img src="/upload/tech/20091103/20091103102618_6c524f9d5d7027454a783c841250ba71.gif""
border=0></a></center>' );

   Out ( '</td>' );
 &nb