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

2016-01-29 17:15 2 1 收藏

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

【 tulaoshi.com - ASP 】

  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 ( '<pOf 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 ( '<pTake 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 ( '<pAfterwards, 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://img.jcwcn.com/attachment/portal/jcwcj/2005-12/10/05121001170093906.gif"" align="right"
border=0</aPlease 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://img.jcwcn.com/attachment/portal/jcwcj/2005-12/10/05121001170093906.gif""
border=0</a</center' );

   Out ( '</td' );
 &nb

来源:http://www.tulaoshi.com/n/20160129/1500777.html

延伸阅读
标签: PHP
  (主要用了两个字符串函数implode()和explode) 我制作的域名查询的源代码,主要用了两个字符串函数implode()和explode,利用这两个函数的切割字符串的强大功能,可以查询.com,.net.,org.,cc.,tv下的域名whois。 <?php echo '<center<form'; echo '<input type="text" name="string"'; echo '<in...
#include graphics.h #include stdio.h #include math.h #include time.h #define PI 3.14159 #define maxx 640 #define maxy 480main() {int i;  char c;  init();  draw();  c=getch(); } init() /*初始化图形系统函数*/ {int gdriver=DETECT,gmode; &n...
标签: ASP
  <% Function StripNonNumeric(strInput)     Dim iPos, sNew, iTemp     strInput = Trim(strInput)     If strInput < "" Then         iPos = 1         iTemp = Len...
                                一个简单的一箭穿心程序    其实这个程序也不难,只要专心形线方程(1-ρ×cosθ)来绘图就可以了。    作者:...
类似于学习机上的指法练习程序,简单而实用#includetime.h main() { int x,y,i,j; unsigned int Timer; char ch; char key; char *kb[]={"Q W E R T Y U I O P [ ]","A S D F G H J K L ; '","Z X C V B N M , . /"}; long AllCounter=0,RightCounter=0,FalseCounter=0; ...

经验教程

293

收藏

99
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部