All pastes #296191 Raw Edit

Untitled

public text v1 · immutable
#296191 ·published 2006-12-30 00:29 UTC
rendered paste body
Imports System.Configuration
Imports Vortex.Utils.Querys
Imports System.Web
Imports System.Data.SqlClient

Public Class Config

    Public Shared ReadOnly Servidor As String
    Public Shared ReadOnly DataBase As String
    Shared queryHelper As QueryHelper

    Public Shared Function GetQueryHelper() As queryHelper
        Return queryHelper
    End Function

    Shared Sub New()
        Servidor = ConfigurationSettings.AppSettings.Get("Servidor")
        DataBase = ConfigurationSettings.AppSettings.Get("BasedeDatos")
        Dim queryContext As QueryContext
        queryContext = New QueryContext(GetType(SqlCommand), GetType(SqlParameter), GetType(SqlDataAdapter))
        Dim url As String = HttpContext.Current.Server.MapPath("./") & ConfigurationSettings.AppSettings.Get("QuerysDefinition")
        queryHelper = New QueryHelper(url, queryContext)
    End Sub

End Class