电脑桌面
添加小米粒文库到电脑桌面
安装后可以在桌面快捷访问

如何用asp做问卷调查VIP免费

如何用asp做问卷调查_第1页
1/9
如何用asp做问卷调查_第2页
2/9
如何用asp做问卷调查_第3页
3/9
第1页共9页编号:时间:2021年x月x日书山有路勤为径,学海无涯苦作舟页码:第1页共9页asp做问卷调查投票新建一个文件夹将下列文件按照提示放到文件夹中在文件夹中建一个名为img的文件夹图:将此图片存入img文件夹名为bar.gif首先是数据库链接文件coon.asp:<%'连接数据库开始dimconn,rs,sql'onerrorresumenextdbpath=server.mappath("data.mdb")setconn=server.createobject("adodb.connection")conn.open"PROVIDER=Microsoft.jet.OLEDB.4.0;datasource="&dbpath'创建记录对象setrs=server.createobject("adodb.recordset")%>制作一个用来投票的页面add.asp:问卷调查
1.请问您公司的性质是什么?A国家机关B全民企业单位C私营企业D个体商户E外资企业
第3页共9页第2页共9页编号:时间:2021年x月x日书山有路勤为径,学海无涯苦作舟页码:第3页共9页2.请问您公司的人数是多少?A0-10B10-30C30-50D50-100E100以上
查看结果
单击投票按钮FORM表单将数据提交给updata.asp页面进行处理第4页共9页第3页共9页编号:时间:2021年x月x日书山有路勤为径,学海无涯苦作舟页码:第4页共9页updata.asp:投票成功

<%str1=Request.Form("ask1")str2=Request.Form("ask2")ifstr1=""orstr2=""thenresponse.write"alert('每题至少选一项,请填写完整');history.back();"response.End()endifsetrs=server.createobject("adodb.recordset")sql="select*fromaskItemwhereaId=1"rs.opensql,conn,1,1dowhilenotrs.eofifinstr(str1,rs("askItem"))>0thensql="updateaskItemsetsubNum=subNum+1whereid="&rs("id")conn.execute(sql)endifrs.movenextlooprs.closesql="select*fromaskItemwhereaId=2"rs.opensql,conn,1,1dowhilenotrs.eofifinstr(str2,rs("askItem"))>0thensql="updateaskItemsetsubNum=subNum+1whereid="&rs("id")第5页共9页第4页共9页编号:时间:2021年x月x日书山有路勤为径,学海无涯苦作舟页码:第5页共9页conn.execute(sql)endifrs.movenextlooprs.closeResponse.Redirect("show.asp")%>

updata页面将数据处理后重定向到show.as...

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。
3、如文档内容存在违规,或者侵犯商业秘密、侵犯著作权等,请点击“违规举报”。

碎片内容

如何用asp做问卷调查

您可能关注的文档

精品中小学资料+ 关注
实名认证
内容提供者

精品文档

相关文档

热门下载

相关标签

确认删除?
VIP
微信客服
  • 扫码咨询
会员Q群
  • 会员专属群点击这里加入QQ群
客服邮箱
回到顶部