一个投票系统的源程序(coveryourasp.com)
日期：2011-01-18 浏览次数：20878 次
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) james@CoverYourASP.com-->
// (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="http://edu.cnzz.cn/NewsInfo/images/source.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="http://edu.cnzz.cn/NewsInfo/images/source.gif"
border=0></a></center>' );
Out
<!--#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) james@CoverYourASP.com-->
// (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="http://edu.cnzz.cn/NewsInfo/images/source.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="http://edu.cnzz.cn/NewsInfo/images/source.gif"
border=0></a></center>' );
Out
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
