专注于自动化测试,性能测试.......
在记录集中插入记录
上一篇 /
下一篇 2009-04-04 13:14:50
/ 个人分类:Vbscript
` Pu'Fj/v#xj0'在记录集中插入记录
r!KF$YVK0.os0M$p _$G!b0'建立连接对象
{5\2C`|E4|X;F0Set bjconn = CreateObject("adodb.connection")
p-U4E8Xd]0 JFb:Bbsn?0'建立记录集对象
^u4rMT~ x'S&N0Set bjrecordset =CreateObject("adodb.recordset")
-[)?;D(b:I,b;R051Testing软件测试网*Gb#|/bW2qobjconn.Open _
4I%}9s4EQc_ v0"Provider = SQLOLEDB;Data Source=.;Trusted_Connection =yes;"&_
[M WO1S0"Initial Catalog =Cwxt;User Id =sa;password=1;"
3W$Ax
A.O+iZ+M0objrecordset.Open "select * from tbl_user",objconn,3,351Testing软件测试网}L$@BIgsW7UB
51Testing软件测试网y8`X;[?@i4U
kobjrecordset.AddNew()
,g`%`/l0i0objrecordset.Fields(0).Value ="1"51Testing软件测试网N bBMQ7Cs
objrecordset.Fields(1).Value ="22"51Testing软件测试网
^fVd
{.i%}:p
objrecordset.Fields(2).Value ="33"
#D.QS[
M-F~U0objrecordset.Update()
yF$r4Hj
j"l:[0+J*L4nk'[0objconn.Close
S bP9cj'a0objrecordset.Close51Testing软件测试网4nwd[X7m$H2wjRN
?
51Testing软件测试网-O`&L"k`!o6F
收藏
举报
TAG: