votedegree.asp

来自「《动态网页设计基础教程》,胡杰,科学出版社」· ASP 代码 · 共 24 行

<!-- #include file="adoconn.asp" -->
<%
Dim sql
Dim d1,d2,d3,d4,d5

d1=request.form("T1")
d2=request.form("T2")
d3=request.form("T3")
d4=request.form("T4")
d5=request.form("T5")

adoconnection

adoconn.execute ("Delete from VoteDegree")
sql="Insert into VoteDegree values(" & d1 & "," & d2 & "," & d3 & "," & d4 & "," & d5 & ")"
adoconn.execute sql
set adoconn=nothing
%>
<script language="vbscript" >
 Msgbox "参数保存完成！"
 history.go(-1)
</script>