Ver Mensaje Individual
  #1 (permalink)  
Antiguo 16/03/2009, 11:14
Avatar de totiwuo
totiwuo
 
Fecha de Ingreso: septiembre-2008
Mensajes: 13
Antigüedad: 16 años, 6 meses
Puntos: 0
Se me borra la contraseña de la conexion

Hola.

Tengo un problemita con la conexiòn sql server, de mi codigo: yo le envio a mi funcion la conexion con usuario y contraseña pero cuando abre la conexion me quita la parte de la contraseña...

Public Function getNiveles(ByVal _cnn As SqlClient.SqlConnection) As ArrayList

' _cnn="Data Source=DEVELOPERCELLMA\SQLDEVELOPER;Initial Catalog=cellmacont; User Id=usuario1; Password=contraxxx;"

Dim arrAux As New ArrayList

Dim cerrar As Boolean

If _cnn.State = ConnectionState.Closed Then _cnn.Open() : cerrar = True


' pero cuando pasa por aqui me quita la contraseña y me da error

' _cnn: "Data Source=DEVELOPERCELLMA\SQLDEVELOPER;Initial Catalog=cellmacont; User Id=sa; " (que hace la contraseña???)

' y eso por eso que me da un error de conexion....



Dim cmd As New SqlClient.SqlCommand("SELECT ID, NOMBRE FROM NIVEL ORDER BY NOMBRE", _cnn)

Dim dr As SqlClient.SqlDataReader = cmd.ExecuteReader

Dim codigo As Integer

Dim objNivel As interfasCC.clNivel



Dim cnnAux As New SqlClient.SqlConnection(Utils.StringConn)

cnnAux.Open()

While dr.Read

codigo = dr.GetInt32(0) 'dr("id")

' nombre = dr.GetString(0)

objNivel = New interfasCC.clNivel(cnnAux, codigo)

arrAux.Add(objNivel)

End While

cnnAux.Close()



dr.Close()

If cerrar Then _cnn.Close()

Return arrAux

End Function

Espero que alguien me pueda ayudar???