VB+ACCESS查询功能不能实现,还总提示表“|”已被别的用户以独占方式打开...

作者&投稿:乔贵 (若有异议请与网页底部的电邮联系)
access :表“查询”已被别的用户以独占方式打开,或它已经被其它用户从用户界面打开,且不能被程序处理~

1)应该是你已经打开了那个表。你关掉access,重新打开,直接打开那个窗体,点击那个按钮。
2)可能是你的窗体其他地方已经提前引用了这个表。你如果实在很难找得出来在哪里设置的,可以删除这个窗体,重新制作一个。

数据库被打开了。

两种可能:
1、你现在用access打开这个数据库了,并且是以独占方式打开或者打开了这个表的设计页面
2、你的连接的Mode 设为独占方式 adModeShareExclusive,在之前一个连接关闭之前,不能再打开新的连接,这个需要你自己跟踪检查一下

LZ你的数据库是不是开着的= =如果是请关闭……

vb中查询access数据库出错
答:Dim cnn as ADODB.ConnecTion Set cnn = New ADODB.Connection cnn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\mima.mdb;Persist Security Info=False"cnn.OPen sql = "select * from mima where 用户名='" & Text1.Text & " '"rs1.Open sql, ...

ACCESS中怎样用VB写查询按钮的代码,实现查询功能
答:先用文本做查询语句,再执行 比如 dim strA as string dim strsql as string strsql="select * from 表1"strA=“”if text1.text<>"" then strA=strA & " and 列名1 like %text1.text%"end if if text2.text<>"" then strA=strA & " and 列名2 like %text2.text%"end if ......

VB与ACCESS,SQL查询结果不包含查询条件
答:因为同名了。两个表中都有这个字段所以无法正常识别。建议不要用select *,而是改为select 所需要的字段名,这样遇到同名的可以重命一个其他的名字。

VB实现ACCESS数据库记录的查询,新增,删除,修改
答:该查询将运行,并显示一个列表,列表中包含产品名称、订单日期、前一个订单日期以及订单日期之间的时间间隔。结果先按照“产品 ID”(升序)、再按照“订单日期”(降序)进行排序。注释 因为“产品 ID”在默认情况下是查阅字段,所以 Access 会显示查阅值(在这种情况下是产品名称)而不是实际的“...

请问我要要做个数据库,打算用VB和ACCESS实现,请问VB代码如何生成软件界 ...
答:机子上安装上vb,如下你下载到的同vbp等源文件,用vb打开vbp文件,运行就可以看到结果,如果仅是代码,你要新建一个工程,窗体是按放所用控件,代码窗口中贴上你的代码,再运行.运行没问题后,可以通过"文件"菜单下的"生成exe文件"获得可执行文件,进一步可以打包,生成安装包....

用VB查询access时这么写虽然实现了查询功能,但是是不是太冗余了?_百度...
答:Dim Cn As New ADODB.ConnectionDim Rst As New ADODB.RecordsetDim SqlStr As StringPrivate Sub Command1_Click()SqlStr = "Select * From 表1"Call CnLJEnd Sub Private Sub Command2_Click()SqlStr = "Select * From 表1 where 姓名='" & Text2.Text & "'"Call CnLJEnd SubPrivate ...

求用VB(目前只有VB,没有其他软件…) 来实现 Access 数据库记录的查询...
答:在窗体添加Adodc控件一个text控件 一个添加记录按钮一个提交按钮在窗体设置代码:Private Sub Form_Load()Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\db1.mdb;Persist Security Info=False"'设置数据库路径 Adodc1.CommandType = adCmdText '设置记录...

vb6.0+Access数据库实现查询功能,通过选择查询条件,将数据库中符合条件...
答:ListItems.Add(, , "")Fliv.Text = Rs.Fields(0)Fliv.SubItems(1) = Rs.Fields(1)Fliv.SubItems(2) = Rs.Fields(2)Fliv.SubItems(3) = Rs.Fields(3)End If Rs.MoveNext Next j Rs.Close End Sub 在连接好数据库后,查询数据,并将其显示在listview控件中,希望对你有帮助 ...

vb如何查询ACCESS
答:Dim sqlStr As String '生成连接和记录集实例 Set conn = New ADODB.Connection Set rs = New ADODB.Recordset ‘建立连接字符串,我这里假设你的数据库就在c盘根目录 conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\hy.accdb"'打开数据库连接 conn.Open ’设置查询...

在vb中 实现对ACCESS数据 查询
答:Set dbConn = New ADODB.Connection '定义一个ADODB连接对象 If dbConn.State <> adStateOpen Then '判断ADODB连接是否打开 dbConn.Open conStr '如果不是打开状态 就打开连接 End If ConnAccess = True End Function Public Function CloseAccess() As Boolean '关闭数据库连接 If dbConn.State = ...