Access统计帐号数(已解决)
本帖最后由 xymc 于 2019-12-4 21:54 编辑1
<div class="blockcode"><blockquote>#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_UseX64=n
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ListViewConstants.au3>
#include <Access.au3>
#include <GuiListView.au3>
#include <Array.au3>
#Include <File.au3>
$mdb_data_path = @ScriptDir & "\mydata.mdb"
$mdb_data_pwd="";数据库密码
$adTable = "帐号列表";数据库表名称
$t='*'
tongji()
Func tongji()
$addfld = ObjCreate("ADODB.Connection")
$addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &$mdb_data_path& ";Jet Oledb:Database Password=" & $mdb_data_pwd)
$RS =ObjCreate("ADODB.Recordset")
$RS.ActiveConnection = $addfld
$RS.Open ("SELECT 游戏大区, count(游戏帐号) AS 账号数 FROM 帐号列表 GROUP BY 游戏大区")
Local $id = 0
Local $aItems;创建一个二维数组,大小为1，后面增加数据时用ReDim调整大小
while Not $RS.eof And Not $RS.bof
if @error =1 Then ExitLoop
ReDim $aItems[$id+1];调整一个已经存在的数组的大小
; MsgBox(0,"ID",$id)
$aItems[$id] = $RS.Fields (0).value;列1数据-大区
$aItems[$id] = $RS.Fields (1).value;列2数据-数量
;MsgBox(0,$RS.Fields (0).value,$RS.Fields (1).value)
$id = $id+1
$rs.movenext
WEnd
$rs.close
$addfld.Close
_ArrayDisplay($aItems, "显示统计结果");显示数组
EndFunc
在数据库里面写的统计没问题，不知道怎么转换到AU3代码里面
请教下各位大神？
以下是acc查询语句
SELECT 游戏大区, count(游戏帐号) AS 账号数
FROM 帐号列表
GROUP BY 游戏大区;
语句
$RS.Open ("SELECT 游戏大区, count(游戏帐号) AS 账号数 FROM 帐号列表 GROUP BY 游戏大区")
水木子版主好象有写这方面的例子，自己搜一下。
页:
[1]