📄 6-6.asp

📁 ASP+SQL Server动态网站开发从基础到实践教程

💻 ASP

字号:

<html>

<head>

<title>操作数据</title>
</head>

<body>

<%
on error resume next
Dim ConnStr,myConn,mySQL
ConnStr="Provider=SQLOLEDB;data source=(local);initial catalog=图书馆管理系统;user id=sa;password=;"  '参照表6-2的连接字符串
Set myConn=Server.CreateObject ("ADODB.Connection")
Myconn. ConnectionString=ConnStr
myConn.open  '直接打开数据库连接

'删除学号为0001的学生信息
mySQL="delete from 学生信息表 where 学号='0001'"
myConn.Execute mySQL   '执行


'修改学号为0002的的学生的姓名为小张,原名为小章
mySQL="update 学生信息表 set 姓名='小张' where 学号='0002'"
myConn.Execute mySQL   '执行

if err.number>0 then
response.write "VBScript Errors Occured:" & "<br>"
response.write "Error Number=" & err.number & "<br>"
response.write "Error Descr.=" & err.description & "<br>"
response.write "Help Context=" & err.helpcontext & "<br>" 
response.write "Help Path=" & err.helppath & "<br>"
response.write "Native Error=" & err.nativeerror & "<br>"
response.write "Source=" & err.source & "<br>"
response.write "SQLState=" & err.sqlstate & "<br>"
end if

response.write "操作成功"

myConn.close
set myConn=nothing

%>


</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -