getAllentriesBykey의 배열에서 날짜를 어떻게 사용합니까?

StackOverflow https://stackoverflow.com/questions/566151

문제

배열을 통과하여 GetAllentriesBykey에서 현재를 사용하려고합니다. 지금까지 배열은 다음과 같습니다 

Dim keyarray(2) As Variant  
keyarray(0) = "FF Thompson ADT"  
Set keyarray(1) = dateTime

나는 이것을 말하고 싶다 

Set vc = view.GetAllEntriesByKey(keyarray, False)

다음은 작동 할 때의 모습의 줄입니다. 테스트 에이전트는 이메일로 CSV를 인쇄합니다.

FF Thompson ADT, 2/3/2009,11 : 45 : 02 PM, 0,6,0 ,, 00 : 00 : 04,5400,4

실행되는 현재 DateTime을 통과 할 수없는 것 같습니다. 선언에서 DateTime을 수동으로 설정할 수 있으며 작동합니다. 나는 그것이 시간을 통과하려고 노력하기 때문이라고 생각하지만 나는 모른다. 나는 세 가지 방법을 시도했으며 유효하지 않은 키 값 유형이라고합니다.

Dim dateTime As New NotesDateTime("")
Call dateTime.LSLocalTime = Now
...
keyarray(1) = dateTime.Dateonly

Dim dateTime As New NotesDateTime("")
Call dateTime.SetNow
...
keyarray(1) = dateTime.Dateonly

Dim dateTime As New NotesDateTime("Today")
...
keyarray(1) = dateTime.Dateonly

이것이 유용한 지 모르겠지만 평가에 대해 읽었습니다. 여기.

내가 궁극적으로하려고하는 것은 가장 최근의 날 항목에 대한 "FF Thompson Adt"에 대한 GetFirstry입니다. 나는 또한 그 전날 똑같이하려고 노력하고 있습니다. 나는 이와 같은 것을 사용하여 가장 최근의 날에 이틀과 오류 (널)에 대해 처리 된 파일 (숫자 6)을 요약하려고합니다. 파일이 처리 된 파일과 항목의 오류를 찾을 수 있도록 조정해야하지만 거기에 도착하지는 않았지만 할 수 있어야합니다. 또한 피드 "FF Thompson ADT"의 시간 값이 가장 최근의 가장 최근 날짜를 찾으려고 노력하고 있습니다.

Set entry = vc.GetFirstEntry
filesprocessed = 0
Dim errors, errortotal As Integer
errors = 0
errorstotal = 0
While Not entry Is Nothing
  rowval = 0
  errors = 0
  Forall colval In entry.ColumnValues
    If rowval > 0 Then
      errors = Cint(colval)
    Else
      rowval = Cint(colval)
    End If
  End Forall
  filesprocessed = filesprocessed + rowval
  errorstotal = errorstotal + errors
  Set entry = vc.GetNextEntry(entry)
Wend

도움이나 제안에 감사드립니다. 그들은 대단히 감사합니다.

도움이 되었습니까?

해결책 2

여기 내가 찾은 대답이 있습니다

Dim todaysdate As New NotesDateTime("Today")
Dim dateTime As New NotesDateTime(todaysdate.DateOnly)

Dim keyarray(1) As Variant keyarray(0) = feedname
Set keyarray(1) = dateTime 

Set vc = view.GetAllEntriesByKey(keyarray, False)

다른 팁

나는 다양한 문자열과 함께 getallentriesbykey 메소드 만 사용했습니다. 나는 믹싱 유형을 시도한 적이 없습니다. 그러나 다른 유형이 해당 방법에 유효하다고 가정하면 문제는 메모의 DateTime 유형의 차이에 달려 있습니다. Core LS DateTime 유형이 있으며 NotesDateTime 객체가 있습니다. 뷰는 핵심 데이터 타임 유형으로 구성 될 날짜 열을 고려하므로 NotesDateTime 유형을 전달할 때 실패합니다.

그러나 그 문제를 제외하고, 내 제안은 액세스하려는 열이있는 뷰를 만들고 첫 번째 열의 정렬 순서 (FF Thompson ADT 포함)를 ASC로 설정 한 다음 날짜와 함께 두 번째 열을 DESC로 설정하는 것입니다. 그런 다음 원하는 순서대로보기 항목에 액세스 할 수 있으며, 가장 최근의 첫 번째, 가장 최근 2 위 등이 있습니다.

우연히 getallentriesbykey 메소드가 주문을 사용하지 않는 경우 (주문을 보장하는지 잊어 버리면) NotesViewNavigator 클래스를 사용하기 전에이 작업을 수행 한 것을 알고 있습니다. 날짜 키와 함께 getallentriesBeykey를 호출 할 필요없이 대체 방법이 있습니다.

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top