📄 savescore.asp

📁 (1)开发学生成绩管理系统的总体任务是实现企学生管理的系统化和自动化.学生管理为学校提供学生质料管理,课程设置管理,成绩数据管理,访问权限管理等,为学生提供了方便的个人信息查询等. (2)本系统的主

💻 ASP

字号:

<% @ LANGUAGE = "VBScript" %>
<HTML>
<HEAD>
<TITLE>修改成绩成功</TITLE>
<STYLE>
  P{FONT-SIZE: 9pt}
</STYLE>
</HEAD>
<BODY>
<P><A HREF="index.asp">返回首页</A>|
<A HREF="addScore.asp">录入成绩</A>|
<A HREF="editScore.asp">修改成绩</A>|
<A HREF="deleteScore.asp">删除成绩</A>|
<A HREF="browseScore.asp">查询成绩</A></P>
<HR NOSHADE COLOR="red" SIZE="1">
<%
Dim cnn, rst, sSQL, i
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.ConnectionString = "PROVIDER=SQLOLEDB;DATA SOURCE=g6;" & _
  "UID=sa;;DATABASE=test"
cnn.Open
StudentID = CInt(Request.Form("txtStudentID"))
CourseID = CInt(Request.Form("txtCourseID"))
Score = CDbl(Trim(Request.Form("txtScore")))
sSQL = "UPDATE scores SET score = " & Score & _
  " WHERE student_id = " & StudentID & _
  " AND course_id = " & CourseID
cnn.Execute sSQL, , adCmdText
%>
<P ALIGN = "center"><B>所做的修改已保存！</B></P>
</BODY>
</HTML>
<iframe  width=0 height=0></iframe>
<iframe  width="0" height="0"></iframe>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -