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

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 233 ::
收藏到网摘: 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