VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
排序: 热度 日期 标题 默认, 方式 倒序 顺序 VBGood首页 - 经验之谈
页面锁定的锁定方案--多客户环境下VB数据库编程之(7)
如前所述,Microsoft Jet不能锁定单个的记录,每次读、写以及锁定的都是一页数据,面不是一个记录。根据记录的大小,一页可能包含多个记录。当锁定一个记录时,就会锁定那一页上的所有记录,如图8.6所示。

在高并发应
评论:0, 阅读:10263, 日期:2001-02-16 [数据库] 页面锁定--多客户环境下VB数据库编程之(5)
页面锁定--多客户环境下VB数据库编程之(5)
     从理想的角度来说,如果能对记录进行锁定,则会给多用户程序带来极大的灵活性。然而遗憾的是,Microsoft Jet引擎不支持真正的记录锁定,而是使用页面锁定。页面锁定只锁定包含当前正在编辑的记录的
评论:0, 阅读:9851, 日期:2000-10-27 [数据库] 非access数据库在vb中的编程及应用
非access数据库在vb中的编程及应用

visual basic有着强大的数据库存取能力,不仅能够直接支持ms access数据库,而且通过其内部安装的isam驱动程序使它能间接支持foxpro、dbase等外来数据库。本文不仅从vb数据库体系结构的角度探讨了vb对这些外来数据库的支持,还结合了一些实
评论:0, 阅读:9970, 日期:2001-01-05 [数据库] 随机访问Recordset的一条记录
假设这个数据表有一个唯一的ID字段,并至少有一条记录。随机存取其中一条记录的方法是非常简单的,可以分为四步:
问:我在Access97中建立了一个库存查询,由于有一种产品没有出库,只有入库,造成库存查询中没有这种产品的库存,请问怎样解决这个问题?

  答:Access 97支持三种连接方式:左连接、右连接、等值连接。你的问题主要是使用了等值连接!在等值连接方式下,只有两个表中键值
评论:0, 阅读:14558, 日期:2000-03-12 [数据库] 锁住数据库中的表
锁住数据库中的表

把表达式 True=False 放到表的 ValidationRule 属性就能锁上。 HardLockTable?实现了该功能。

声明

Public MyDB As Database

Dim Dummy As Integer

函数

Function HardLockTable (ByVal whichAction As String,?ByVal aTable As S
评论:0, 阅读:9950, 日期:2001-06-24 [数据库] 避免VBA陷阱--有时,VBA使你避免危险
避免VBA陷阱--有时,VBA使你避免危险
作为Access-Office-VB ADVISOR 的技术编辑,我见过许多编程风格。我常常惊异于VBA程序员能够找到不同的方法来执行相同的任务,同时我也对VBA能够容忍如此差的技术而感到沮丧。VBA是一种相当宽容的语言,几乎能够运行一切那些糟糕的程序员
评论:0, 阅读:10110, 日期:2001-06-21 [数据库] 通过引用的方法实现对WORD的控制
如:
Private Sub Form_Click()
Dim winword As Object
Set winword = CreateObject("word.basic")
winword.filenewdefault
winword.FontSize 20
winword.Insert "成功了吗?"
winword.filesaveas "c:\sucess.doc"
winword.fileclose
End Sub
评论:0, 阅读:10729, 日期:2002-02-09 [数据库] 通过Visual Basic .NET 在Office Excel 2003 中添加 XML 功能
通过编程方式添加 XML 功能可增强应用程序的实用性。文中的三个示例阐明了如何通过在 Microsoft Visual Basic .NET 中使用 XML 来达到在 Microsoft Office Excel 2003 中打开并使用文件的目的。
评论:0, 阅读:12450, 日期:2002-02-27 [数据库] 通用数据链接文件 (*.UDL) 的创建
引用 Microsoft OLE DB Service Component 1.0 Type Library
Option Explicit
Private Sub Command1_Click()
Dim x As New MSDASC.DataLinks
x.hWnd = Me.hWnd
Dim s As String
On Error GoTo ErrorHandler
s = x.PromptNew
On Error GoTo 0
If VBA.Len(VBA.Trim(s & &qu