SAS - Ejecutar macro desde VB

   
Vista:

Ejecutar macro desde VB

Publicado por diana (1 intervención) el 06/09/2011 17:21:01
Hola, estoy usando visual basic para manejar algunos archivos de SAS, esto ya lo puedo hacer, pero ahora necesito ejecutar una macro de SAS para pasarle algunos parametros, alguin me podria guiar de como hacero o donde pudiera encontar la información??
De antemano GRACIAS!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Ejecutar macro desde VB

Publicado por diana (1 intervención) el 08/09/2011 17:12:55
Listo, encontre como hacerlo funcionar, les dejo el codigo por si algun dia alguien lo necesita.
Saludos y Suerte!!
Dim obWSMgr As New SASObjectManager.ObjectFactory
Dim obSAS As SAS.Workspace
Dim obStoredProcessService As SAS.StoredProcessService
Dim cc() As SAS.LanguageServiceCarriageControl
Dim lt() As SAS.LanguageServiceLineType
Dim listLines() As String
Dim i As Integer

Set obSAS = obWSMgr.CreateObjectByServer("", True, Nothing, "", "")
obSAS.LanguageService.Submit ""

Set obStoredProcessService = obSAS.LanguageService.StoredProcessService
obStoredProcessService.Repository = "file:C:\RUTA ARCHIVOS SAS\"
obStoredProcessService.Execute "NOMBRE_ARCHIVO_SAS", ""
obSAS.LanguageService.Submit ("%PruebaMacro("&parametro1 & ","&parametro2&","&parametro3&");")
obSAS.LanguageService.FlushListLines 32, cc, lt, listLines
For i = 0 To UBound(listLines)
txtOutput.Text = txtOutput.Text & listLines(i) & vbCrLf '"LOG" & obSAS.LanguageService.FlushLog(100000)
Next
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar