滨崎步heaven下载:怎么在 Dreamweaver中建立一个网上投票系统

来源:百度文库 编辑:神马品牌网 时间:2024/04/28 14:16:24

建两个页面,第一个页面中做表单,添加一些按钮等,设置控件名称。第二个页面什么也没有,纯代码输入就可以了!!!
第一个页面:
<%
Connstr="DBQ="+server.mappath("database/weiwei.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;"
set conn=server.createobject("adodb.connection")
conn.open Connstr

sqlstr="select * from baby"
set rs=server.CreateObject("adodb.recordset")
rs.open sqlstr,conn,1,3

dim a,b,c,d
b=rs("wei01")
c=rs("wei02")
d=rs("wei03")
a=b+c+d
%>

<form name="form1" method="post" action="ok.asp">
<table width="558" border="1">
<tr>
<td colspan="6"><div align="center">好娃娃投选举系统</div></td>
</tr>
<tr>
<td width="37">编号</td>
<td width="81">姓名</td>
<td width="94">票数</td>
<td width="88">投票</td>
<td width="90">百分比</td>
<td width="108">图像</td>
</tr>
<tr>
<td>1</td>
<td>Weiwei</td>
<td><%=rs("wei01")%></td>
<td><input type="radio" name="text" value="1"></td>
<td><%=left(b/a*100,5)%>%</td>
<td><table width="<%=150*left(b/a,5)%>" border="0">
<tr>
<td bgcolor="#00FF66"> </td>
</tr>
</table></td>
</tr>
<tr>
<td>2</td>
<td>Lucy</td>
<td><%=rs("wei02")%></td>
<td><input type="radio" name="text" value="2"></td>
<td><%=left(c/a*100,5)%>%</td>
<td><table width="<%=150*left(c/a,5)%>" border="0">
<tr>
<td bgcolor="#00FF66"> </td>
</tr>
</table></td>
</tr>
<tr>
<td>3</td>
<td>Susan</td>
<td><%=rs("wei03")%></td>
<td><input type="radio" name="text" value="3"></td>
<td><%=100-left(b/a*100,5)-left(c/a*100,5)%>%</td>
<td><table width="<%=150*left(d/a,5)%>" border="0">
<tr>
<td bgcolor="#00FF66"> </td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="6"><div align="center">
<input type="submit" name="Submit" value="呵呵,乖乖,提交吧~">

<input type="reset" name="Submit2" value="重置">
</div></td>
</tr>
</table>
</form>
<%
rs.close
set rs=nothing

conn.close
set conn=nothing
%>
接收页面:
<%
Connstr="DBQ="+server.mappath("database/weiwei.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;"
set conn=server.createobject("adodb.connection")
conn.open Connstr

sqlstr="select * from baby where autoid=36"
set rs=server.CreateObject("adodb.recordset")
rs.open sqlstr,conn,1,3
select case request("text")
case 1
rs("wei01")=rs("wei01")+1
case 2
rs("wei02")=rs("wei02")+1
case 3
rs("wei03")=rs("wei03")+1
end select

rs.update

rs.close
set rs=nothing

conn.close
set conn=nothing
response.write"<script>window.alert('投票成功');window.location.href='default.asp'</script>"
%>

Dreamweaver只能做界面,要做投票系统,要使用ASP或者JSP~```

Dreamweaver中先做表单~`在表单当中添加单选框、提交按钮、取消按钮、图片等,设置好表单控件的名称,然后是ASP、JSP的事情啦~`

基本就是提交、接收、记录入数据库、统计、显示结果等等步骤...