陈建华(MSTOP)的专栏

 文字我就不写了.这篇只是 SQLSERVER2000 用过程来模拟MDX分析报表的效果(1)  的后续.我写了一个例子.供大家下载.地址:http://d.download.csdn.net/down/709167/MSTOP

 注意：这篇文章其实在几天前我已经写过，但是那是我的第一片文章，写的相当粗糙，很多东西都没有写详细，只是草草的提供了源码的下载，看到我的那篇点击量有点大，给了我不少安慰，因此决定重写KPI展示这片文章。没有深入了解过的朋友请继续往下看。关于sqlserver2005中的KPI特性，相信接触过sqlserver2005的BI的平台的朋友都有所耳闻。并且跟数据挖掘查看器一样，微

  注意：对于本文提到的dll，因为微软没有公布，建议不要用于真实项目中去。否则以后使用中出现问题，将变的非常被动，本文仅作学习之用。对于搞Sqlserver2005BI的朋友来说，相信肯定看到过sqlserver自带的数据挖掘模型的查看器，但是他们仅仅限于sqlserver2005客户端，微软并没有给我们提供编程接口来使用这些优秀的数据挖掘模型的查看器。后来通过webcast我知道了微软

环境说明:本文提到的控件是在ASP.NET2.0环境下,分析服务对应的是SQLServer2005.支持三种挖掘模型，聚类，决策树和贝叶斯。对应的三个控件是：DMClusterViewer,DMDecisionTreeViewer和DMNaiveBayesViewer。如下图：演示出的结果大致分别如下（用自带的Adventure Works DW）：图为聚类：图为决策树图为贝叶斯对于数据挖掘现在理

本文目的对丰富的函数集可以提供的强大功能有一个直观的认识看看Microsoft是怎样应用函数，也许可以参考借鉴；应用举例 成员百分比分析 函数：CurrentMember、Parent等；分析各城市的销售所占全部城市的总销售额百分比。WITHMEMBER Measures.[Unit Sales Percent] AS ((Store.CURRENTMEMBER,Measures.[

 您可以使用多维表达式 (MDX) 查询多维数据或创建用于多维数据集的 MDX 表达式，但是需要先了解一下 Microsoft SQL Server 2005 Analysis Services (SSAS) 维度概念和术语。下面一节简要介绍了您需要了解的基本维度建模概念和术语。随后各节说明了如何应用这些概念。 有关详细信息，请参阅 Microsoft TechNet 网站 SQL Serve

这个想法的产生比较特殊,当时我在某学会工作,我对数据仓库的学习也初见成效,也做了一两个基于数据仓库的产品,总觉得数据仓库部署比较麻烦,而我的客户仅仅是需要一张分析型的报表.他只要满足多维的旋转,聚合,产生一个层次性的报表就可以满足要求.     基于这种情况,我想:能不能在数据库下模拟一张这样的报表来满足用户的需要?     因为写过仓库下的二个基于WEB的展示组件,显示一个MDX返回的CellS

           将CellSet转为DataTable.            CellSet对象.      DataTable           Private Function AdoMdCellSetToDataTable(ByVal CellSet As Microsoft.AnalysisServices.Ad

 ---------------------------------------------------------------------------- -- 分段截取函数 ---------------------------------------------------------------------------- CREATE    FUNCTION DBO.FUN_SplitStr

SQLSERVER数据表的记录重排物理优化方案    该方案产生于2005年,当时我接手了某产业库的设计.我们在开发这个产品时,在数据库中引入了100万条记录作为开发版数据库.开发过程非常顺利,前台程序的测试速度也非常好.但我们在后来将当前的5亿条数据库追加到开发库进行测试时,发现无论什么情况,都无法从数据库中取出记录,发现在读取数据库时,磁盘灯一直在亮,而性能性能监视器里的CPU使用率很底.

 资源地址:http://d.download.csdn.net/down/681083/MSTOP第一次运行,在窗体的控件中输入不同的值.然后退出.再运行,你输入的值将会自动读到相应的控件中.//窗体 Private Sub Form_Load()    On Error Resume Next    Call GetIniToFrmControl(Me, "C

按窗体的任何部份皆可拖动窗体,假定窗体名为Form1 声明部份 Declare Function ReleaseCapture Lib "user32" ()  As Long Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long,  ByVal wMsg As 

如何设置软件自启动?调用一系列API函数Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As LongConst HKEY_LOCAL_MACHINE = Private Declare Function RegCreateKeyEx Lib "advapi32

 在VB中用Shell调用.如   Private Sub Form_Load()    Shell "rundll32.exe desk.cpl,InstallScreenSaver c:/win/system/Flying Windows.scr"End Sub启动控制面板命令控制面板模块： control.exe命令： rundll32.exe she

   原代码地址:http://d.download.csdn.net/down/681014/MSTOP //================================ //MSTOP(陈建华) //         2001/03/16 //================================ Option Explic

    有时我们对某些场合,对系统时间的要求是很高的,例如:SQLSERVER服务器间的同步或文件同步.但计算机的时钟运行一段时间,会出现一个误差.时间长了,可能达分钟以上.下面程序可以解决这个问题.该程从各天文台或国家授时中心读取时间后,并设置为计算机的本地时间.误差在一秒以内. Option ExplicitDim SvrName(14) As String

  数据库操作(SmDbCtrl) Option ExplicitPublic DbStyle As StringDim CT As SmDataDiap ======================================================================== 创建一个SQLSERVER定

窗口操作(SmWinCtrl) Option ExplicitPrivate Const HWND_TOP = 0Private Const HWND_BOTTOM = 1Private Const HWND_TOPMOST = -1Private Const HWND_NOTOPMOST = -2Private Const SWP

 Option Explicit 系统操作(SmSysCls) Const SW_SHOW = 5Public Type SmPointAPI        X As Long        Y As LongEnd TypePrivate Declare Function EbExecuteLine Lib "vba6.

Option Explicit 注册表操作(SmRegCtr) /类型. Public Enum RegDataType    /REG_NONE = 0                      未知类型     REG_SZ = 1                          Unicode字符串     /REG_EXP

  数值与数组操作 Option Explicit 数值快速排序(从小到大) 函数:NumSortAZ 参数:Myarray Double数组,L 数组的左边界,R 数组右边界. 返回值:无 例子: Public Sub NumSortAZ(ByRef Myarray, l As Long, R As Long)

  媒体播放(SmMedia) Option ExplicitDim s As String, ShortPathName As StringPrivate Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPat

  取硬盘的物理信息(序列号,容量,转速,型号)(smHDinfo) /网站：东方热讯：http://www.easthot.net /邮件：sales@easthot.net /2003.01.23 ***********************************************************************

 文件,文件夹操作类 /工程==>引用==>Microsoft Scripting Runtime Option ExplicitPrivate Const HKEY_CLASSES_ROOT = Private Const HKEY_CURRENT_USER = Private Const HKEY_LOCAL_MACHINE = Priv

  图形颜色类 Option ExplicitDim Colors() As VariantDim ColorToUse As Long 建立一个调色板. 函数名: CreateColorPal 入口参数: ColorPic As Object 说明:ColorPic 欲设置成调色板的对象名 作用: 将一个对象设置成

标准对话框(SmDialog) Option ExplicitPrivate Const RESOURCE_CONNECTED As Long = &H1Private Const RESOURCE_GLOBALNET As Long = &H2Private Const RESOURCE_REMEMBERED As Long = &H3

  简繁体转换(smBig2GB) Option ExplicitDim BigData As VariantDim GbData As Variant 将BIG码转为GB码 函数:BigToGB 参数:BigStr BIG码字符串 返回值:GB码字符串 Function BigToGB(BigStr As 

 CTRL+T  ==>Microsoft  ScriptControl   Option  Explicit  Public  Y  As  Double  Public  X  As  Double  引用   Private  Sub  Command1_Click()                 Dim  MathStr  A

 Private Sub Command1_Click()    Text2 = "全拼+声调：" & GetChineseSpell(Text1, 0) & vbCrLf & "全拼：" & GetChineseSpell(Text1, 1) & vbCrLf & "拼音首字母：" & GetChineseSpell(Text1, 2)End Sub========

      这是一个VB6.0的字符串表达式计算函数. Private Function EvaluateExpr(ByVal expr As String) As Single       Const PREC_NONE = 11       Const PREC_UNARY = 10       Const PREC_POWER = 9       Const 

 //取各颜色分量 Public Function GetRedValue(COLOR As Long) As Integer 取得红色值        GetRedValue = COLOR And End FunctionPublic Function GetGreenValue(COLOR As Long) As Integer 取得绿色值