专注于自动化测试,性能测试.......
在记录集中插入记录
上一篇 /
下一篇 2009-04-04 13:14:50
/ 个人分类:Vbscript
K.PT/oAX1}0'在记录集中插入记录
8m-lE$c3np5[0f,|\n0q-D1bA.B0'建立连接对象
h1{
P3\~d[q4D0Set bjconn = CreateObject("adodb.connection")
#OJ9|7f3q ta.^E0*D"n5E1pm/S'V3v'o0'建立记录集对象
$]
Y3{^%vV;P0Set bjrecordset =CreateObject("adodb.recordset")51Testing软件测试网zh
|QKg^
\T#q Q$j{+bu-PD0objconn.Open _51Testing软件测试网-uD6l'EG*J-q;IB
"Provider = SQLOLEDB;Data Source=.;Trusted_Connection =yes;"&_
p-KR K$tu4oO
Bd0"Initial Catalog =Cwxt;User Id =sa;password=1;"51Testing软件测试网1u)q(IQh
Z
objrecordset.Open "select * from tbl_user",objconn,3,3
W(cK|e.H qs051Testing软件测试网p:X@4G2UHh)}objrecordset.AddNew()
w5f3FDw*T+z\;jB0E0objrecordset.Fields(0).Value ="1"51Testing软件测试网N|Y+b1O{%^ v:v%br:j
objrecordset.Fields(1).Value ="22"51Testing软件测试网 _e9UKZ0B
objrecordset.Fields(2).Value ="33"51Testing软件测试网*OZ'W}3mY
objrecordset.Update()51Testing软件测试网F5P
kP8P5x
51Testing软件测试网#P#|/A0aT?*](Jobjconn.Close51Testing软件测试网 Kva(B`
objrecordset.Close51Testing软件测试网
yo
u_2c Z[ i
51Testing软件测试网`-v-D3X
d)X:t!r
收藏
举报
TAG: