SQLDMO y Visual Basic.NET

28/06/2004 - 10:13 por Antonio Jesús | Informe spam
Hola a todos

Estoy intentando utilizar SQLDMO desde Visual Basic.Net. Hago referencia a
la dll en mi proyecto, compila perfectamente, pero en llamadas a
determinadas funciones se muestran errores de asignación de memoria o de
cast. Os paso un ejemplo que cogí de internet y que tampoco me funciona.

Dim oNames As SQLDMO.NameList
Dim oSQLApp As SQLDMO.Application

Set oSQLApp = New SQLDMO.Application

Set oNames = oSQLApp.ListAvailableSQLServers()

dim i as integer

For i = 1 To oNames.Count
Combo.AddItem oNames.Item(i)
Next i

¿Sabeis a que puede ser debido?

Muchas gracias de antemano
 

Leer las respuestas

#1 Fernando G. Guerrero
28/06/2004 - 16:14 | Informe spam
Acabo de comprobar este ejemplo y funciona perfectamente ('solo he cambiado
el modo en que relleno el combo):

Dim oNames As SQLDMO.NameList

Dim oSQLApp As SQLDMO.Application

oSQLApp = New SQLDMO.Application

oNames = oSQLApp.ListAvailableSQLServers()

Dim i As Integer

For i = 1 To oNames.Count

Combo.Items.Add(oNames.Item(i))

Next i

¿Estás seguro de que tienes la versión adecuada de SQL-DMO en tu máquina?
Ten en cuenta que para funconar en .NET con SQL-DMO, estarás utilizando
Interop, y este interfaz ebtre .NET y COM puede producir algunos problemas
en el caso concreto de SQL-DMO, tal y como puedes ver en los ejemplos de la
web de Gert Drapers:

http://www.sqldev.net


Fernando G. Guerrero
SQL Server MVP
CEO & Principal Mentor
Solid Quality Learning
www.solidqualitylearning.com

"Comparte lo que sabes, aprende lo que no sepas"

"Antonio Jesús" wrote in message
news:%
Hola a todos

Estoy intentando utilizar SQLDMO desde Visual Basic.Net. Hago referencia a
la dll en mi proyecto, compila perfectamente, pero en llamadas a
determinadas funciones se muestran errores de asignación de memoria o de
cast. Os paso un ejemplo que cogí de internet y que tampoco me funciona.

Dim oNames As SQLDMO.NameList
Dim oSQLApp As SQLDMO.Application

Set oSQLApp = New SQLDMO.Application

Set oNames = oSQLApp.ListAvailableSQLServers()

dim i as integer

For i = 1 To oNames.Count
Combo.AddItem oNames.Item(i)
Next i

¿Sabeis a que puede ser debido?

Muchas gracias de antemano


Preguntas similares