conexion remota -- URGENTE POR FAVOR!!!

28/07/2004 - 23:07 por Daniel Alvarez | Informe spam
Hola, tengo un pequeño problema... que de tan pequeño no me esta volviendo
loco

Resulta que tengo mi aplicacion .NET que se conecta a mi base de datos SQL
server la cual esta montada en la misma PC de desarrollo... el tema es que
realice la cadena de conexion tal cual se las muestro aqui:

Public Const STR_CONN2 As String = _
"Integrated Security=SSPI;" & _
"Password=xxx;" & _
"Persist Security Info=True;" & _
"User ID=xxx;" & _
"Initial Catalog=midb;" & _
"Data Source=COMEX_ONLINE;"


Esto funciona muy bien.. lo que no funciona es cuando quiero correr la
aplicacion para que se conecte a la base de datos real que esta en un
servidor web (hosting).. para ello utilizo esta cadena de coneccion

Public Const STR_CONN As String = _
"server 0.80.55.112;" & _
"Password=xxx;" & _
"User ID=xxx;" & _
"database=midb;"

y me da el siguiente error:

Execute permision denied on object 'sp_sdidebug', database 'master', owner
'dbo'

lo raro es que yo no me conecto ni a la base de datos master ni intento
ejecutar ese procedimiento almacenado.. es mas ni se para que se utiliza
Alguien me podria dar una mano??? por favor es urgente

Por si sirve de algo... de esta forma me conecto

Sub Main()

Dim vsql As String
vsql = "SELECT * FROM col_monedas where id_moneda = " & G_idmoneda

'CONECTAR A BD
Dim MYCONN As New SqlConnection(STR_CONN)
Dim oDr As SqlDataReader
Try
MYCONN.Open()
Dim oCmd As New SqlCommand(vsql, MYCONN)
oDr = oCmd.ExecuteReader()
While oDr.Read
G_cotizacionDolar = oDr("cambio")
End While
oDr.Close()
MYCONN.Close()
'
'Cargar formulario principal
Application.Run(New main())
Catch ex As Exception
Dim xx = ex.Message
MessageBox.Show(xx)
End Try

End Sub


de antemano gracias!
 

Leer las respuestas

#1 Gustavo Mazzaglia
29/07/2004 - 00:46 | Informe spam
Me parece que tenes mal el string de conexion, en lugar de
database es initial catalog. El store procedure
sp_sdidebug, si mal no recuerdo era para que funcione la
depuracion de Transact-SQL, por ejemplo cuando desde VB6
depurabas un store procedure de sql server. Lo que te debe
estar sucediendo es que "database" no lo tiene en cuenta y
el usuario que inicia la sesion debe tener por defecto la
base de datos master. Te paso el string de conexion,
reemplaza los xxx:

workstation id=xxx;packet ;user id=xxx;data
source=xxxx;persist security info=False;initial catalog=xxx

Saludos.
Gustavo Mazzaglia



Hola, tengo un pequeño problema... que de tan pequeño no


me esta volviendo
loco

Resulta que tengo mi aplicacion .NET que se conecta a mi


base de datos SQL
server la cual esta montada en la misma PC de


desarrollo... el tema es que
realice la cadena de conexion tal cual se las muestro


aqui:

Public Const STR_CONN2 As String = _
"Integrated Security=SSPI;" & _
"Password=xxx;" & _
"Persist Security Info=True;" & _
"User ID=xxx;" & _
"Initial Catalog=midb;" & _
"Data Source=COMEX_ONLINE;"


Esto funciona muy bien.. lo que no funciona es cuando


quiero correr la
aplicacion para que se conecte a la base de datos real


que esta en un
servidor web (hosting).. para ello utilizo esta cadena de


coneccion

Public Const STR_CONN As String = _
"server 0.80.55.112;" & _
"Password=xxx;" & _
"User ID=xxx;" & _
"database=midb;"

y me da el siguiente error:

Execute permision denied on object 'sp_sdidebug',


database 'master', owner
'dbo'

lo raro es que yo no me conecto ni a la base de datos


master ni intento
ejecutar ese procedimiento almacenado.. es mas ni se para


que se utiliza
Alguien me podria dar una mano??? por favor es urgente

Por si sirve de algo... de esta forma me conecto

Sub Main()

Dim vsql As String
vsql = "SELECT * FROM col_monedas where id_moneda = " &


G_idmoneda

'CONECTAR A BD
Dim MYCONN As New SqlConnection(STR_CONN)
Dim oDr As SqlDataReader
Try
MYCONN.Open()
Dim oCmd As New SqlCommand(vsql, MYCONN)
oDr = oCmd.ExecuteReader()
While oDr.Read
G_cotizacionDolar = oDr("cambio")
End While
oDr.Close()
MYCONN.Close()
'--


-
'Cargar formulario principal
Application.Run(New main())
Catch ex As Exception
Dim xx = ex.Message
MessageBox.Show(xx)
End Try

End Sub


de antemano gracias!


.

Preguntas similares