我不熟悉访问中的vba语法,我对查询有疑问。
我有一个表单,例如我有一个名为" A"的字段。我希望将其插入表it('scope.isRouteLoading should be false on start', function() {
// wrap sm-progress with a div tag
element = $compile('<div><sm-progress></sm-progress></div>')(scope);
scope.$digest();
expect(scope.isRouteLoading).toBe(false);
// In this point element compiles to:
// <div class="ng-scope"><!-- ngIf: isRouteLoading --></div>
$rootScope.$emit('$stateChangeStart');
expect(scope.isRouteLoading).toBe(true);
scope.$digest();
// Now element compiles to:
// <div class="ng-scope">
// <!-- ngIf: isRouteLoading -->
// <div class="sm-progress ng-scope" ng-if="isRouteLoading">
// <span>.</span><span>.</span><span>.</span>
// </div>
// <!-- end ngIf: isRouteLoading -->
// </div>
// Now the test pass.
var progressEl = angular.element(element).find('.in-progress');
expect(progressEl.length).toBeGreaterThan(0); //element is present
});
和另外两个字段,一个名为&#34; B_ID&#34;其中包含ID和另一个名为&#34; B&#34;我希望在table_a
中更新(其中ID等于字段&#34; B_ID&#34;。
如何在VBA中进行访问的任何想法?
在PHP和MySQL中我只会有两个查询:table_b
INSERT INTO table_b (field_A) VALUES ($_POST['A'])
*或类似的东西......
谢谢你!
答案 0 :(得分:1)
如果您基于可更新查询创建表单,则不需要任何VBA代码。应使用主表中具有唯一键的列链接表,并且查询不应包含聚合函数。还有一些其他限制,但在大多数情况下,它适用于简单查询
如果表未链接或您不想在表单上使用,请使用以下代码:
Dim db As Database
Set db = CurrentDb
db.Execute "INSERT INTO table_b (field_A) SELECT " & Me.A, dbFailOnError
db.Execute "UPDATE table_b SET B=" & Me.b & " WHERE b_id = " & Me.B_ID, dbFailOnError
这里我们假设您在表单字段A,B和B_ID上有数字值,表中的相应列是数字。如果字段是文本,请在SQL字符串中添加单引号。