leer archivo xml problemas til y encode

XmlDocument xmlDocument = new XmlDocument();
 StreamReader reader = new StreamReader(filePath);
 xmlDocument.Load(reader);
 reader.Close();

fuente: https://stackoverflow.com/questions/51873880/c-sharp-xmldocument-loadstring-fails-when-encoding-for-file-is-unicode

Conectar sql sin base de datos

 Private conex_string As String = "Server=1.1.1.1;Integrated security=SSPI;database=master"

https://learn.microsoft.com/en-us/troubleshoot/developer/visualstudio/csharp/language-compilers/create-sql-server-database-programmatically

https://www.c-sharpcorner.com/article/create-a-sql-server-database-dynamically-in-C-Sharp/

encoding iso 8859-1

 

Dim str "=?iso-8859-1?Q?Gu=EDa_de_Despacho_Electr=F3nica_n=FAmero_5219877_del_04=2F10=2F2022_emi?="

 Dim att As System.Net.Mail.Attachment = System.Net.Mail.Attachment.CreateAttachmentFromString("", str)

        Dim test As String = att.Name

https://stackoverflow.com/questions/4106960/c-sharp-email-subject-parsing

https://stackoverflow.com/questions/2226554/c-class-for-decoding-quoted-printable-encoding

https://www.ic.unicamp.br/~stolfi/EXPORT/www/ISO-8859-1-Encoding.html

string numbers to array integer

 Dim test() As Integer = str.Split(";").Select(Function(x) CInt(x)).ToArray

Messagebox mostrar siempre

 

MessageBox.Show("FIN", "clientes SII", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.ServiceNotification, False)

fuente

Trigger no eliminar fila específica

use casa

 GO

 CREATE TRIGGER no_delete_admin

         ON [dbo].[usuarios]

    INSTEAD OF DELETE 

    AS

    IF EXISTS(SELECT * FROM deleted d WHERE d.id = 4)

   BEGIN

    --ROLLBACK;

    RAISERROR('No se puede eliminar',16,1);

   END

   ELSE

   BEGIN

   DELETE usuarios WHERE id IN (SELECT id FROM deleted)

   END

   

   SELECT * FROM usuarios where id IN (1)

   SELECT * FROM deleted d WHERE d.id <> 1

fuente1

fuente2

fuente3

version2

GO

 CREATE TRIGGER [dbo].[no_delete_admin]

         ON [dbo].[usuarios]

    INSTEAD OF DELETE 

    AS

    IF EXISTS(SELECT * FROM deleted d WHERE d.id = 4)

   BEGIN

    

    SET ANSI_WARNINGS OFF;

    SET ANSI_WARNINGS ON;

    --ROLLBACK;

    --RAISERROR('No se puede eliminar',16,1);

   END

   ELSE

   BEGIN

   DELETE usuarios WHERE id IN (SELECT id FROM deleted)

   END

constraint tabla usuarios

tabla usuarios

ALTER TABLE usuarios
ADD CONSTRAINT not_empty_usuario CHECK (LEN(usuario) > 0 )

ALTER TABLE usuarios
ADD CONSTRAINT not_empty_clave CHECK (LEN(clave) > 0 )

fuente
fuente2
fuente3

Certificación boleta electrónica 2020

instructivo certificación

set de pruebas

solicitud de revisión set boletas

ejemplo certificación

formato dte boleta_2020

1. Boleta de Ventas y Servicios Electrónica
2. Boleta electrónica de mercado
3. Inscríbase aquí
4. Procedimiento de postulación, certificación y autorización
5. Paso 3 
6. Realizar Declaración de Cumplimiento

ToolTip CheckBox Mensaje

  Dim tool_tip1 As ToolTip = New ToolTip
        'tool_tip1.AutoPopDelay = 5000
        'tool_tip1.InitialDelay = 1000
        'tool_tip1.ReshowDelay = 500
        tool_tip1.ShowAlways = True
        tool_tip1.SetToolTip(Me.cb_selec_todo, "Seleccionar todo ✓")

fuente

Ruta ejecutable

Path.GetDirectoryName(Assembly.GetExecutingAssembly.Location) & "\"