Skip to content

Instantly share code, notes, and snippets.

kiquenet / codesnippet.Email1.cs
Created December 2, 2014 19:52
Send Email Test AlternateView
private void EnviarTest(string body, MBC_ADJUNTOSList listaAdjuntos)
// Montamos la estructura básica del mensaje...
MailMessage mail = new MailMessage();
mail.From = new MailAddress("");
mail.Subject = "Test";
// Creamos la vista para clientes que // sólo pueden acceder a texto plano...
kiquenet / gist:4964f650fe70c3180ea6
Created November 19, 2015 08:39
SSRS analytics Queries
Use ReportServer
/* 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 / SQL
Created February 18, 2016 10:32 — forked from huguogang/SQL
SQL Server Performance DMV Sample Queries
-- Collection of queries that helps in performance tuning
--grant permission to user
------------ based on
---------- Uncover hidden data to optimize application performance -----------------------
-- * Number of missing indexes
kiquenet / GeneraInforme.vb
Last active June 19, 2018 19:26
Generar Informe
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 / DCL.xsd
Last active December 7, 2018 08:31
XML Validation using XSD
<?xml version="1.0" encoding="ISO-8859-1"?>
<xs:schema xmlns="" xmlns:xs="" targetNamespace="" elementFormDefault="qualified" attributeFormDefault="unqualified">
<xs:element name="DCL">
<xs:element ref="Autorizado"/>
<xs:element ref="Liquidacion"/>
kiquenet / HelperFicheroCSV.vb
Created December 31, 2018 10:12
Proceso Transaccional CSV - 1
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()
sLine = objReader.ReadLine()
If Not sLine Is Nothing Then