new_page_1.htm

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

HTM
36
字号


<head>
<link rel="stylesheet" href="comCSS.css" >  
</head>
 'ri=1 
   'for each item in request("Selected") 
   '    inscore=request.form("score" & cstr(ri)) 
   '     
   '    If IsNumeric(inscore) then 
   '       sqls="select score from TestRules where Category='" & item & "' AND Yeartoyear='" + Session("Termyear") + "' AND Term='" + Session("Term") + "' AND kind='" & session("Kind") & "'"        
   '       Set temprs=GetRecordset(sqls)         
   '       score=temprs("Score") 
   '       Set Adoconn=nothing 
   '       Set tempRS=nothing 
   '       If (inscore > 0) or (inscore<score) then 
   '         %>

<p>
   '         <Script language="vbscript">  
   '          Msgbox "输入的数值应当是大于零和小于该项满分值的数字,请重新输入!"
   '          history.GO(-1)
   '         </script>
   '         <%  
   '       End if
   '    Else 
   '       %>
   '       <Script language="vbscript">  
   '        Msgbox "输入框不能为空和字符,请重新输入!"
   '        history.back
   '       </script>
   '       <%  
   '    End if
   '    ri=ri+1
   'next
   'response.write ri%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?