ice读写数据的OLE DB的数据提供者 你可以使用ADO读写数据 例如： Set obSAS = _ obWSMgr.Workspaces.CreateWorkspaceByServer _ ("",VisibilityProcess,obServer,"","", _ xmlInfo) Dim obConnection As New ADODB.Connection obConnection.Open _ "provider=sas.iomprovider.1;" & _ "SAS Workspace ID=" & obSAS.UniqueIdentifier Dim obRS As New ADODB.Recordset obRS.Open "sashelp.class", obConnection, _ adOpenDynamic, adLockReadOnly, _ adCmdTableDirect Set MSChart1.DataSource = obRS 关于IOM COM桥 当SAS运行window上时，你可以使用COM或者DCOM，然而当SAS运行于UNIX或者OS上时，则不能使用COM技术调用SAS，SAS提供了IOM COM桥，它一方便呈现COM接口给客户端，一方面使用TCP/IP跟SAS进行通信
关于Scripto Scripto 是一个用于脚本应用的ACITVEX对象，其使用解决了脚本同SAS组件对象交互使用的几个限制，如VBSCRIPT只能返回一个单一参数;VBSCRIPT请求所有变量为VARIANT，故数祖也被处理为VARIANT，Scripto就解决这2个问题，容许返回多个参数，可以使用数组进行传输 '''' Scripto will do 2 things: '''' 1) It will convert the 3 returned arrays to arrays of variants instead of arrays of '''' longs so vbscript can handle them '''' 2) It allows more than 1 return parameter set obSAS = CreateObject("SAS.Workspace") Set obScripto = _ CreateObject("SASScripto.Scripto") obSAS.LanguageService.Submit _ "proc options;run;" obScripto.SetInterface obSAS.LanguageService '''' obSAS.LanguageService.FlushLogLines 1000, carriageControls, linetypes, logLines Dim flushLogLinesParams(3) flushLogLinesParams(3) = 1000 obScripto.InvokeMethod "FlushLogLines", _ flushLogLinesParams '''' flushLogLinesParams(0) now has logLines '''' flushLogLinesParams(1) has lineTypes '''' flushLogLinesParams(2) has carriageCtrls '''' This prints the first line wscript.echo flushLogLinesParams(0)(0)
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
