Visual Basic - Conexion con ado usando codigo

Life is soft - evento anual de software empresarial
 
Vista:

Conexion con ado usando codigo

Publicado por José (11 intervenciones) el 08/06/2007 21:54:39
Buenas tardes, necesito saber 2 cosas

1) si puedo conectarme a un ADO a traves de codigo una sola vez y no tener que repetir la
operacion en cada control que use. porque no lo puedo conseguir
probe haciendolo cuando se carga el formulario, pero luego tengo que repetir la
operacion en cada operacion que maneje esos registros.

2) ¿ una vez conectado con la base como desbloqueo el ADO para poder actualizar los
datos?, ya que al queres actualizarlos me salta un error y me hace mencion a un cierto
bloque de los registros.

gracias
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

RE:Conexion con ado usando codigo

Publicado por Robert Bellorin (4 intervenciones) el 09/06/2007 07:31:01
Buenos dias,

La forma la cual quieres trabajar sino me equivoco es con, bases de datos en tiempo real, para ello necesitas crear una función, clase o la que mas se adapte a tus necesidades donde basicamente manejas
1.- Conexion a la bdd
2.- Consulta sql
3.- Ejecucción de ambas
4.- Cierre la conexion al terminar las peticiones

Al tu manejar este criterio utilizado mucho en php, asp, otros todo lo que te imagines será posible, te recomiendo que leas un tutorial basico de sql.
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

RE:Conexion con ado usando codigo

Publicado por fede (189 intervenciones) el 14/06/2007 16:38:28
Public Function conectar()
Dim conexion As String

conexion = "C:\Archivos de programa\microsoft visual studio\Vb98\carujean\factura1.mdb"

cn.Provider = "Microsoft.Jet.OLEDB.4.0"
cn.ConnectionString = conexion
cn.CursorLocation = adUseClient
cn.Open
'rs2.Open "Select * from requehaber ", cn, adOpenKeyset, adLockOptimistic
'rs3.Open "Select * from nrosreque order by Idreque", cn, adOpenKeyset, adLockOptimistic
rs8.Open "Select * from rubros", cn, adOpenKeyset, adLockOptimistic
'rs11.Open "Select * from Nrosorden order by Idorden", cn, adOpenKeyset, adLockOptimistic
rs14.Open "select * from articulos order by idarticulo", cn, adOpenKeyset, adLockOptimistic
Exit Function
End Function
y cuando te vas del programa pones cn.close
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