只读的话,就不能修改结果了。我现在要的是能修改统计的结果集,但不更新数据库。 不想更新数据库,结果集是用来显示的吧,在显示时选择下。 显示的时候处理,把10和11相加,11跳过不显示 使用ADO的断开记录集,设置Set RS.ActiveConnection = Nothing,这时无论是AddNew、Delete,均不会对原始记录集产生影响。 附上源码: If Not rsCopy7 Is Nothing Then Set rsCopy7 = Nothing
Set rsCopy7 = Module2.rs.Clone While Not rsCopy7.EOF If (rsCopy7.AbsolutePosition = 10) Then While Not Module2.rs.EOF If (Module2.rs.AbsolutePosition = 11) Then For Z = 2 To 13
我想把word另存为xml之后,用vb读取这个xml的内容,请问如何实现? dim f as integer dim b() as byte dim s as string dim L as long f=freefile() open "abc.xml" for binary access read as #f ......