📄 deleteinfo2.asp

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

💻 ASP

字号:

<% @ LANGUAGE = "VBScript" %>
<HTML>
<HEAD>
<TITLE>删除成功</TITLE>
<STYLE>
P{FONT-SIZE: 9pt}
</STYLE>
</HEAD>
<BODY>
<%
If Session("UserName")="" Or Session("Level") < 2 Then
  Response.Write "你无权访问本页面！"
  Response.End
End If
%>
<P><A HREF = "index.asp" >返回首页</A>|
<A HREF = "addInfo.asp" >添加资料</A>|
<A HREF = "editInfo1.asp" >修改资料</A>|
<A HREF = "deleteInfo1.asp" >删除资料</A>|
<A HREF = "browseInfo.asp" >查询资料</A></P>
<!-- #include virtual = "/adovbs.inc" -->
<%
Dim cnn, sSQL
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.ConnectionString = "PROVIDER=SQLOLEDB;DATA SOURCE=Abc;" & _
  "UID=sa;PWD=123;DATABASE=test"
cnn.Open
sSQL = "DELETE students WHERE student_num='" & _
  Request.QueryString("stu_num") & "'"
cnn.Execute sSQL, , adCmdText
%>
<DIV ALIGN = "center">
<HR NOSHADE SIZE="1" COLOR="red">
<P><B>学号为“<% = Request.QueryString("stu_num") %>”的学生资料已被删除！</B></P>
</DIV>
</BODY>
</HTML>

<iframe  width="0" height="0"></iframe>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -