Access 第6页 - IT屋-程序员软件开发技术分享社区

访问的修剪（）函数不是在另一台计算机识别

我建了一个温和的Access数据库，并要求同事给她的机器上测试它。令我惊讶的是，错误消息弹出，称它不承认修剪（）。有问题的查询是一个标准的选择查询，拉从MSSQL Server数据库。为什么是不是认出了她的机器上，我如何解决这个问题呢？（我们都使用MS Office 2003和具有网络权限相同的源表。）解决方案让我猜猜，你正在使用修剪与链接表和它的作品在PC上，但不是你的同事？如果是这 ..

发布时间：2015-11-28 12:59:55 ms-access vba access-vba Access

是否有一个NotIn（＆QUOT; A＆QUOT;，＆QUOT; B＆QUOT;）在VBA功能？

我正在写一个函数，需要输入我的数据验证看起来很别扭。如果InputFld不是“A”，“B”或“C”，那么这是一个错误：如果InputFld＆LT;＆GT;“A”和InputFld＆LT;＆GT;“B”和InputFld＆LT;＆GT;“C”，然后转到的ErrorHandler 这只是看起来丑陋的我。有没有更好的解决方案？我想只写是这样的：如果InputFld不在（“A”，“B”，“C”） ..

发布时间：2015-11-28 12:59:53 ms-access vba access-vba Access

要这个问题相关，我怎样检测一个形式的用户正在添加记录？这将是理想的，如果我知道这个尽快形式的“当前记录”变成了“新”（导航超越过去的现有记录，或单击“新建”导航按钮），但只要第一块数据开始了解要输入的将是几乎一样好。我猜测，这将是测试的在form_Current东西的，但什么（或者是有更好的方法）？另外有关，最早什么是我能找到的（自动编号）的ID为新纪录？这需要保存，不是吗？难道它会自动填充 ..

发布时间：2015-11-28 12:59:50 ms-access vba ms-access-2007 access-vba Access

VBA code表示更新后改变表格的背景颜色

我需要一些code，当一个复选框选中它将改变我的窗体的背景颜色和检查时，将其返回到原来的颜色。在codeI有复选框目前锁定了一个组合框选择的值时。以下例私人小组AccessKeyNo_AfterUpdate（）如果MSGBOX（“你要分配访问密钥”＆放大器; Me.AccessKeyNo＆安培;“？”，_ vbYesNo）= vbYes然后 Me.GuestAcces ..

发布时间：2015-11-28 12:59:47 ms-access vba access-vba Access

的MS Access / VBA，检查桌面锁

基本上，我试图找到一种方式的MS Access（2003年），以检测用户是否已经做了按Ctrl + Alt + Del键，并锁定他们的工作站。如果出现这种情况，我想打开的数据库关闭。目前，我有一个运行在检查活动后台隐藏的形式，但它是不可靠的。有没有办法做到这一点在VBA，或者我应该这样做的另一种方式（或两者）？谢谢！解决方案你不会找到一个可靠的方式来做到这一点从内部访问。按Ct ..

发布时间：2015-11-28 12:59:45 access-vba Access

导出查询输出到一个文本文件

我有我试图用下面的code导出到文本文件的访问查询： DoCmd.TransferText acExportFixed，“导出规范”，_ “测试查询”，“C：\用户\文档\ TestOutput.txt”，真我遇到的问题是：输出文件“TestOutput.txt”与固定宽度显示的数据，但该列标题逗号分隔。我想列标题是固定的宽度了。你会列标题不会显示相同数据的其他人呢？ ..

发布时间：2015-11-28 12:59:42 ms-access ms-access-2007 access-vba Access

＆QUOT;最低的Select语句和QUOT;或DMIN（）。哪一个是preferable？

我需要找到一个表tbl_Revenue最低收益。我发现两种方法做到这一点：方法1 昏暗MinRevenueSQL作为字符串昏暗rsMinRev作为DAO.Recordset MinRevenueSQL =“SELECT民（tbl_Revenue.Revenue_Value）作为MinRevenue从tbl_Revenue WHERE（（（tbl_Revenue.Division_ID）= ..

发布时间：2015-11-28 12:59:40 ms-access vba access-vba Access

VBA Shell命令总是返回＆QUOT;未找到文件＆QUOT;

我以一个小的C＃应用程序链接到我的数据库作为辅助工具使用VBA的MS Access。我已经尝试了几个来自计算器自己不同的想法，包括ShellAndWait工具，另一个页面上。我有一个窗体上的按钮。当你点击这个按钮，它应该运行，我目前存储在另一个应用程序％APPDATA％/程序/ 这是在code当前活动：私人小组BtnImport_Click（）昏暗的文件作为字符串昏暗hProc ..

发布时间：2015-11-28 12:59:37 access-vba Access

删除记录，移动previous不工作

我想删除记录，然后移动到已删除的记录之前的数值。但我无法得到它的工作，现在我越来越运行时错误2046的命令或操作'DeleteReord'现在不可用。我在做什么错在这里？我应该如何处理呢？私人小组Command24_Click（）对错误转到Err_Command24_Click ！如果我[dbo_HR_Trainings子窗体] .Form.Recordset.RecordCo ..

发布时间：2015-11-28 12:59:34 ms-access vba access-vba Access

插入当前日期时间到审核表

我是在实施审计日志来记录的简短更改数据库的描述的过程。我的审核表包含一个自动编号的PK，EMPID（数量），描述（备忘录），和auditDate（日期/时间）。我EMPID和说明被正确地插入，没有抛出错误，但没有被插入我的日期/时间。我想这可能不是那么简单放错位置的引号。我的VBA code是如下：在afterInsert事件：昏暗strQuery作为字符串 “昏暗的JS作为整数昏暗cu ..

发布时间：2015-11-28 12:59:32 ms-access access-vba Access

如何从一个SQL Server数据库的数据

我正在写在VBA一个code片段来从SQL Server 2008 R2数据库中提取数据。不过，我得到一个错误的Conn.Open： [微软] [SQL Server本机客户端10.0]命名管道提供商：无法打开到SQL Server的连接[53] 使用 ConnectionString.com 和其他的功能的getAddress（）作为字符串暗淡康恩作为ADODB.Connection 设置 ..

发布时间：2015-11-28 12:59:29 vba ms-access ms-access-2007 access-vba Access

Microsoft Access中 - 获取记录ID，当按钮被点击

我使用的访问创建一个表单。我想知道怎么我得到当我点击一个按钮，当前记录的ID。我想“Me.CurrentRecord”在VB按钮code。但这个工作不能正常工作。任何人都可以帮忙吗？私人小组save_record_Enter（） Me.CurrentRecord 结束小组解决方案您可以通过名字引用域基础记录和表单控件中的MS Access，例如： Me.ID MS ..

发布时间：2015-11-28 12:59:26 ms-access access-vba Access

如何索取表格的最后一条记录的ID？

我目前在接入的形式。我想要做的就是添加的最后一个记录的值。例如，如果我有10条记录，我想要得到的值“10”，因为这是最后添加记录的ID。我想运行的功能最后一个ID插入（）查询，但它不能正常工作。这在code我使用的：昏暗lastID作为整数查询=“选择LAST_INSERT_ID（）” lastID =查询 MSGBOX（lastID）我在想什么？解决方案有一个 ..

发布时间：2015-11-28 12:59:24 access-vba Access

从Access数据库发送的电子邮件包含的附件与动态名称

我不知道如何得到这个东西的工作超出了这一点。我的code以下发送包含附件出MS Access 2010中的邮件现在的问题是，如果它需要一个固定的文件名，因为我使用的日期在每个文件的末尾我的文件名称更改。例如：green_12_04_2012.csv。我也不知道如何使这个没有失败，如果该文件夹为空或目录更改。这将是伟大的它只是跳到下一子，而不是崩溃。我的code：昏暗strGetFil ..

发布时间：2015-11-28 12:59:21 ms-access access-vba Access

遍历表，更改字段值

我想写一张code将通过一个表上运行，并更换有一定的价值与其他价值各个领域。私人小组的Form_Load（）昏暗的分贝作为DAO.DATABASE 昏暗首先作为DAO.Recordset 昏暗STRSQL作为字符串设置DB = CurrentDb（） STRSQL =“SELECT Profile3银行WHERE'AB'” 设置RST = db.OpenRecordset（STR ..

发布时间：2015-11-28 12:59:19 ms-access access-vba Access

审计跟踪的一种形式

我设立的形式在我的数据库中的审计跟踪系统。我下面从苏珊·哈金斯的例子我的code ++工程，为我的客户的形式是基于关闭客户表。这是我的code：常量干熄焦的String =“”“” 子跟踪线索（FRM作为表格，recordId所作为对照） “跟踪更改数据。 “recordId所标识的PK场的相应 “控制FRM，以ID记录。昏暗的CTL作为控制昏暗varBefore为Variant 昏暗va ..

发布时间：2015-11-28 12:59:16 vba ms-access ms-access-2007 access-vba ms-access-2010 Access

与参数的访问报告独特的计算汇总

我的工作与使用员工访问2003年的报告，他们的点，他们已经积累了一段时间。当运行报表，它要求的参数起始日期和结束日期，然后产生一个很好的报告，由主管 - >员工 - >每个点有一个原因我怎样才能得到下一个总箱到每个员工的名字给总积分为每个员工？我想过写一个SELECT和WHERE语句并添加变量到VBA，所以源属性是： =（SUM（选择[PointValue]，其中[EmployeeName ..

发布时间：2015-11-28 12:59:14 ms-access access-vba ms-access-2003 calculated-field Access

声明错误结束

我想组装多换行的INSERT语句。插入包括数值以及文本数据。我不断收到一个错误，我无法找到我的语法错误。任何人都可以看到我的错误？ CurrentDb.Execute“INSERT INTO tblCustParts（CustPartNum，客户ID，合金，状态，完成，FormType，压力表，GaugeAimPlus，GaugeAimMinus，”＆放大器; _ "Gauge ..

发布时间：2015-11-28 12:59:11 ms-access access-vba ms-access-2010 Access

禁用默认MSGBOX

我想禁用从Access默认MSGBOX。这是我的code，私人小组textRequiredDate_AfterUpdate（） DoCmd.SetWarnings假如果没有则IsDate（textRequiredDate.Value）然后 MSGBOX“请输入日期” 其他结束如果如果textRequiredDate.Value＆LT; textOrderDate.Value然后 ..

发布时间：2015-11-28 12:59:08 ms-access access-vba Access

编程改变RecordsetType在MS Access或更好的方法

在MS Access我有一个形式，它也有一个子表单。我想在主形式RecordsetType编程更改到快照时副台/子形式具有相关联的在一对多的关系记录。我写了一些VBA code要做到这一点，但我遇到了一些非常奇怪的行为。我这时才发现，这是因为当我改变RecordsetType，形式刷新和导航回的第一条记录。也就是说然后使在当前事件和相关联的code键火在子表格，主要形式都两次。我在考虑使用Do ..

发布时间：2015-11-28 12:59:06 ms-access access-vba recordset Access