基于WEB的学生综合测评系统（内含源代码） - 图文(6)

%>

@import url(\-->

<%

evaluationId = Trim(Request(\

sqlString = \ set rs = conn.Execute(sqlString) %>

  <%=rs(\   <%=rs(\   <%=rs(\   

  \ else

conn.Execute(\\

Response.Write \删除成功!');\ end if

elseif action = \

specialFieldName = Request(\ collegeName = Request(\ sql = \into specialFieldInfo(specialFieldName,collegeName) values ('\& specialFieldName & \ Conn.Execute(sql)

if err.number <> 0 then

Response.Write \操作时发生了错误!');\ else

Response.Write \添加成功');\ end if end if %>

学院专业操作 <%

sql = \ set specialFieldRs = conn.Execute(sql) while not specialFieldRs.eof Response.Write \& specialFieldRs(\& \&

specialFieldRs(\& \href='fieldSet.asp?action=del&specialFieldName=\& specialFieldRs(\删除\ specialFieldRs.MoveNext wend %>

10、main.asp:(系统主框架设计代码) <%

if session(\ response.Redirect \end if %>