Programación General > Visual Basic 6.0 e inferiores
Conectado A Sql 2000
MeLaT:
Hola que tal. Este código lo uso en páginas web:
--- Código: Text ---Set ObjetoConexion = SERVER.CreateObject("ADODB.Connection")ObjetoConexion.OPEN "driver={SQL server};uid=MIO;pwd=098;database=mibase;server=10.000.0.000"SQL = "SELECT * FROM T_CONTRASEÑA, T_DTS_PERSONALES WHERE (T_CONTRASEÑA.DTSP_NOCTRL=T_DTS_PERSONALES.DTSP_NOCTRL)AND((T_CONTRASEÑA.DTSP_NOCTRL = '" & request.Form("TXT_USER") & "') AND (dbo.T_CONTRASEÑA.CONT_PASSWORD = '" & request.Form("TXT_PASS") & "'))"Set db = ObjetoConexion.EXECUTE(SQL)
Pero ahora estoy trabajando con VB 6.0 y no me sirve de mucho. Tengo esto en el módulo, para que cada formulario mande llamar esta conexión:
--- Código: Text --- Option Explicit Public conn As ADODB.Connection Public rs As ADODB.Recordset Public CRITERIO As String Public resp As String Public edocnn As StringPublic Sub conectar() On Error GoTo errorcnn Set conn = New ADODB.Connection With conn .ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=MIO;Database=mibase;USER=admin;PWD=0987" End With edocnn = 1errorcnn: MsgBox Err.Description, vbInformation, "Error Numero" & Err.Number Exit SubEnd SubPublic Sub RS_ABRIR() If rs.State = 1 Then rs.Close rs.OPEN CRITERIO, conn, adOpenKeyset, adLockPessimisticEnd Sub
Pero nisiquiera corre el programa por que en:
--- Código: Text ---Public conn As ADODB.Connection me marca un error de compilación, "No se ha definido el tipo por el usuario."
Nunca he trabajado con conexiones desde visualbasic6.0 a SQL, me podrían decir en que ando mal ?!
Gracias . . .
Mollense:
No he revisado el código pero antes que nada tenés que agregar la referencia correspondiente al proyecto (Menú Proyecto --> Agregar referencia...)-
Ahora no me acuerdo el nombre de la que necesitas pero lo busco y te digo
[dohtml]<hr>[/dohtml]
Creo que es esta: Microsoft ActiveX Data Objects 2.0 Library
ElNapster:
--- Citar ---Creo que es esta: Microsoft ActiveX Data Objects 2.0 Library
--- Fin de la cita ---
aunque podria ser otra version yo utilizo el Microsoft ActiveX Data Objects 2.5 Library ... ;)
Pero si se tiene que tener en cuenta esa referencia ... :ph34r: sino no hay conexion con la bd sql server .. :lightsabre:
Mollense:
--- Cita de: "elnapster" ---
--- Citar ---Creo que es esta: Microsoft ActiveX Data Objects 2.0 Library
--- Fin de la cita ---
aunque podria ser otra version yo utilizo el Microsoft ActiveX Data Objects 2.5 Library ... ;)
--- Fin de la cita ---
:lol: , es que hace mucho que no uso Visual Basic :lol: (Se nota :P )
MeLaT:
Gracias.
No tenia idea que tenía que agregar referencias.
Utilicé " Microsoft ActiveX Data Objects 2.8 Library ".
Me podrían decir en qué otros casos debería agregar otra referencia ?!
Navegación
[#] Página Siguiente
Ir a la versión completa