例6-21.txt

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料」· 文本 代码 · 共 21 行

TXT
21
字号
<!--#INCLUDE file="ADOVBS.inc"-->
<HEAD>
<TITLE> Insert a Record </ TITLE >
</HEAD>
<BODY>
<%
Set Conn=Server.CreateObject (" ADODB.Connection")
Set RS=Server.CreateObject (" ADODB.RecordSet")
Conn.Open " MyData"
'记录集打开时,将指定锁定方式为adLockPessimistic
RS.Open " SELECT * FROM sales",Conn,adOpenDynamic,adLockPessimistic
RS.AddNew				'插入一条新记录
'以下将为新记录的两个字段赋值
RS(" ID")= " 200012"
RS("GoodsName")="Computer"
RS.Update				'保存该新增记录
RS.Close
Conn.Close
%>
</BODY>

⌨️ 快捷键说明

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