Visual Basic - Ayuda con ADO_ SQL server

Life is soft - evento anual de software empresarial
   
Vista:

Ayuda con ADO_ SQL server

Publicado por Fran (5 intervenciones) el 12/11/2007 08:20:34
Hola a todos,

A ver explico... Necesito introducir los registros de un campo de una consulta que tengo generada en una base de datos en un data combo.

La base de datos que tengo es de Access 2003, y la consulta, trabaja con tablas importadas de una base de datos ODBC (Baan ERP).

La consulta desde access funciona perfectamente, el problema es que cuando abro la consulta me pide el password para iniciar la sesion de SQL Server, vale se lo introduczco y puedo hacer la consulta.

Mi problema es que nose como acceder a esta consulta por el tema del password...

Os pongo el código que estoy utilizando.

Private Sub Form_Load()

Set conn = New ADODB.Connection
path_bd = "\\nostromo\produccion\encmdl\bases\ges_planta.mdb" '<---- cambiar x tú base de datos path, nombre, etc
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & path_bd & ";" & _
"Persist Security Info=False"
conn.Open
'''''''Command1.Caption = "Comparar Claves"
'''''''''Text1.Text = ""
Set rs = New ADODB.Recordset
rs.Open "Select i_item from _Codigos_mdl", conn, adOpenStatic, adLockOptimistic
Set DataCombo1.DataSource = rs
Set DataCombo1.RowSource = rs
DataCombo1.BoundColumn = "i_item"
DataCombo1.ListField = "i_item"

End Sub

Este mismo código lo utilizado para abrir tablas o consultas, que no requieren la inicializacion de sesion de SQL y funciona perfectamente.

tal como lo tengo ahora cuando ejecuto me da el siguiente error:

''''Error '-2147217904 (80040e10)' en tiempo de ejecución:
''''No se han especificado valores para algunos de los parametros requeridos.

Espero que me podais ayudar, muchas gracias por adelantado.
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
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Memorium
- Navegador
- Eliminación de gauss

RE:Ayuda con ADO_ SQL server

Publicado por Fran (5 intervenciones) el 12/11/2007 11:32:37
Disculpad, me he confundido, el error que da es el siguiente

Error '-2147467259 (80004005)' en tiempo de ejecucion:
ODBC: error al conectar con 'BAANSYSTEM2'

Gracias
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