kiquenet

        private void EnviarTest(string body, MBC_ADJUNTOSList listaAdjuntos)
        {
            // Montamos la estructura básica del mensaje...
            MailMessage mail = new MailMessage();
            mail.From = new MailAddress("xxxx@kiquenet.com");
            mail.To.Add("xxxx@gmail.com");
            mail.Subject = "Test";

            // Creamos la vista para clientes que // sólo pueden acceder a texto plano... 

kiquenet

Use ReportServer
go
/* Performance Tips
     1. High TimeDataRetriveal
          * Removed unused datasets
          * Analyze the dataset query in SQL Profiler
          * Combine Datasets where possible
     2. High TimeProcessing
          * Use less report parts (tables, charts...)
          * Do Grouping and Sorting on the SQL Side

kiquenet

-----------------------------------------------------------------------
-- Collection of queries that helps in performance tuning

--grant permission to user
GRANT VIEW SERVER STATE TO [user_name]

------------ based on http://msdn.microsoft.com/en-us/magazine/cc135978.aspx 
---------- Uncover hidden data to optimize application performance -----------------------

-- * Number of missing indexes

kiquenet

<?xml version="1.0" encoding="ISO-8859-1"?>
<xs:schema xmlns="http://www.seg-social.es/creta/esquemas/V100/DCL" xmlns:xs="http://www.w3.org/2001/XMLSchema" targetNamespace="http://www.seg-social.es/creta/esquemas/V100/DCL" elementFormDefault="qualified" attributeFormDefault="unqualified">
	<xs:element name="DCL">
		<xs:complexType>
			<xs:sequence>
				<xs:element ref="Autorizado"/>
				<xs:element ref="Liquidacion"/>
			</xs:sequence>
		</xs:complexType>
	</xs:element>

kiquenet

Public Class WebForm1
    Inherits System.Web.UI.Page
    Dim Usuario As String
    Dim ConexionSqlServer As String = "Data Source=xxxxx"
    Dim Conexion As String = ConexionSqlServer & "Provider=SQLOLEDB;"

    'Dim Fecha As Date
    Dim FechaDesde As Date
    Dim FechaHasta As Date
    'Dim FechaString As String

kiquenet

  Public Shared Sub DoProcesoLeerCSV(ByVal encoding As System.Text.Encoding, ByVal fechaCargaYYYYMMDD As String, ByVal nombreFichero As String, ByVal nombreFicheroCarga As String)

        '''''''Log("Leer CSV " & nombreFichero & " *** OJO ENCODING *** ")
        Dim objReader As New StreamReader(nombreFichero, encoding, True)
        Dim sLine As String = ""
        Dim arrText As New ArrayList()

        Do
            sLine = objReader.ReadLine()
            If Not sLine Is Nothing Then