小编Kat*_*a24的帖子

在我的MS Access DB中,我在VB中运行一个应该返回两条记录的查询.当我在SQL中运行它时,我得到两条记录,但是当从VBA运行时,我得到两条记录.以下是SQL视图中的代码,它获取两条记录:

SELECT *
FROM tblWebMeetingData
WHERE [Last Name] LIKE 'Marx';

当我在VBA中这样称呼时:

SQL = "SELECT * FROM tblWebMeetingData WHERE [Last Name] LIKE 'Marx';"
Set rst = CurrentDb.OpenRecordset(SQL)  
MsgBox ("Number of records: " & rst.RecordCount)

我得到一条记录的记录.记录计数是不是要计算从SQL语句或表返回的所有记录？这是什么我在这里做错了？

谢谢

我目前正在使用MS Access VBA中的InputBoxes.我正在检查验证和处理用户如何通过按OK或取消按钮与InputBox交互.

纠正我,如果我错了,但InputBoxes可以返回任何数据类型,默认情况下返回一个字符串？例如:

Dim userInputValue As String

'Text to display, Title, Default Value
userInputValue = InputBox("Please enter a #", "Determine Limit", 10000)

If userInputValue = "" Then
    MsgBox ("You pressed the cancel button...")
End If

如果用户按下取消按钮,则运行正常.

但当我交换这个整数值时,如下所示:

Dim userInputValue As Integer
'Text to display, Title, Default Value
userInputValue = InputBox("Please enter a #", "Determine Limit", 10000)

If userInputValue = 0 Then
    MsgBox ("You pressed the cancel button...")
End If

我收到一个Type Mismatch: Runtime Error '13'为什么这个？当我调试代码并查看返回的内容时,我发现userInputValue实际上是0,这正是我正在检查的内容.那么InputBox实际上返回一个字符串的问题是什么？

我的应用程序上有一个标头，其中包含“登录” /“创建帐户”选项。当用户登录时，我需要使用上述内容交换“退出”选项。

但是，当用户登录ui视图时，按预期进行了更改，但没有更改标题，这是可以理解的，因为它不是ui视图的一部分。到目前为止，这是我的代码：

<ul id="nav-account">
    <li>{{mainCtrl.isAuthenticated ? 'Welcome ' + user.firstname + '!'</li>
    <li ng-if="!isAuthenticated"><a ng-href="{{'HEADER_NAVTABS_SIGNIN'| externallinks}}">Sign In</a> or <a ng-href="{{'HEADER_NAVTABS_CREATE_ACCOUNT'| externallinks}}">Create Account</a></li>
    <li ng-if="isAuthenticated"><a ui-sref="logout">Sign Out</a><li>
</ul>

在我的控制器中，我通过调用服务来设置isAuthenticated的值：

 $scope.isAuthenticated = memberService.isAuthenticated();

标头值更改的唯一方法是刷新整个页面-为什么？ng-if是否应该重新评估变量并相应地更新视图？

这是否意味着ng-if仅绑定一种方式？那么我该怎么做才能使这项工作呢？

谢谢

安德鲁

我有一个.obj看起来像这样的文件:

我需要做的只是缩放手柄的某个部分 - 在这种情况下,手柄实际从顶部向下弯曲的点.所以我希望能够在这种情况下让它们更长.

有没有人有任何方向或如何实现这一目标？我所看到的所有例子都只是缩放整个模型,而不仅仅是缩放模型的一部分.

我想我需要根据obj中的顶点创建一个Spline,然后操纵Spline创建,但我希望有更简单的选项,因为我不知道如何将模型与仿样

谢谢

编辑我认为答案不在于Splines - 它实际上取决于变形对象的目标属性.我会在这里发帖,如果有人知道我的意思,那么请指出我正确的方向.

编辑2遵循零的建议我试图使用带骨骼的SkinnedMeshes.我正在尝试用对象填充skinIndices&skinWeights,Vector4但是Typescript会抛出一个错误:

类型的'Vector4'参数不能分配给类型的参数number

我知道这是一个Typescript问题,而不是一个ThreeJS问题,但我创建了一个jsfiddle,它具有相同的代码,但其中的数组skinIndices是类型Vector4.我能想到的唯一原因是我的不是因为我发送的通过该功能BufferedGeometry的.obj对象THREE.fromBufferGeometry:

let geometry = new THREE.Geometry().fromBufferGeometry(frontHandle.children[0].geometry);

编辑3

let geometry = new THREE.Geometry().fromBufferGeometry(frontHandle.children[0].geometry);

for ( let i = 0; i < geometry.vertices.length; i ++ ) {
  let vertex = geometry.vertices[ i ];
  let y = (vertex.y + sizing.halfHeight);

  let skinIndex = Math.floor( y / sizing.segmentHeight ); …

我为我的应用程序重新创建了一个包模型，并将其作为 .obj 导出到 ThreeJs 中：

我为模型几何中发现的每个面分配了不同的颜色，如下所示：

var geometry = new THREE.Geometry().fromBufferGeometry( bagMesh.children[0].geometry );

for (var i = 0; i < geometry.faces.length; i ++ ) {
  var face = geometry.faces[i];
  // 7 & 8 = front side
  // can we flip its normal?
  if(i === 7 || i === 8) { 
    face.color.setHex( 0xff0000 );
  } else {
    face.color.setHex( Math.random() * 0xffffff );
  }
}
geometry.translate( 0, -1, 0.75);
mesh = new THREE.Mesh( geometry, new THREE.MeshBasicMaterial({ vertexColors: THREE.FaceColors, side: THREE.DoubleSide }) ); …

我正通过Gitlab管道将我网站的前端部署到亚马逊s3.我以前的部署已成功运行,但最近的部署却没有.这是错误:

Completed 12.3 MiB/20.2 MiB (0 Bytes/s) with 1 file(s) remaining
upload failed: dist/vendor.bundle.js.map to s3://<my-s3-bucket-name>/vendor.bundle.js.map Unable to locate credentials

根据我的秘密变量,我定义了四个.它们是(AWS_ACCESS_KEY_ID & AWS_SECRET_ACCESS_KEY)两个不同存储桶的S3凭证变量.一对用于测试分支,另一对用于生产分支.

不 - 生产环境变量受到保护而其他变量则不受保护.这是我运行的部署脚本:

#/bin/bash
#upload files
aws s3 cp ./dist s3://my-url-$1 --recursive --acl public-read

那么为什么我得到这个凭据位置错误？当然它应该自动获取环境变量(未受保护的变量)并部署它们.我是否需要在作业中定义变量并参考它们？

我有一个过程,重新链接数据库中的所有表是否是一个链接表.目前,这被设置为自动运行,因为它在调用该函数的AutoExec宏中设置.

代码有效,但只有关闭数据库并重新打开它.我知道这是因为需要这样才能让新链接生效但是还有这个吗？或者,如果不这样做,最好让VBA代码关闭数据库并重新打开它吗？

提前感谢您的反馈

PS这是代码,万一你好奇:

'*******************************************************************
'*  This module refreshes the links to any linked tables  *
'*******************************************************************


'Procedure to relink tables from the Common Access Database
Public Function RefreshTableLinks() As String

On Error GoTo ErrHandler
    Dim strEnvironment As String
    strEnvironment = GetEnvironment

    Dim db As DAO.Database
    Dim tdf As DAO.TableDef

    Dim strCon As String
    Dim strBackEnd As String
    Dim strMsg As String

    Dim intErrorCount As Integer

    Set db = CurrentDb

    'Loop through the TableDefs Collection.
    For Each tdf …

我使用 CLI 创建了默认的 Angular 应用程序，如下所示：

ng new ng-test-deploy

测试将虚拟应用程序部署到 Github 页面。我完成了此处定义的程序，总而言之，它执行以下操作：

ng build --prod --base-href "https://USERNAME.github.io/REPOSITORY_NAME/"
angular-cli-ghpages

这样做之后，我访问了该页面并收到一个空白页面。在控制台中，加载文件时出现多个错误：

如果我检查 say 的 url，main.bundle.js我可以看到路径指向https://katana24.github.io/main.3188de4880a80d258168.bundle.js 而我可以通过将 repo 名称添加到 url 中来加载它，如下所示： https://katana24.github.io/ng-test-edeploy/main.3188de4880a80d258168.bundle.js

我搞砸了一步吗？

先前问题的答案建议删除该base-href="..."值，但这对我来说没有意义。那么我如何让它看起来在正确的地方呢？

我正在进行代码审查，并遇到了以下情况：

Dim lngLen As Long    
lngLen = 16&

我已经阅读了一些内容，这似乎是一种将数字转换为长整型的方法 - 这是正确的吗？

但这真的有必要吗，因为您可以只分配lngLen值 16，因为它是一个数值。

另外，按照此代码完成此操作：

Dim strCompName As String   
strCompName = String$(lngLen, 0&)

我String从 Access 帮助定义中认识到该方法“返回一个包含指定长度的重复字符串的变体”。

那么$有什么作用呢？& 再次将 0 转换为 long 吗？

我意识到您可以通过检查桌面上的"关于此Mac"功能轻松确定macs规格.但是如果可能的话,我想通过终端来做.那你怎么去做呢？如果有任何综合资源,你可以建议我指点他们!

干杯