数据存储问题 急急急!各位好心人帮帮忙! 在线等待

[ysk2006110]

用VB

str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.1.3\ysk\生产跟踪.mdb;Persist Security Info=False"
Set conn = New ADODB.Connection
conn.ConnectionTimeout = 20
conn.CommandTimeout = 20
conn.Open str

sql = "select * from 粘度对比
Set rs = New ADODB.Recordset
rs.Open sql, conn, adOpenKeyset, adLockPessimistic

rs.addnew
rs.Fields(12) = Text4.Text
rs.Fields(10) = Text5.Text
rs.Fields(11) = Combo1.Text
rs.Fields(15) = Text6.Text
rs.Fields(13) = Text7.Text
rs.Fields(14) = Text8.Text
rs.Fields(16) = Text10.Text
rs.Update

conn.Close
Set conn = Nothing

我编写了这样一段代码,为什么要执行最后两句数据才能存储到数据库中,最后两句好象是关闭数据库啊,
在这里我不想关闭数据库,因为其他地方还要去打开数据库,这样重复打开,会影响速度,能不能不关闭数据库就把数据存储到数据库中,这是为什么啊能告诉我吗?,缓存又是怎么回事啊!