Optimizar
Publicado por Carlos (125 intervenciones) el 22/08/2007 17:51:12
tengo una tabla consulta en acces que me filtra ciertos datos segun los parametros que le coloque ahora quiero optmizar esto, se que todo esto puede colocarse en una sola linea d sql, ahora no hayo como optimizar esto quien me puede hechar una mano
Set AdoComando = Nothing
Set AdoParametro = Nothing
AdoComando.CommandText = "Consulta"
AdoComando.CommandType = adCmdStoredProc
Set AdoParametro = AdoComando.CreateParameter("x", adDouble, adParamInput)
AdoComando.Parameters.Append AdoParametro
AdoParametro.Value = Marcador1
Set AdoParametro = AdoComando.CreateParameter("z", adBSTR, adParamInput)
AdoComando.Parameters.Append AdoParametro
AdoParametro.Value = Marcador2
Set AdoComando.ActiveConnection = AdoConexion
Set AdoCargar = AdoComando.Execute
PD: adocomando esta definifo como ADODB.Command y adoparametro esta definido como ADODB.Parameter
Set AdoComando = Nothing
Set AdoParametro = Nothing
AdoComando.CommandText = "Consulta"
AdoComando.CommandType = adCmdStoredProc
Set AdoParametro = AdoComando.CreateParameter("x", adDouble, adParamInput)
AdoComando.Parameters.Append AdoParametro
AdoParametro.Value = Marcador1
Set AdoParametro = AdoComando.CreateParameter("z", adBSTR, adParamInput)
AdoComando.Parameters.Append AdoParametro
AdoParametro.Value = Marcador2
Set AdoComando.ActiveConnection = AdoConexion
Set AdoCargar = AdoComando.Execute
PD: adocomando esta definifo como ADODB.Command y adoparametro esta definido como ADODB.Parameter
Valora esta pregunta


0