로컬 큐브 구축

Question

Excel 사용 클라이언트를 위해 로컬 .CUB 파일을 작성해야합니다.

나는 일부 VB 코드를 함께 모았지만 실패합니다.

ConnLocation = "LOCATION=C:\test.cub;"
ConnDSN = "SOURCE_DSN=DSN=TEST;UID=test;PWD=pass;"
ConnCreateCube = _
"CREATECUBE=CREATE CUBE [TestCube] (" & _
"DIMENSION [account_code]);"
Connection = CreateObject("ADODB.Connection")
Connection.Provider = "msolap"
Connection.ConnectionString = _
    ConnLocation & _
   ConnDSN & _
ConnCreateCube

나는 이것을 위의 코드로 다듬었고 신비한 것을 얻고 있습니다. OLE DB error: OLE DB or ODBC error."내가 실행하려고 할 때.

위의 도움이나 다른 방법으로 접근하는 방법에 대한 제안은 저에게 감사 할 것입니다.

Answer 1

연결 문자열 DSN 속성이 잘못된 것 같습니다.

ConnDSN = "SOURCE_DSN=""DSN=TEST;UID=test;PWD=pass;"""

인용문을 기록하십시오.

더 직관적이고 실패한 안전을 위해 작은 코드 변경을 권장합니다.

ConnLoc = "C:\test.cub"
ConnDSN = "DSN=TEST;UID=test;PWD=pass"
ConnSQL = "CREATE CUBE [TestCube] (DIMENSION [account_code])"

Connection = CreateObject("ADODB.Connection")
Connection.Provider = "msolap"
Connection.ConnectionString = "LOCATION=""" & ConnLoc & """;" & _
                              "SOURCE_DSN=""" & ConnDSN & """;" & _
                              "CREATECUBE=""" & ConnSQL & """;"