ms-access - 在执行数据透视之前修改记录集

Question

我有一个访问数据库，我通过 vbscript 从 asp 页面访问。我需要查询数据库并返回一个记录集，修改记录集中的一些数据然后执行数据透视。如何对修改后的记录集执行透视？

我已经返回了记录集并完成了数据修改，但不知道现在如何执行数据透视。数据修改涉及检查记录集中的每个项目（计划请求）以查看它是否跨越过滤器日期范围。如果是，则调整开始和/或结束时间并重新计算请求的时间。不是在 SQL 查询本身中可以完成的事情。

Answer 1

一些 SQL 变体有自己的 PIVOT 功能，我不知道 ACCESS 但这里是 vbscript 中的一般透视功能。我在这里的数组中使用数组，没有 vbscript 多维数组。如果您需要这样的版本，请告诉我。

arr = Array(_
  Array(1,2,3),_
  Array(4,5,6)_
)

for each line in arr
  wscript.echo join(line)
next

'1 2 3
'4 5 6

pivotted = pivot(arr)

function pivot(arr)
  dim arr2(), temp()
  redim arr2(ubound(arr(0)))
  for col = 0 to ubound(arr(0))
    redim temp(ubound(arr))
    for row = 0 to ubound(arr)
      temp(row) = arr(row)(col)
    next
    arr2(col) = temp
  next
  pivot = arr2
end function

for each line in pivotted
  wscript.echo join(line)
next

'1 4
'2 5
'3 6