Somos Expertos Access. Contacto atravez de Skype Skype logo expertos_7

Función para ayudarte a depurar tu código SQL

Yo utilizo mucho código SQL, no soy un fanático de crear consultas y luego referenciarlas en mi código puesto que los usuarios pueden editarlas o borrarlas.

En muchas ocasiones construyo cadenas SQL y luego necesito depurarlas en mi ventana de consultas, en el pasado solía tomar el valor de mis cadenas y lo pegaba en una nueva ventana de sentencias SQL. Me cansé de hacer esto todo el tiempo, por lo que cree una pequeña función que lo hace por mí.

Public Function PopQuerySQL(strSQL As String, strQueryName As String)
Dim qdf As DAO.QueryDef
On Error GoTo PopQuerySQL_Error
DoCmd.Close acQuery, strQueryName
DoCmd.DeleteObject acQuery, strQueryName
Set qdf = CurrentDb.CreateQueryDef(strQueryName, strSQL)
Set qdf = Nothing
DoCmd.OpenQuery strQueryName, acViewNormal
On Error GoTo 0
Exit Function
PopQuerySQL_Error:
If Err.Number = 7874 Then
Resume Next ‘Query does not exist
End If
MsgBox “Error ” & Err.Number & ” (” & Err.Description & “) in procedure PopQuerySQL of Module mdlAPI”
End Function
Ahora solo utilizo este código con mi variable SQL en la ventana actual:
PopQuery strSQL, “qryTemp”
Me ahorra mucho tiempo espero que también lo haga con ustedes.
Juan
Acerca de

Juan Soto es un desarrollador senior de Access en IT Impact Inc. y un MVP de Microsoft Access y se especializa en Access con bases de datos de SQL Server. Su pasión por el acceso lo ha llevado ayudar a una amplia gama de empresas a establecer un entorno seguro, estable y eficiente con SQL Server. Él es un orador frecuente en los grupos de usuarios de Access en todo el país y recientemente habló en el Orange County SQL Saturday # 73. Si desea que Juan hable en su próxima reunión de grupo, puede ponerse en contacto con él aquí.

Publicado en Access Help, Access Queries

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

*

 

Quienes Somos

ExpertosMicrosoftAccess.com es un servicio de la empresa IT Impact, Inc., una compañía de programación y servicios para empresas en Latino América. Ofrecemos servicios en .Net, SQL Server y Microsoft Access. Muchos de nuestros desarrolladores han obtenido el galardón de Access MVP, un título proveído por Microsoft a aquellos que han hecho aportes a la comunidad y que han demostrado tener conocimientos superiores del producto.

Nuestro Equipo

  • Le ayudamos a "Descubrir el poder de sus datos™" con reportes y sistemas de Access excepcionales .
  • Creamos soluciones de bases de datos personalizadas utilizando Microsoft Access y / o SQL Server.
  • Nuestros consultores ganaron sus estrellas en las empresas de servicios y/o manufactura antes de convertirse en programadores.

Blogs anteriores