5

ExcelVBAを使用してワークスペースサーバーに接続しようとしています。このページの情報を使用して、私は以下を作成しました。

Dim obSAS As SAS.Workspace
Dim obWorkspaceManager As New SASWorkspaceManager.WorkspaceManager
Private Sub Form_Load()
   Dim obConnection As New ADODB.Connection
   Dim obRecordSet As New ADODB.Recordset
   Dim obServerDef As New SASWorkspaceManager.ServerDef
   Dim xmlString As String
   obServerDef.Port = 28561
   obServerDef.Protocol = ProtocolBridge 
   obServerDef.MachineDNSName = "blah.server.com"
   Set obSAS = obWorkspaceManager.Workspaces.CreateWorkspaceByServer( "Ref", _
      VisibilityProcess, obServerDef, "me@saspw","MyPass", xmlStr)
end sub

私の最初の応答はこれでした：

<xml id="combridgeOutput"><connectionAttempts><connectionAttempt>
  <sasserver></sasserver>
  <sasmachinednsname>blah.server.com</sasmachinednsname>
  <sasport>28561</sasport>
  <saslogin>me@saspw</saslogin>
  <status>0x80041001</status>
  <description><Exceptions><Exception>
  <SASMessage severity="Error">
    The client has connected to a SAS (9.2) Metadata Server (v1.0) when 
    it intended to connect to a SAS Workspace Server.
  </SASMessage>
  </Exception></Exceptions></description>
</connectionAttempt></connectionAttempts></xml>

そこで、ワークスペースサーバーを指すようにポート番号を更新すると、次のようになります。

  <same XML tags as above >
  <SASMessage severity="Error">
    Client me@saspw does not have permission to use server 
    SASMeta - Workspace Server (A5DPDN69.AV000069).
  </SASMessage>

この演習に特別な権限を設定したくない。他にどのようにしてVBAをSASワークスペースサーバーセッションに接続できますか？

4

1 に答える 1

3

ドー！間違ったマシン名を使用していました。参考までに、正しいマシン名を取得するためのプロセスは次のとおりです。

  1. SMCにログインします
  2. サーバーマネージャーを展開します
  3. SASAppを展開します
  4. SASAppを展開-論理ワークスペースサーバー

そこに正しいマシンが表示され、ポートの詳細も表示されます。

于 2012-11-26T19:07:47.850 に答える