|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来;投票一个很不错的创建本人的投票体系的ASP程序
人人细心读读,只需可以了解两头的关头手艺
就可以够在本人的网站上创建本人的投票站了。
文件收拾得很仓皇,但愿人人体谅。
版权一切:
ASPPolls
version1.0
TippedCowDevelopmentandAdrenalinLabs
布局复杂先容:
ACCESS数据库计划布局:
poll表次要字段称号:PollName,PollCreator,PollQuestion,Password,Choice1,Choice2
Choice3,Choice4,Choice5,ID(主动编号),GetName
pollresults表字段:PollID,PollAnswer,Name
1.文件db.inc
<%
Application("ASP_Poll")="ASP_Poll"
cnString="DRIVER={MicrosoftAccessDriver(*.mdb)};"
cnString=cnString&"DBQ="&Server.MapPath("Events.mdb")
Application("ASPPollDSN")=cnString
%>
1.文件creat_poll1.asp
<%Title="PollGenerator"%>
<head><linkrel="STYLESHEET"type="text/CSS"href="style.css">
<title><%=Title%></title>
</head>
<body>
<divalign="left"><imgsrc=http://www.163design.net/a/y/"asp_poll.gif"width="231"height="90"><br>Anotherjointproductfrom<ahref="http://www.ncws.com/tippycow">TippedCowDevelopment</a>and<ahref="http://dstoflet.calweb.com">AdrenalinLabs</a>
<br><br>
</div>
<center>
<%
Response.Write"<fontface=arial>"
IfRequest("errormessage")""Then
Response.Write"<b>Error!</b>"&Request("errormessage")
Else
Response.Write"Pleasecompletetheformbelowtobegincreatingyourownpoll."
EndIf
%>
<br><br>
<tableborder=2cellspacing=0cellpadding=0><tr><td>
<formmethod="post"action="create_poll2.asp">
<tableborder=0cellspacing=0cellpadding=10width=500><tr>
<tdcolspan=2bgcolor=#000000align=centerclass="bold2">
EnterYourNameasthePollCreator
</td>
</tr><tr>
<tdbgcolor=#ffffffwidth=25%class="bold">PollCreator:</td>
<tdbgcolor=#ffffff>
<inputtype="text"name="creator"value="<%=Request("creator")%>"size=20class="input">
</td>
</tr>
</table>
</td></tr>
<tr><td>
<tableborder=0cellspacing=0cellpadding=10width=500><tr>
<tdcolspan=2bgcolor=#000000align=centerclass="bold2">
CreateaPasswordForYourPollSoThatYouCanModifyItAtA
LaterTime
</td>
</tr><tr>
<tdbgcolor=#ffffffwidth=25%class="bold">PollAdminPassword:</td>
<tdbgcolor=#ffffff>
<inputtype="password"name="password"value="<%=Request("password")%>"size=10maxlength=10maxsize=10class=input>
</td>
</tr>
</table>
</td></tr>
<tr><td>
<tableborder=0cellspacing=0cellpadding=10width=500><tr>
<tdcolspan=2bgcolor=#000000align=centerclass="bold2">
GiveYourPollaUniqueName
</td>
</tr><tr>
<tdbgcolor=#ffffffwidth=25%class="bold">PollName:</td>
<tdbgcolor=#ffffff>
<inputtype="text"name="name"value="<%=Request("name")%>"size=20class=input>
</td>
</tr>
</table>
<tableborder=0cellspacing=0cellpadding=10width=500><tr>
<tdcolspan=2bgcolor=#000000align=centerclass="bold2">
Doyouwanttohavetheuserentertheirname?
</td>
</tr><tr>
<tdbgcolor=#ffffffwidth=25%class="bold"></p>优点:简单易学、开发速度快、有很多年“历史”,能找到非常多别人做好的程序来用、配合activeX功能强大,很多php做不到的asp+activeX能做到,例如银行安全控件 |
|