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

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

1 个答案: