|
|
【推荐】SAS IT是免费的!!! |
|
|
作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站 |
SAS IT是免费的 一个划时代来了,再没有必要在客户端用SAS那笨重的SAS/AF框架来编写,更流行的是以浏览器作为客户端,同时你完全可以不购买SAS/IntrNet,甚至可以再SAS SERVER端也没有必要购买IT的授权,是的,没有必要,如果有可能 SAS给我们带来了IT,但是它的授权是非常贵的,但是IT所带来的COM对象群是SAS BASE的一部分,它们是不请求IT授权的,因此只要你的VB程序运行在你的PC上且你有SAS8.X在你的PC上,那么COM库也是被引入的,非常感谢你,我尊敬的SAS公司 当然如果你想使用DCOM,那么就必须要IT的授权,否则使用是非法的,也就是说你只能使用COM方式调用SAS IT所带来的功能,但这样对中小型应用应该是足够了 这组COM库是可以非常容易的安装在你的机器上,你可使用下面2种方法的任意一种: 1、从SAS client-Side components CD 或者第2张CD上安装 2、安装IT 如果你想在VB中使用SAS中用SCL写的类,那么你还必须利用AppDev Studio建立一个类定义(IDL)供VB使用,当然如果你不想这么麻烦,你也可以简单用一个宏来实现相应的功能了 :) 好了 ,看腻了把,我们来玩一个例子把,在WORD中写一个小小的VBA来调用SAS 步骤如下: 1、当然先安装那些相关的COM库了,什么?你不知道怎么装,拜托,上面写了 :) 2、打开你的WORD,并设置一下容许宏[工具/宏/安全性/选择中等级别的安全就可] 3、打开VBA编辑器[工具/宏/VBA编辑器] 4、进入VBA编辑器,确保下面库已经被引用[工具/引用] "Microsoft ActiveX Data Objects 2.5 Library" and "SAS: Integrated Object Model (IOM) 1.0 Type Library" and "SASWorkSpaceManager 1.0 Type Library" 5、现在就让我们把下面的代码输入吧,不要告诉我你不知怎么操作 Dim obWS As SAS.Workspace Dim obWSM As New SASWorkspaceManager.WorkspaceManager Sub Form_Load() Dim obConn As New ADODB.Connection Dim obRS As New ADODB.Recordset Dim errorString As String Rem start the SAS session Set obWS = obWSM.Workspaces.CreateWorkspaceByServer("Local", _ VisibilityProcess, Nothing, "", "", errorString) Rem submit some SAS code obWS.LanguageService.Submit _ "data a; do x=1 to 10; y=10*x; output; end; run;" Rem open an ADO connection to the data set Dim connString As String connString = "provider=sas.iomprovider.1; SAS Workspace ID=" _ + obWS.UniqueIdentifier obConn.Open connString obRS.Open "work.a", obConn, adOpenStatic, adLockReadOnly, _ adCmdTableDirect Rem write the table as html (visible in Word with tags) obRS.MoveFirst Dim sTable As String sTable = "<TABLE BORDER=0><TBODY><TR><TD class=Data>" Selection.TypeText sTable sTable = obRS.GetString(, , "</TD><TD class=Data>", _ "</TD></TR><TR><TD class=Data>") Selection.TypeText sTable sTable = "</TD></TR></TBODY></TABLE>" Selection.TypeText sTable Rem tidy-up obRS.Close obConn.Close obWS.Close End Sub 6、代码写好了,当然是运行了 7、运行了么?你去WORD界面看看 ,发生了什么?呵呵 ,当然可能在你的环境中可能有问题,但是在我这我确确实实看到了什么 好了,文章就此结束了 ,望大家喜欢 ,当然希望大家不要误解了标题的意思,SAS IT这个产品本身是不免费的,但是这个产品所带来的一些COM对象却是免费的

|
|
相关文章:相关软件: |
|